Wenn Zelle dann...
01.02.2023 15:12:31
Antonio
mit diesem Code von GerdL, habe die Zelle ermittelt mit nur ein String und ergänzt,
Sub Unit() Dim C As Range For Each C In Range("A1:A99") If Not IsNumeric(C) Then If Len(C) = 1 Then C = C.Value & " Insel" End If End If Next End Subjetzt habe in der Tabelle noch ein Problem, das in manche zelle ein Punkt ist als Platzhalter,
wie kann ich den Punkt als leere zelle angeben?
Vielen Dank im Voraus
LG Antonio