Zähler in Excel
21.01.2008 12:19:00
Torge
Frage: Wie kann ich folgenden Code für Excel anpassen?
If TextBox1 = "" Then TextBox1 = "0000/08"
TextBox1 = Format(CInt(Left(TextBox1, InStr(TextBox1, "/") - 1)) + 1, "0000") & "/08"
Dort sind es ja keine Textfelder, sondern Zellen mit Value-Eigenschaften. Habe es versucht und die Bezeichnung TexBox1 mit Worksheets("Tabelle1").Cells(21, 3).Value ausgetauscht aber funktioniert nicht.
Vielleicht kann jemand weiter helfen.
Danke T.