Ms foarte mult Raven,inca o intrebare dak se poate Ce apare in List1 as vrea sa se salveze intr`un .txt cum procedez stiu ca era ceva de genu: Dim MyIndex, FileNumber FileNumber = FreeFile Open App.Path & "\exemplu.log" & MyIndex For Append As #FileNumber Write #FileNumber, "unu"