Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
832to836
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
832to836
832to836
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Ersetzen

Ersetzen
28.12.2006 11:29:56
Matthias
Hi Forum,
ich habe mal wieder eine Frage:
ich möchte das Datum 2006/01 ersetzen in 2007/01 und danch für alle Monate.
Wie bekomme ich das hin?
Danke
Matthias

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ersetzen
28.12.2006 12:34:00
Peter
Hallo Matthias,
bei VBA gut eigentlich eine erstaunliche Frage, aber so könnte es gehen, wenn deine Werte in Zeile 1 ab Spalte A stehen:
Public

Sub Datum_aendern()
Dim iSpalte  As Integer
Dim sDatum   As String
For iSpalte = 1 To 12
If Left(Cells(1, iSpalte).Value, 4) = "2006" Then
sDatum = "2007" & Mid(Cells(1, iSpalte), 5)
Cells(1, iSpalte).Value = sDatum
End If
Next iSpalte
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige