Methode Auswahl des Objekts '_Worksheet' ist fehlgeschlagen - warum?

Question

Set mainWB = Workbooks("Copy Paste.xlsb") 
Set mainWS = mainWB.Sheets("Sheet1") 
Set testWS = mainWB.Sheets("Sheet3") 

mainWS.Select 

Ich erhalte einen Fehler in der letzten Zeile in Excel VBA:

"Methode Select des Objekts '_Worksheet' ist fehlgeschlagen"

Jede Idee, warum oder wie man dieses Problem lösen? Vielen Dank!

Answer 1

Wie in den Kommentaren besprochen, kann Sheets in VBA nicht ausgewählt werden, die nicht aktiv sind (oder Range Objekte auf ihnen).

Zum Beispiel der Code folgende

Sheets(1).Activate 
Sheets(2).Range("A1").Select 

wird den Fehler verursachen Sie empfangen.

In Ihrem Fall scheint es Ihnen Select ein Blatt, das nicht aktiv versuchen, ist - Ihr mainWS Objekt ist vermutlich nicht der ActiveSheet an dem Punkt Sie diesen Code aufrufen. Eine einfache Möglichkeit zu testen, ob dies geschieht, ist, wenn Sie das folgende an das Ende des Codes hinzufügen:

if (ActiveSheet.Name <> mainWS.Name) then 
    msgbox ("Going to crash after clicking ok!") 
end if 
mainWS.Select 

Beachten Sie, dass Sie auf das aktivierte Arbeitsblatt mit dem Befehl beziehen ActiveSheet entweder Eigenschaften zu erhalten oder was auch immer andere Operationen Du bist daran interessiert.

Dieser Fehler kann auch auftreten, wenn Sie eine Schleife durch alle Arbeitsblätter in der Arbeitsmappe arbeiten und es ausgeblendete Blätter gibt. Achten Sie darauf.

---

Last, und in keinem Zusammenhang mit Ihrer spezifischen Fehlermeldung, gehe ich davon aus Sie diese Variablen irgendwo deklarieren und einfach haben sie hier nicht kopieren - wenn ich nicht in Betracht ziehen würden mit Option Explicit, wie Sie oft in alle möglichen Probleme laufen ohne Option Explicit an der Spitze Ihres VBA-Codes.

Answer 2

Während ich mit der oben einverstanden ist, ist es auch wichtig zu beachten, dass die Löschfunktion funktioniert nicht, wenn die Sicht des Arbeitsblatts derzeit xlSheetVeryHidden gesetzt