Auto_Open

Computer: Software & Programmierung Visual Basic
#1

Hallo,

in einer Mappe (Excel 2003, Vista) habe ich die Auto_Open-Prozedur. In dieser wird mit Application.OnEntry = „xyz“ die Sub xyz scharf gemacht, so dass auf Eingaben in Zellen reagiert werden kann.
Damit habe ich div. Probleme:

  1. Beim Öffnen der Mappe, in der diese Auto_Open definiert ist, wird diese offensichtlich nicht ausgeführt, denn Sub xyz wird nicht aufgerufen, bzw. das was xyz machen soll wird nicht gemacht. Mache ich dann im VBA-Editor F5 (Ausführen), dann geht es anschliessend.
    Was ist da faul?
  2. Sub xyz wird auch aus anderen, gerade aktiven Mappen aufgerufen, was aber nicht sein soll.
    Wie kann ich das auf die eine Mappe beschränken?

Danke
Laika

#2

Hallo Laika,

in einer Mappe (Excel 2003, Vista) habe ich die
Auto_Open-Prozedur. In dieser wird mit Application.OnEntry =
„xyz“ die Sub xyz scharf gemacht, so dass auf Eingaben in
Zellen reagiert werden kann.

k.A. was du da machst, ich hab in XL2000 kein OnEntry gefunden

  1. Sub xyz wird auch aus anderen, gerade aktiven Mappen
    aufgerufen, was aber nicht sein soll.
    Wie kann ich das auf die eine Mappe beschränken?

Nimm nicht Auto_Open sondern
Private Sub Workbook_Open()
im Modul „DieseArbeitsmappe“

Gruß
Reinhard

Danke
Laika

#3

in einer Mappe (Excel 2003, Vista) habe ich die
Auto_Open-Prozedur. In dieser wird mit Application.OnEntry =
„xyz“ die Sub xyz scharf gemacht, so dass auf Eingaben in
Zellen reagiert werden kann.

Hallo Laika,

OnEntry gabs bei XL97, bei XL2000 wird in der Hilfe vorgeschlagen stattdessen das Change-Ereignis zu nehmen.
Also
Private Sub Worksheet_Change(ByVal Target As Range)
im Modul des jeweiligen Blattes.

Gruß
Reinhard

#4

Hallo Reinhard,

k.A. was du da machst, ich hab in XL2000 kein OnEntry gefunden

Ja, ich finde auch nix. Aber das gibt es, habe es aus einem Buch. Excel/VBA kennt das auch: Ich schreibe grundsätzlich klein, wenn es ein gültiges Schlüsselwort ist, macht VBA die richtigen Buchstaben automatisch groß: „onentry“ ==> „OnEntry“.
Es funktioniert ja auch, zu Frage 1 habe ich inzwischen gefunden, dass es funktioniert, WENN ich die Mappe manuell aufmache, wogegen es nicht funktioniert, wenn sie durch ein "Workbooks.Open Filename:= „…“ mache … Microsoft eben …

Nimm nicht Auto_Open sondern
Private Sub Workbook_Open()
im Modul „DieseArbeitsmappe“

Funktioniert bei mir nicht. Vielleicht kümmere ich mich mal bei Gelegenheit drum.

Danke erstmal
Laika

#5

OnEntry gabs bei XL97, bei XL2000 wird in der Hilfe
vorgeschlagen stattdessen das Change-Ereignis zu nehmen.
Also
Private Sub Worksheet_Change(ByVal Target As Range)
im Modul des jeweiligen Blattes.

„Worksheet_Change“ markieren => F1 => „Schlüsselwort nicht gefunden“ …

So, jetzt muss ich mal wieder was Produktives an meiner Kiste machen :wink:)

Gruss
Laika

#6

OnEntry gabs bei XL97, bei XL2000 wird in der Hilfe
vorgeschlagen stattdessen das Change-Ereignis zu nehmen.
Also
Private Sub Worksheet_Change(ByVal Target As Range)
im Modul des jeweiligen Blattes.

„Worksheet_Change“ markieren => F1 => „Schlüsselwort nicht
gefunden“ …

So, jetzt muss ich mal wieder was Produktives an meiner Kiste
machen :wink:)

Hallo Laika,

wenn du dir dieses Bild anschaust so ist das was Produktives :smile:

http://www.bilder-space.de/show.php?file=10.12inXQ5x…

Du siehst da rechts in der Liste die Ereignisse des Worksheets.

Gruß
Reinhard