Definition und befüllen von globalen Variablen

hallo liebe forumgemeinde,
in einer excelmappe möchte bei verlassen eines registerblattes, einen bestimmten wert in eine global definierte variable schreiben, damit ich in einem anderen registerblatt (der selben arbeitsmappe) direkt nach diesem wert in der globalen variable suchen und eventuell direkt dorthin (in die zeile mit dem entsprechenden wert) verzweigen kann.
die variable befüllen wollte ich beim ereignis


Private Sub Worksheet_Deactivate()
End Sub

leider bin ich dann aber mit ActiveCell.Select schon im neuen registerblatt. gibt es vielleicht ein besseres ereignis zum befüllen der globalen variable? spontan fiel mir


Private Sub Worksheet_Change(ByVal Target As Range)
End Sub

als geeingetes ereignis ein. das setzt aber voraus das ich was ändere, oder? scheint mir daher eher ungeeignet?
dann habe ich ausserdem probleme mit der deklaration der globalen variable. public st_nr As String hat auf jeden fall nicht funktioniert. wenn ich die hilfe richtig verstanden habe, ist dieses schlüsselwort public eigentlich auch für die deklaration von globalen prozeduren gedacht!?
kann mir jemand helfen, bzw. einen tipp geben, wie ich meine probleme aus meiner excel-welt verbanne?;)
im voraus vielen dank für eure meinungen, tipps, anregungen!
gse

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo "Günter-Siegfried-Eugen" (oder wie mag er heißen?)
Public-Variable müssen in einem Standard-Modul deklariert werden und zwar im Deklarationsteil, also ganz oben, direkt nach "Option Explicit".
StandardModul: im VBA-Editor: einfügen - Modul. Also nicht in dem Klassenmodul der Tabelle oder des Workbooks.
hier zwei Beispiele zür Übergabe von Werten:
1: mit Public:
Im Klassenmodul der Tabelle:


Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'der Public-Variable einen Wert zuweisen:
lngZeile = ActiveCell.Row
'Makro ausführen:
Call Makro
End Sub

im Standardmodul:


Option Explicit
Public lngZeile As Long
Sub Makro()
MsgBox lngZeile
End Sub

2: ohne Public-Variable. Hier wird das Makro in Abhängigkeit der Variable aufgerufen:
Im Klassenmodul der Tabelle:


Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Makro ausführen
Call Makro(ActiveCell.Row)
End Sub

im Standardmodul:


Option Explicit
Sub Makro(lngÜbergabe As Long)
MsgBox lngÜbergabe
End Sub

die zweite Variante finde ich eleganter, zumal du hier auf die Public-Variable verzichten kannst.
Das geht natürlich auch beim Tabellenwechsel und nicht nur beim Worksheet-Change...
Gruß
Christoph

Beliebteste Forumthreads (12 Monate)

Definition und befüllen von globalen Variablen

5 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread