Wpis z mikrobloga

Sub macro()

Dim wb1 As Workbook
Dim wb2 As Workbook

Dim Tool1 As String
Dim Tool2 As String
Dim Tool3 As String
Dim tool4 As String

Dim i As Integer

i = 1

Tool1 = Cells(i, 1).Value

Tool2 = Cells(i, 2).Value

Tool3 = Cells(i, 3).Value

tool4 = Cells(i, 4).Value

Set wb1 = Workbooks(Tool1)
Set wb2 = Workbooks(Tool3)

Czemu dostaję subscript out of range na pogrubionej linii? ( ͡° ʖ̯ ͡°) #excel #vba
  • 5
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@DerMirker: Ja robię tak:

1. określasz pełną ścieżkę pliku który chcesz otworzyć, czyli np filepath1 = "C:\Users\DerMiker\" & Tool1, gdzie Tool1 to np. OtworzTenPlik.xlsx
2. Workbooks.Open filepath1
3. set wb1 = workbooks(Tool1)
  • Odpowiedz