Hallo,
Ik wil een macro maken die een letter kan toevoegen aan een cel. Ik heb nu dit:
Dit werkt wel, maar plaatst altijd de letter a voor de inhoud in een cel.
Ik wil eigenlijk dat de letter a alleen geplaatst wordt als de inhoud van de cel begint met een cijfer. Bijv: 1000 wordt dan door de macro a1000
Ik heb natuurlijk al gegoogled, maar kom er niet uit...
Ik wil een macro maken die een letter kan toevoegen aan een cel. Ik heb nu dit:
Code:
Sub Add_Asterisk(
Dim r As Range
With Selection
For Each r In Selection
r.Value = "a" & r.Value
Next
End With
End Sub
Dit werkt wel, maar plaatst altijd de letter a voor de inhoud in een cel.
Ik wil eigenlijk dat de letter a alleen geplaatst wordt als de inhoud van de cel begint met een cijfer. Bijv: 1000 wordt dan door de macro a1000
Ik heb natuurlijk al gegoogled, maar kom er niet uit...
Laatst bewerkt door een moderator: