|
Hallo,
ich möchte auf eine andere Excel zugreifen mit mehrern Blättern aber das klappt nicht. Ich kann nur auf ein Blatt zugreifen, alle anderen klappen nicht.
Ich habe verschiedene Varianten ausprobiert aber alle klappen nicht.
Workbooks.Open (Pfad_MatListe), ReadOnly:=True
Set WbDateiMatListe = Workbooks(Mid(Pfad_MatListe, InStrRev(Pfad_MatListe, "\") + 1))
Versuch1:
MsgBox (WbDateiMatListe.Sheets("Übersicht").Range("A5").Value) -> klappt
MsgBox (WbDateiMatListe.Sheets("EWS").Range("A5").Value) ->Fehler Laufzeitfehler ´57121´: Anwendungs- oder objekdefinierter Fehler
Versuch2:
MsgBox (WbDateiMatListe.Sheets(1).Range("A5").Value) -> klappt
MsgBox (WbDateiMatListe.Sheets(2).Range("A5").Value) ->Fehler Laufzeitfehler ´57121´: Anwendungs- oder objekdefinierter Fehler
Versuch3:
For x = 1 To WbDateiMatListe.Sheets.Count
MsgBox (x & WbDateiMatListe.Sheets(x).Name)
Next
->1=klappt "1Übersicht"
->2=Fehler Laufzeitfehler ´57121´: Anwendungs- oder objekdefinierter Fehler
Hat jemand eine Ahnung warum es nicht klappt?
|