OLE Excel - Utilisation de "Find" "FindNext" sur une plage de cellule [Résolu]

remus08 · 03/02/2012, 10h54

Bonjour à tous,

Je cherche à effectuer une recherche sur une colonne d'un de mes classeur excel à l'aide de "Find" et "FindNext"

Je me suis inspiré du très bon tuto dispo ici

Code :

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

1
2
Variant vCell;
vCell = vRange.OleFunction("Find", "ricky81"); // recherche de la valeur "ricky81"

Celà fonctionne bien, je teste si j'ai résultat à l'aide de "IsEmpty" mais je voulais connaitre la ligne de mon tableau excel qui a trouvé le résultat avant de continuer ma recherche avec "FindNext".
Ma question est : comment je peux accéder au numéro de ligne du Variant vCell?

Merci d'avance de votre aide

remus08

ShaiLeTroll · 03/02/2012, 13h27

Cell est une Range de dimension 1x1 avec des propriétés comme Column ou Row

remus08 · 03/02/2012, 22h47

Merci Shai.
C'était trop simple, pour que j'y pense

Code :

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

tmpLineFound = vCell.OlePropertyGet("Row");

parfait le lien vers la MSDN, j'ai trouvé quelques trucs qui vont m'aider

03/02/2012, 13h27	#2
ShaiLeTroll Expert Confirmé Sénior Développeur C++\Delphi Inscription : juillet 2006 Messages : 7 845 Détails du profil Informations personnelles : Sexe : Âge : 31 Localisation : France Informations professionnelles : Activité : Développeur C++\Delphi Secteur : High Tech - Électronique et micro-électronique Informations forums : Inscription : juillet 2006 Messages : 7 845 Points : 10 549 Points : 10 549	Cell est une Range de dimension 1x1 avec des propriétés comme Column ou Row __________________ Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y ! Attention Troll Méchant ! "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer ! L'ignorance n'excuse pas la médiocrité ! L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde) Il faut avoir le courage de se tromper et d'apprendre de ses erreurs Parisien ! Dites NON à la VO ST au Cinéma ! Soit VF Soit VO sans sous-titre
	00

03/02/2012, 22h47	#3
remus08 Invité régulier remus08 Inscription : juillet 2010 Messages : 26 Détails du profil Informations personnelles : Nom : remus08 Informations forums : Inscription : juillet 2010 Messages : 26 Points : 5 Points : 5	Merci Shai. C'était trop simple, pour que j'y pense Code : Sélectionner tout - Visualiser dans une fenêtre à part tmpLineFound = vCell.OlePropertyGet("Row"); parfait le lien vers la MSDN, j'ai trouvé quelques trucs qui vont m'aider
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email