Recherche et efface
Résolu/Fermé
Ju@nita
Messages postés
149
Date d'inscription
mardi 11 juin 2013
Statut
Membre
Dernière intervention
8 août 2024
-
19 juil. 2017 à 16:02
Ju@nita Messages postés 149 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 8 août 2024 - 19 juil. 2017 à 16:16
Ju@nita Messages postés 149 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 8 août 2024 - 19 juil. 2017 à 16:16
A voir également:
- Recherche et efface
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Rechercher ou entrer l'adresse mm - recherche google - Guide
- Recuperer message effacé whatsapp - Guide
- Récupérer un numéro de téléphone effacé - Accueil - Android
- Recherche adresse - Guide
2 réponses
Unombre
Messages postés
40
Date d'inscription
lundi 11 juillet 2016
Statut
Membre
Dernière intervention
8 septembre 2017
16
19 juil. 2017 à 16:09
19 juil. 2017 à 16:09
Bonjour
Ce code remplace les valeurs en C quand en B il y a INTERNET par une cellule vide
(Il ne fonction que si la colonne B ne possède pas de cellule vide)
(Fait une sauvegarde avant de lancer la macro)
Sub test() Do valeurB = Sheets("feuil1").Cells(2 + i, 2).Value If valeurB = "INTERNET" Then Sheets("feuil1").Cells(2 + i, 3).Value = "" End If i = i + 1 Loop While valeurB <> "" End Sub
Ce code remplace les valeurs en C quand en B il y a INTERNET par une cellule vide
(Il ne fonction que si la colonne B ne possède pas de cellule vide)
(Fait une sauvegarde avant de lancer la macro)
Ju@nita
Messages postés
149
Date d'inscription
mardi 11 juin 2013
Statut
Membre
Dernière intervention
8 août 2024
19 juil. 2017 à 16:16
19 juil. 2017 à 16:16
ça marche !!! merci beaucoup