Här kommer ett VBA-Makro som du kan lägga in i din VBA-modul om du hellre föredrar det sättet:
Första parametern motsvarar cell A6 och andra parametern motsvarar cell A7 och tredje parametern är valfri sträng m du vill visa i slutet av postnummret. Jag har lagt upp detta som strängvärden men det funkar lika bra om du använder talvärden enligt mina preliminära tester.
Kod:
function AddCharAtEnd(FirstValue as String, CompareToValue as String, StringToAdd as String) as string
if (FirstValue<>CompareToValue) then
AddCharAtEnd = FirstValue & StringToAdd
else
AddCharAtEnd = FirstValue
endif
end function
Anropet till makrot i cell B6 kommer att se ut så här:
Kod:
=AddCharAtEnd(A6;A7;"*")
Kopiera denna cell neråt så mycket du behöver så får du rätt resultat.