HERBERS Excel-Forum - das Archiv
Workbook_open
lisa

Hallo zusammen
Ich habe, in der Hoffnung das die Zelle a10 beim öffnen des Workbooks selectiert wird, folgenden COde eingefügt.
Es klappt leider nicht.
Es rührt sich nichts und es gibt auch keine Fehlermeldung.
Kann mir bitte jemand helfen?


Private Sub Workbook_Open()
Range("a10").Select
End Sub


Liebe Grüsse Lisa

AW: Workbook_open
mumpel

Hallo!
Wo steht der Code? Der Code muss in "DieseArbeitsmappe", nicht in ein Standardmodul.
Gruß, Rene

AW: Workbook_open
lisa

Hallo Rene
Ja in der Arbeitsmappe steht der Code, in keinem Modul.
Aber irgendwie keine Reaktion. Habe ich etwas vergessen?
Gruß Lisa

AW: Workbook_open
mumpel

Hast Du die Makrosicherheit geprüft? Die steht standardmäßig auf Hoch. Stelle die Sicherheit auf Mittel.

AW: Workbook_open
lisa

Hallo
Die Sicherheitsstufe steht auf niedrig.
Ist der Code also Richtig so?
Lisa

AW: Workbook_open
Matthias

Hallo Lisa,
Der Code ist eigentlich richtig.
Stell doch mal einen MsgBox-Befehl mit rein, um zu sehen, ob der ausgeführt wird:


Private Sub Workbook_Open()
MsgBox Me.Name
Range("a10").Select
End Sub


Gruß Matthias

AW: Workbook_open
lisa

Ich danke Euch für eure Hilfe
Ich habe es mit der MSG Box ausprobiert, anschließend die Msg Box wieder rausgelöscht, und nur meinen Code über nommen.
Nun auf einmal funktioniert es.
Merkwürdig aber wieder ok.
Danke und liebe Grüße Lisa

AW: Workbook_open
c0bRa

Hio...
Du sprichst kein Tabellenblatt an. Probiers so:
VBA-Code aus Microsoft Excel Objekt DieseArbeitsmappe:
Option Explicit
Private Sub Workbook_Open()
    Sheets(1).Range("A10").Select
End Sub

Rückmeldung nicht vergessen...
c0bRa
Komplexe Probleme haben einfache, leichtverständliche aber falsche Lösungen.