Poniżej makro które do zaznaczonych komórek dodaj literę L z przodu.
Sub dodaj_txt()
Dim c As Range
Dim con, typ As String
typ = TypeName(Selection) 'przypisanie typu zaznaczonego obiektu
If typ = "Range" Then 'jeżeli zaznaczony obiekt nie jest Range to nie wykona procedury łączenia
For Each c In Selection
con = "L" & c.Text
c.Value = con
Next c
Else
MsgBox "Ups! zaznaczyłeś " & typ & ", amiały być komórki :)"
End If
End Sub