E
ericbtz
Guest
Salut le forum
Toujours novice (désolé!) j'ai une liste de numéro sur plusieurs colonnes dont certains commencent par "33". Je souhaiterai créer une macro ou autre qui me recherche touttes les cellules où les deux premiers chiffres sont "33" et me conserve le reste du numéro.
J'ai essayé ce qui suit, mais j'ai des erreurs et évidemment cela ne fonctionne pas. Une ame charitable pourrait elle me conseiller?
Sub ModifierContenu()
Dim vCellule As Object
For Each vCellule In Selection
nbcar (vCellule.Value)
if stxt(vCellule.Value;1;2)=33 then
Stxt(vCellule.Value;3;Nbcar(vCellule.Value)-2)
End If
End Sub
Merci d'avance pour votre concours.
Toujours novice (désolé!) j'ai une liste de numéro sur plusieurs colonnes dont certains commencent par "33". Je souhaiterai créer une macro ou autre qui me recherche touttes les cellules où les deux premiers chiffres sont "33" et me conserve le reste du numéro.
J'ai essayé ce qui suit, mais j'ai des erreurs et évidemment cela ne fonctionne pas. Une ame charitable pourrait elle me conseiller?
Sub ModifierContenu()
Dim vCellule As Object
For Each vCellule In Selection
nbcar (vCellule.Value)
if stxt(vCellule.Value;1;2)=33 then
Stxt(vCellule.Value;3;Nbcar(vCellule.Value)-2)
End If
End Sub
Merci d'avance pour votre concours.