Tilføje 0 i enden

Måske ikke den mest elegante måde, men den virker:
Find en tilfældig celle - f.eks. C1 - og Vælg, Formater, Celle, Tekst
I celle C1 indtastes nu 8 nuller "00000000"
Hvis du har dine numre uden nuller i kolonne A fra celle A1 vil formlen i celle B1 være
=VENSTRE(+SAMMENKÆDNING(A1;c$1);8)
Dollartegnet sikrer at du kan kopiere formlen ned i hele kolonne B.

eller en anden udgeve. Alle numre i kolonne a
=HVIS(LÆNGDE(A1)<8;A1*10;A1)

=VENSTRE(A1&"00000000";8)

=IF(LEN(A1)<8;A1&"0";A1)

...som sagt ikke den mest elegante måde. Den må gå til flemming :o)

Ja det må jo være flemmings forslag der virker såfremt tlf 80800000 vises som 808

.. og lasseo's virker jo også, men 6 linjer er jo meget at sætte sig ind i

Det kan også gøres med en makro.... marker cellerne og kør denne her

Sub OtteTegn()
    Dim rCell As Range
    For Each rCell In Selection
        With rCell
            If Len(.Value) < 8 And .Value <> "" Then
                .Value = CStr(Left(.Value & "00000000", 8))
            End If
        End With
    Next rCell
    Set rCell = Nothing
End Sub

flemmingdahl virkede bedst, men lav et svar så deler i kagen