zelle bei "speichern unter" fix!!!
03.02.2005 14:37:23
Martin
heute Vormittag habe ich mir von Matthias helfen lassen bei jedem Öffnen einer Datei bei einer Zelle 1 zu addieren. Klappt jetzt auch wunderbar, nur gibt es jetzt ein Problem: Sobald die Datei/der Rohling einmal unter anderem Namen gespeichert wird, soll der Zellinhalt so bleiben. Dieses Makro soll also nur bei dem Ursprungsrohling angewendet werden. So sieht mein Makro jetzt aus:
Private Sub Workbook_Open()
With ThisWorkbook.Sheets("Tabelle1").Range("c17")
.Value = .Value + 1
End With
ThisWorkbook.Save
End Sub
Bin für jede Hilfe dankbar!!
Liebe Grüße,
Martin