Trouver une valeur variable
Résolu
louis332
Messages postés
5
Statut
Membre
-
louis332 Messages postés 5 Statut Membre -
louis332 Messages postés 5 Statut Membre -
Bonjour à tous,
N'étant pas encore très expérimenté en VBA, je n'arrive pas à trouver une fonction.
Je veux faire :
Sub essai()
Sheets("feuille1").select
Dim i as Integer
Dim j as Integer
Do While Not (Isempty(Cells(i,4)))
j=cells(i,4).value
sheets("feuille2").select
Ici je voudrais une fonction qui recherche la valeur de la variable j
End Sub
j'ai trouvé la fonction suivante mais je n'arrive pas à faire varier la partie entre guillemets.
(2000256268 est la valeur à un instant T de j)
Cells.Find(What:="2000256268", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Je ne sais pas si je suis très clair.
Merci d'avance pour votre aide.
Louis
N'étant pas encore très expérimenté en VBA, je n'arrive pas à trouver une fonction.
Je veux faire :
Sub essai()
Sheets("feuille1").select
Dim i as Integer
Dim j as Integer
Do While Not (Isempty(Cells(i,4)))
j=cells(i,4).value
sheets("feuille2").select
Ici je voudrais une fonction qui recherche la valeur de la variable j
End Sub
j'ai trouvé la fonction suivante mais je n'arrive pas à faire varier la partie entre guillemets.
(2000256268 est la valeur à un instant T de j)
Cells.Find(What:="2000256268", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Je ne sais pas si je suis très clair.
Merci d'avance pour votre aide.
Louis
A voir également:
- Trouver une valeur variable
- Trouver adresse mac - Guide
- Ou trouver l'adresse ip - Guide
- Trouver une notice - Guide
- Ou trouver la corbeille - Guide
- Ou trouver le trousseau sur iphone - Guide
ca marche mais comment est-ce que je peux faire pour selectionner la cellule au lieu de retourner une msg box?
merci pour ton aide
Grrrrr!!!!!
Pourquoi sélectionner la cellule trouvée?????
il fallait que je selectionne la cellule trouvée car à partir de cette cellule, j'ai plusieurs informations à entrer automatiquement sur la ligne
Merci pour votre aide
- ligne=rngTrouve.Row
- rngTrouve.Offset(x,y).Value=...