Trouver une valeur variable

Résolu/Fermé

louis332 Messages postés 5 Date d'inscription lundi 18 novembre 2013 Statut Membre Dernière intervention 19 novembre 2013 - 18 nov. 2013 à 17:02
louis332 Messages postés 5 Date d'inscription lundi 18 novembre 2013 Statut Membre Dernière intervention 19 novembre 2013 - 19 nov. 2013 à 09:37

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

A voir également:

Trouver une valeur variable
Trouver adresse mac - Guide
Trouver une adresse - Guide
Comment trouver le mot de passe wifi sur son téléphone - Guide
Trouver un film sans le titre - Télécharger - Divers TV & Vidéo
Ou trouver mon adresse ip - Guide

2 réponses

Réponse 1 / 2

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 759
18 nov. 2013 à 17:21

Bonjour,

Utilises la même méthode, Find, avec ta variable j.
Exemple :

Dim rngTrouve As Range

Set rngTrouve = Cells.Find(j, LookAt:=xlWhole)
If Not rngTrouve Is Nothing Then
    MsgBox rngTrouve.Address
End If

louis332 Messages postés 5 Date d'inscription lundi 18 novembre 2013 Statut Membre Dernière intervention 19 novembre 2013
18 nov. 2013 à 17:39

Merci Franck,
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

Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
18 nov. 2013 à 17:57

rngTrouve.Select

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 759
19 nov. 2013 à 07:58

Salut,
Grrrrr!!!!!

Pourquoi sélectionner la cellule trouvée?????

louis332 Messages postés 5 Date d'inscription lundi 18 novembre 2013 Statut Membre Dernière intervention 19 novembre 2013
19 nov. 2013 à 09:24

Merci Zoul67, merci Franck ca marche

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

Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
19 nov. 2013 à 09:32

Comme le sous-entend Franck, pas besoin de sélectionner la cellule pour autant, par exemple :
- ligne=rngTrouve.Row
- rngTrouve.Offset(x,y).Value=...

Réponse 2 / 2

Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
18 nov. 2013 à 17:04

Bonjour,

Je ne sais pas si je suis très clair.
En tout cas, je ne comprends pas.

A+

louis332 Messages postés 5 Date d'inscription lundi 18 novembre 2013 Statut Membre Dernière intervention 19 novembre 2013
18 nov. 2013 à 17:10

haha pas facile de s'exprimer:
La variable "j " peut prendre des valeurs différentes. je veux une fonction qui trouve dans la feuille2 la cellule contenant la valeur de j.
La seule fonction que je connais me permet de trouver une valeur fixe mais pas de valeur variable.

Discussions similaires

je cherche la date et le lieu de naissance d une personne

rechercher un nom avec l'adresse

additionner nombres dans cellules avec texte

trouver une date de naissance