Sélectionner plusieurs cellule avec une macro

Fermé
athol - 17 avril 2009 à 16:43
thev Messages postés 1854 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 3 mai 2024 - 20 avril 2009 à 17:00
Bonjour,

J'ai un petit problème, j'ai une plage de donnée avec différente variable à l'intérier et je voudrais qu'une macro me sélectionne toutes les cellules qui contienne le même texte.

Par exemple :

A B C D
1 G
2 A G
3 G
4 F F

Donc dans la plage A1:D4 sélectionner toutes les cellule qui contienne la lettre "G".

Je sais pas si je suis très clair. Merci de d'avance de vos réponses.
A voir également:

5 réponses

thev Messages postés 1854 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 3 mai 2024 683
17 avril 2009 à 20:19
Set cellule = Range("A1:D4").Find("G", LookIn:=xlValues)
Set à_sélectionner = Range(cellule.Address)
For i = 1 To Range("A1:D4").Count
Set cellule = Range("A1:D4").FindNext(cellule)
Set à_sélectionner = Union(à_sélectionner, Range(cellule.Address))
Next
à_sélectionner.Select
0
Merci beaucoup, c'est tout à fait ce que je recherchais.

Cependant il me reste un problème : J'ai différentes variables à tester et il se peut que quand je lance ma macro certaines ne soient pas encore référencées et pour l'instant quand j'exécute ce code j'ai un message qui apparait ("variable objet ou variable de bloc with non défénie") lorsqu'il cherche des variable non référencer.

Comment je peut faire pour que cette partie du code soit ignorer si la variable rechercher n'est pas référencées et que le reste continu à s'exécuter?
0
thev Messages postés 1854 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 3 mai 2024 683
18 avril 2009 à 09:51
pour tester une variable référencée : if not isempty(variable)
0
Merci, mais où dois-je le palcer dans le code pour que sa fonctionne?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
thev Messages postés 1854 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 3 mai 2024 683
20 avril 2009 à 17:00
si la variable est par exemple : var1
if not isempty(var1) then
----- code faisant référence à var1 ------
end if
0