ich möchte gern Spalteneinträge in Text formatieren, dazu soll zuvor die Spalte als Buchstabe abgefragt werden, jedoch bekomme ich das nicht wie gewünscht hin.
dazu habe ich bisher folgendes gefunden:
Sub ZahlenwerteAlsTextFormatieren()
Dim Zelle As Range
Dim Speicher As String
Dim Abfrage As String
Abfrage = InputBox("gib den Buchstabe der Spalte ein, die in das Textformat umgewandelt werden _
soll")
For Each Zelle In Range("I2:I" & Cells(Rows.Count, "I").End(xlUp).Row)
If Zelle "" Then
Speicher = Zelle.Value
Zelle.Value = Speicher
Zelle.NumberFormat = "@"
End If
Next Zelle
End Sub
wer kann mir dabei helfen, dass der Spaltenbuchstabe in der Inpubox den Bereich vorgibt, am besten sogar die Inputbox auf nur einen Buchstaben begrenzt!?