Macro
Résolu/Fermé
Dutech
-
14 sept. 2015 à 14:25
Kuartz Messages postés 850 Date d'inscription vendredi 13 février 2015 Statut Membre Dernière intervention 15 février 2019 - 16 sept. 2015 à 09:31
Kuartz Messages postés 850 Date d'inscription vendredi 13 février 2015 Statut Membre Dernière intervention 15 février 2019 - 16 sept. 2015 à 09:31
A voir également:
- Macro
- Macro word - Guide
- Macro logiciel - Télécharger - Organisation
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro recorder - Télécharger - Confidentialité
- Tri automatique excel sans macro ✓ - Forum Excel
1 réponse
Kuartz
Messages postés
850
Date d'inscription
vendredi 13 février 2015
Statut
Membre
Dernière intervention
15 février 2019
61
14 sept. 2015 à 16:27
14 sept. 2015 à 16:27
Bonjour,
Voici un code :
Cordialement.
Voici un code :
Sub TEST()
Dim DL As Long
DL = Cells(Application.Rows.Count, 1).End(xlUp).Row 'A supposer que la colonne de référence pour votre dernière ligne soit la colonne A
For i = 1 To DL 'A supposer que la vérif commence à la ligne 1
If Application.Search("ABC D", Range("G" & i)) = True Then
Range("G" & i) = Replace(Range("G" & i), "ABC D", "")
End If
If application.Saerch("ABC", Range("G" & i)) = True Then
Range("G" & i) = Replace(Range("G" & i), "ABC", "")
End If
Next i
End Sub
Cordialement.
15 sept. 2015 à 11:38
15 sept. 2015 à 11:40
Du coup entre ce que j'ai vu sur le net et ta macro je vais pouvoir bidouiller pas mal de chose je pense.
16 sept. 2015 à 09:31
N'hésite pas à me MP si tu as une question. Si je sais y répondre, je serais ravi de t'aider. Passe le sujet en résolu s'il te plaît.
Cordialement.