Discussion :

[richou]

bonjour
Je voudrais faire une recherche dans un colonne (colonne B) de ma feuille. Je recherche la 1 ere cellule fide à partir de la cellule "B8"
J'utile MaVar= Worksheets(2).Columns(2).Find("", ....... et apres je ne sais pas quoi mettre car quand je met "B8" ca plante. Voila donc si qqun à la solution je suis preneur.
Merci d'avance

[Megaxel]

Salut,
au lieu d'utiliser Find, je ferais ça:
tu déclares une variable de type Range, et tu l'initialises à B8.
Puis, dans une boucle testant le contenu, tu fais un Offset(1,0) sur ta cellule variable, jusqu'à ce que tu en trouves une vide.
Sinon, peut-être que l'utilisation de la fonction "End()" pourrait répondre à ta question plus simplement. Regarde son fonctionnement, ça pourrait te plaire.

[richou]

ok merci bien je vais regarder ça!

[Megaxel]

Allez, je suis en forme... Regarde ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub TestEnd()
    Dim MaCellule As Range
    Set MaCellule = Cells(8, 2)
    Set MaCellule = MaCellule.End(xlDown)
    MaCellule.Offset(1, 0).Select
End Sub

Qu'est-ce que tu en penses?

[richou]

impeccable t'es un chef!!!!
merci bien, sympas

[Megaxel]

Méfie-toi, je ne suis pas tous les jours aussi sympa.
En particulier, si tu ne cliques pas sur le bouton , ça me mettrait de mauvaise humeur.

[richou]

voila voila pour ne pas te facher!!!