Laufzeitfehler 9 bei Sheet.Select
11.11.2020 11:56:46
Julian
ich habe ein Problem mit einem Makro:
Ich möchte eine andere Arbeitsmappe öffnen, deren Name sich immer wieder verändert (Datei ist schreibgeschützt).
Dies habe ich durch Variablen hinbekommen.
Danach möchte ich ein ein bestimmtes Arbeitsblatt dieser Datei auswählen und kopieren. Jedoch zeigt es mir nach Sheet("XXX").Select den Laufzeitfehler 9 "Index außerhalb des gültigen Bereichs" an.
Ich habe schon überprüft, ob beim Arbeitsblatt vor oder hinter dem Wort noch ein Leezeichen o.ä. ist, ist aber nicht der Fall.
Mein CODE: (die Dateien + Pfad habe ich "zensiert" durch XXX, YYY, ZZZ)
Dim WsName, Pfad, teil, a, vFile
Application.ScreenUpdating = False
Pfad = "YYY"
teil = "XXX"
a = Workbooks("ZZZ").Sheets("Infos").Range("B3")
WsName = teil & " " & a & " Need Date" & " CW" & "?.xlsx"
vFile = (Pfad & teil & " " & a & " Need Date" & " CW" & "?.xlsx")
Workbooks.Open Filename:=vFile, ReadOnly:=True
Sheets("H").Select
Weiß jemand, was ich ändern muss?
Vielen Dank im Voraus!
Grüße