Mam problem z ustawieniem składni w tym celu i po prostu zacząłem pracować z FSO w VBA, więc proszę o wyrozumiałość.

fsofol.name = test1 (jest to poprawne)

Próbuję określić, czy każda komórka ma jakieś dane w kolumnie „A”, a jeśli tak, umieść nazwę folderu w komórce przesunięcia, którą umieściłem na liście. Mam nadzieję, że jestem blisko, ale jeśli ktoś może pomóc z sugestią, byłbym wdzięczny. Dzięki!

Umieściłem notatkę w linii problemu poniżej

    Dim fsoFol As Object  

    If fileName Like "V*.xls" Then
         wbkCS.Worksheets("Cut Sheet").Range("S4:S2000").Copy
              With wbkVer.Worksheets("Cutsheets")
              Set firstRange = .Range("A" & .Rows.Count).End(xlUp).Offset(1, 0) 
    firstRange.PasteSpecial xlPasteValues
    If firstRange.Value Like "*" Then
         fsoFol.Name.Copy **'error is here and states object required**
         firstRange.Offset(0, 5).PasteSpecial xlPasteValues
    End If
              End With