Variable beim Start setzen

[michel34497]

Hallo Leute,
ich möchte gerne eine Variable beim Start vom Programm setzen.
Ich Starte Excel mit meinen Programm, im Startblatt möchte ich jetzt eine Variable setzen die dann solange erhalten bleibt bis sie wieder an einer bestimmten stelle zurück gesetzt wird.
Diese Variable soll entweder ein Wort oder eine Zahl beinhalten.
Ich bevorzuge eine Zahl!
Könnt ihr mir da schon ohne eine Datei helfen?
Noch als Hinweis das Programm durch läuft Mehrere Module.

[Kuwer]

Hallo,

in das VBA-Modul DieseArbeitsmappe kommt dieser Code:

Code:

Private Sub Workbook_Open()
  Me.Worksheets("Startblatt").Cells(Rows.Count, Columns.Count).Value = 42
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
  Dim blnS As Boolean
  blnS = Me.Saved
  Me.Worksheets("Startblatt").Cells(Rows.Count, Columns.Count).Value = ""
  If blnS Then Me.Save
End Sub

Gruß, Uwe

[HKindler]

Hi Uwe,

die BeforeClose-Routine ist doch überflüssig, da der Wert beim nächsten Öffnen doch sowieso neu gesetzt wird...

[snb]

ich möchte gerne eine Variable beim Start vom Programm setzen.

Wozu ?