Visual basic boucle
ibral
-
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention -
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je cherche une boucle qui cherche et remplace une chaine de caractère dans un fichier excel.
Exemple : je cherche la chaine « jjmmaa » et la remplacer par « 010110 » et si je trouve « SAAMMJJ » la remplacer par « 1100101 ».
Merci d'avance.
Je cherche une boucle qui cherche et remplace une chaine de caractère dans un fichier excel.
Exemple : je cherche la chaine « jjmmaa » et la remplacer par « 010110 » et si je trouve « SAAMMJJ » la remplacer par « 1100101 ».
Merci d'avance.
A voir également:
- Visual basic boucle
- Visual basic - Télécharger - Langages
- Visual basic editor - Télécharger - Langages
- Visual petanque - Télécharger - Sport
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
1 réponse
Bonjour,
Supposons la recherche et changement dans la colonne A (tu ne précise rien)
A+
Supposons la recherche et changement dans la colonne A (tu ne précise rien)
Sub Remplacer()
Dim Lig As Long
For Lig = 1 To Range("A65535").End(xlUp).Row
If Cells(Lig, 1) = "jjmmaa" Then
Cells(Lig, 1) = "'010110"
ElseIf Cells(Lig, 1) = "SAAMMJJ" Then Cells(Lig, 1) = "'1100101"
End If
Next Lig
End Sub
A+
