Macro qui automatise le CTRL+H "Rechercher/Remplacer par"

[fd.30]

Bonjour à tout le monde,

Bonjour à tous

Je voudrais une macro qui automatise le CTRL+H "Rechercher/Remplacer par"

En colonne A, les valeurs à remplacer par les valeurs correspondantes de la colonne B

Voir en PJ


Merci à vous de votre aide

FD

 

[Catrice]

Re : Macro qui automatise le CTRL+H "Rechercher/Remplacer par"

Bonsoir,

Pas sur d'avoir bien compris, à tester :

Sub Test()
With Sheets("   Global    ")
    For Each X In .Range("A2:" & .Range("A65536").End(xlUp).Address)
        X.Value = X.Offset(0, 1).Value
    Next
End With
End Sub