Recherche et Exception VBA
Résolu/Fermé
A voir également:
- Recherche et Exception VBA
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Rechercher ou entrer l'adresse mm - recherche google - Guide
- Recherche et remplacer word - Guide
- Recherche adresse - Guide
- Incompatibilité de type vba ✓ - Forum Programmation
2 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
Modifié par Patrice33740 le 3/11/2011 à 17:11
Modifié par Patrice33740 le 3/11/2011 à 17:11
La bonne syntaxe :
Cordialement
Patrice
Set c = Columns(1).Find(base & ".*", LookIn:=xlValues, lookat:=xlWhole)(Le set est obligatoire et le lookat est nécessaire pour éviter la sélection de ZONIX1.XX)
Cordialement
Patrice
Bonjour,
Merci Patrice33740 :D
J'ai une liste plus précise pour ma colonne de recherche :
BARRE-1
BARRE-1.1
BARRE-1.2
BARRE-11
BARRE-12
J'ai utilisé le mode de recherche de Patrice : base & ".*" mais il me les trouve tous alors que je voudrais qu'il ne trouve que (BASE = BARRE-1) :
BARRE-1
BARRE-1.1
BARRE-1.2
Merci Patrice33740 :D
J'ai une liste plus précise pour ma colonne de recherche :
BARRE-1
BARRE-1.1
BARRE-1.2
BARRE-11
BARRE-12
J'ai utilisé le mode de recherche de Patrice : base & ".*" mais il me les trouve tous alors que je voudrais qu'il ne trouve que (BASE = BARRE-1) :
BARRE-1
BARRE-1.1
BARRE-1.2
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
7 nov. 2011 à 14:31
7 nov. 2011 à 14:31
Il faut 2 recherches
une pour la base :
base = "BARRE-1"
Set c = Columns(1).Find(base, LookIn:=xlValues, lookat:=xlWhole)
puis une autre pour les dérivés,
base = "BARRE-1"
Set c = Columns(1).Find(base & ".*", LookIn:=xlValues, lookat:=xlWhole)
une pour la base :
base = "BARRE-1"
Set c = Columns(1).Find(base, LookIn:=xlValues, lookat:=xlWhole)
puis une autre pour les dérivés,
base = "BARRE-1"
Set c = Columns(1).Find(base & ".*", LookIn:=xlValues, lookat:=xlWhole)