Umgang mit mehreren Blättern
09.05.2017 09:30:05
Michi
ich habe ein Problem beim Ausführen von VBA-Code auf eine Excel-Datei mit mehreren Blättern. Ich versuche zwar am Anfang der Prozedur immer das richtige Blatt zu setzen, aber irgendwie scheint das noch nicht zu fliegen.
Konkret: Ich habe 3 Blätter und starte bei Ausführung meines VBA-Skripts auf Blatt 1. Nun werden der Reihe nach die Inhalte auf allen Blättern editiert/befüllt und am Ende der Bearbeitung eines jeden Blatts möchte ich den Fokus auf der Zelle A1 haben (reine Geschmackssache).
Für Blatt 1 funktioniert auch der Aufruf meiner Prozedur. Bei Blatt 2 gibts dann aber schon einen Fehler.
So sieht meine Prozedur aus:
Sub Fokus(Zelle As String, Blatt As String)
Dim sht As Worksheet
Set sht = Sheets(Blatt)
sht.Range(Zelle).Select
End Sub
Call Format.Fokus("A1", "Tab 1")
Call Format.Fokus("A1", "Tab 2")
Call Format.Fokus("A1", "Tab 3")
Gibt es eine andere Möglichkeit als über .Select den Fokus auf die Zelle zu setzen?
Danke vorab!
M