Globales Array

Hallo Leute,

leider komme ich bei meinem Problem nicht weiter.
Beim öffnen einer Exceldatei möchte ich ein globales Array anlegen, welches ich dann innerhalb der Funktion workbook_open mit Inhalt fülle.
In einem anderen Tabellenblatt möchte ich nun auf das Array zugreifen, allerdings funktioniert es nicht. leider kann ich den Fehler nicht nachvollziehen.

Folgender Code:

Option Explicit

Public Benutzer As Variant

Public Sub Workbook_Open()

Benutzer = Array(„A“, „B“)
end sub

’ --> in tabellenblatt „tabelle1“

public sub test()

If Cells(49, 3) = „1234“ Then
Cells(49, 3) = Benutzer(0)
End if

end sub

fehlermeldung: sub oder function nicht definiert.

kann mir jemand helfen?

besten dank

Grüezi Achim

Das hier muss in ein allgemeines Modul der Mappe, nicht in ‚Diese Arbeitsmappe‘:

Public Benutzer As Variant

Mit freundlichen Grüssen

Thomas Ramel

  • MVP für MS-Excel -

Danke für die Antwort,

trotzdem funktioniert es nicht. ich habe jetzt ein Modul angelegt und die Zeile in ein sub() geschrieben. Jetzt meckert er aber bei workbook_open, dass ein Komplilierungsfehler auftrat :frowning:

Grüezi Achim

trotzdem funktioniert es nicht. ich habe jetzt ein Modul
angelegt und die Zeile in ein sub() geschrieben.

??? Welche Zeile hast Du in ein Sub() geschrieben ???

*bin da leicht verwirrt, da ich davon nix geschrieben hatte*

Jetzt meckert
er aber bei workbook_open, dass ein Komplilierungsfehler
auftrat :frowning:

Und wo genau, was wird angemeckert?

Bitte zeige den vollständigen und klar dokumentierten Code (was genau steht wo in der Mappe).

Tut mir leid, aber mit dermassen spärlichen Informationen kann ich nicht viel anderes als Nachfragen zu stellen…

Mit freundlichen Grüssen

Thomas Ramel

  • MVP für MS-Excel -

Sorry Thomas,

mein Fehler, natürlich war das sub() überflüssig. jetzt funktioniert es.

1000 Dank

Grüezi Achim

mein Fehler, natürlich war das sub() überflüssig. jetzt
funktioniert es.

Na, da bin ich aber froh… :wink:

Mit freundlichen Grüssen

Thomas Ramel

  • MVP für MS-Excel -