Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel [VBA] Recherche d'une cellule dans une colonne avec Find

[VBA] Recherche d'une cellule dans une colonne avec Find

5 réponses
Avatar
HD
Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
FxM
Bonsoir,

Sans garantie : tu nommes les arguments en ayant mis (0, , etc ce qui
laisse supposer que tu les complètes dans l'ordre et à leur position.
Essaie d'enlever la second , pour voir ?

@+
FxM



Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD




Avatar
isabelle
bonjour HD,

essaie comme ça,

x = Range("A1:A65536").Find(What:="0", After:¬tiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
True, SearchFormat:úlse).Row

isabelle


Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD




Avatar
AH60
Bonsoir

Sub LocZéro()
Dim c As Range
With Range("A:A")
Set c = .Find(0, , xlValues, xlWhole, xlByColumns)
MsgBox c.Address
End With
End Sub

Abed_H




Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD





Avatar
JB
Pour positionner le curseur sur la cellule:

On Error Resume Next
Columns(1).Find(0, , , xlWhole).Select
If Err > 0 Then MsgBox "non trouvé"

Pour obtenir l'adresse:

Set temp = Columns(1).Find(0, , , xlWhole)
If Not temp Is Nothing Then MsgBox temp.Address

JB

Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD


Avatar
JB
Positionnement su la cellule;

On Error Resume Next
Columns(1).Find(0, LookIn:=xlValues, LookAt:=xlWhole).Select
If Err > 0 Then MsgBox "non trouvé"

Adresse:

Set temp = Columns(1).Find(0, LookIn:=xlValues, LookAt:=xlWhole)
If Not temp Is Nothing Then MsgBox temp.Address
End Sub

JB

Bonjour,

Je cherche à trouver quelle est la première cellule ayant la valeur 0 dans
ma colonne A. Pour celà j'ai tapée:

ActiveSheet.Columns(1).Find(0, , LookIn:=xlValue, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

Et le problème est que j'ai alors une erreur 91 qui me ressort
systèmatiquement... :-(

Avez vous une idée de ce qui pose problème ?

Merci d'avance pour votre aide
--
@+
HD