Lesehilfe (Fadenkreuz)

Hallo,

erstmal wünsche ich allen Usern dieses Brettes ein frohes neues Jahr.

Und hier mein Anliegen, nicht immer prüfen Excel-Experten ihre Postfächer. Deshalb möchte ich folgendes Makro beim Öffnen einer Excel-Mappe automatisch starten. Wie mache ich das am besten *g*

LG Marion

Sub Hinweis
Dim Werte, W As Integer, Satz as String, Werte2, Titel as String
Werte = Array(61,20,25,25,26,85,39,16,28,27,29,20,7,17,89,85,49,0,85,29,20,6,1,85,37,26,6,1,85,57,50,85,56,20,7,28,26,27)
Werte2 = Array(57,16,6,16,29,28,25,19,16)
For W = 0 To UBound(Werte2)
Titel = Titel & Chr(Werte2(W) Xor 117)
Next W
For W = 0 To UBound(Werte)
Satz = Satz & Chr(Werte(W) Xor 117)
Next W
MsgBox Satz, 48, Titel
End sub

Hallo,

habe die Lösung bereits gefunden. Vielen Dank für eure Mühe.

LG Marion

habe die Lösung bereits gefunden. Vielen Dank für eure Mühe.

Hallo Marion,

sehr schön, daß wir dir so schnell helfen konnten :smile:)

Lieben Gruß
Reinhard