Recherche de l'adresse d'une cellule - VB/VBA/VBS - Programmation
Marsh Posté le 19-07-2006 à 15:32:23
salut
utilise plutot le fonction de reherche find, soit pour récuperer l'adresse :
Workbooks(NomFichierMesures).Worksheets(NomFeuilleMesures).Cells.Find(What:="tr/min" ).Address
Marsh Posté le 19-07-2006 à 15:56:57
DamienCYS a écrit : salut |
Merci ça marche bien mais ça me donne une adresse de type $B$3 or j'ai besoin de me reservir de cette adresse par la suite avec cells(x, y) par exemple.
Marsh Posté le 19-07-2006 à 15:58:27
surikat14 a écrit : Merci ça marche bien mais ça me donne une adresse de type $B$3 or j'ai besoin de me reservir de cette adresse par la suite avec cells(x, y) par exemple. |
tu peux très bien récuperer cette adresse et lui appliquer la fonction .column et .row pour connaiter les valeurs en mode cells(x,y)
Marsh Posté le 19-07-2006 à 16:10:24
je ne sait pas ce que tu veux faire avec mais comme le dit jpcheck tu peux recuperer les ref ou faire un select et utiliser ensuite utiliser Activecell
Marsh Posté le 19-07-2006 à 15:27:20
Bonjour tout le monde !!
J'ai un petit souci.
J'ai une cellule avec "tr/min" dedans et je recherche son adresse. Je débute m'en voulez pas mais j'avais pensé à ça :
lignD = 0
colD = 1
Do
Do
lignD = lignD + 1
Loop Until Workbooks(NomFichierMesures).Worksheets(NomFeuilleMesures).Cells(lignD, colD).Value = "tr/min"
ligndep = lignD
lignD = 1
colD = colD + 1
Loop Until CellRech = Workbooks(NomFichierMesures).Worksheets(NomFeuilleMesures).Cells(lignD, colD).Value = "tr/min"
Mais bien entendu, ça ne marche pas et je ne sais pas pourquoi...
Merci de votre aide !