Puntdroad123
Gebruiker
- Lid geworden
- 22 aug 2016
- Berichten
- 30
Hallo,
Ik ben bezig om bestanden samen te voegen, waarbij wel is vaker bestanden over gezet moeten worden daarom een VBA code.
Het bestand heeft een reeks datums, die nu als 10-10-2020 weergegeven word, maar die ik naar 20201010 aan wil passen.
Nu heb ik de volgende code gevonden die prima werkt voor 1 cel, maar hoe kan ik deze voor een hele kolom gebruiken?
Voorbeeld code:
Sub ConvertDate()
Range("B1").Value = Right(Range("A1").Value, 4) & _
Left(Right(Range("A1").Value, 7), 2) & _
Left(Range("A1").Value, 2)
End Sub
Andere opties zijn natuurlijk ook welkom!
gr Rick
Ik ben bezig om bestanden samen te voegen, waarbij wel is vaker bestanden over gezet moeten worden daarom een VBA code.
Het bestand heeft een reeks datums, die nu als 10-10-2020 weergegeven word, maar die ik naar 20201010 aan wil passen.
Nu heb ik de volgende code gevonden die prima werkt voor 1 cel, maar hoe kan ik deze voor een hele kolom gebruiken?
Voorbeeld code:
Sub ConvertDate()
Range("B1").Value = Right(Range("A1").Value, 4) & _
Left(Right(Range("A1").Value, 7), 2) & _
Left(Range("A1").Value, 2)
End Sub
Andere opties zijn natuurlijk ook welkom!
gr Rick