Comment faire macro ??

Salut, si comme je le crois tes numéros sont dans une seule colonne, alors ce code devrait suffire si tu remplace le 25 par le nombre de lignes que tu veux traiter et le 1 de Cells(i,1) par le numéro de ta colonne où sont contenus les numéros de téléphones:

Sub ajout8()

For i = 1 To 25
Cells(i, 1).Select
ActiveCell.Value = "8" & ActiveCell.Value
Next i

End Sub

Si ça marche pas, précise un peu... ;-)

salut xjl

la macro fonction bien le probleme et que certaine ligne saute c'est a dire que la ligne 1 a 10 on rajout 8 et de 11 à 12 on rajout pas et encore de 13 a 16 on rajout. j'essayais de faire quelque chose comme ca mais: il me met erreur

Sub ajout8()

For i = 1 To 10 ; 13 to 16 {erreur sur cette ligne}
Cells(i, 2).Select
ActiveCell.Value = "8" & ActiveCell.Value
Next i

End Sub

merci de ton aide xjl

Il vaut mieux tester si la cellule est vide avant de faire l'opération:

Sub ajout8()

For i = 1 To 25
If Cells(i, 1).Value <> "" Then
Cells(i, 1).Select
ActiveCell.Value = "8" & ActiveCell.Value
End If
Next i

End Sub