Discussion :

[didami]

bonjour a tous
je voulais savoir comment peut on parcourir une ligne d'un fichier excel dans le but de trouver un elelement donné.
parcourir une colonne c'est evident avec une simple incrementation puisque les elements d'une colonne sont identifiés par des nombre et ce n'est pas le cas d'une ligne dont les elements sont identifiés par des lettre.
une idée svp .
merci a tous

[AlainTech]

Dans VBE (l'éditeur VBA):
Cells +

[AlainTech]

Et pourrais-tu répondre à cette question:
http://www.developpez.net/forums/sho...9&postcount=14
Merci.

[didami]

salut
j'ai changer de pseudo parsque dadou2002 ne me plaisait pas
didami est plus court et mieux je trouve.
d'ailleur je n'utilise plus l'ancien pseudo
c tout il n'ya pas d'nteret
concernant ma question j'ai oublier de montioner que je programme avec VB6
et non pas en VBA

si je trouve quelque chose je le metterai sur le forum
en attendant toute suggestion est la bienvenue
merci

[AlainTech]

concernant ma question j'ai oublier de montioner que je programme avec VB6
et non pas en VBA

Même si tu programmes en VB6, tu manipules des objets Excel.
Or, pour savoir comment les manipuler, rien de tel que l'aide de VBA.
D'où mon conseil.
Mais tu es libre de ne pas le suivre, bien entendu...

[didami]

merci pour le conseil ,je vais jeter un coup d'oeuil dessus,
@+

[LeXo]

bha si c pareil

Code :

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

1
2
3
4
5
6
7
8
9
10
dim maLigne as integer
dim col as integer
maLigne=4
 
 
for col=1 to 300
if exsht.cells(maLigne,col)=8 then
msgbox "jai trouve ma variable"
end if
next col

[zazaraignée]

Si c'est pour une recherche, tu peux boucler sur un objet Range avec un for Each

Code :

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

1
2
3
4
5
Dim cellule As Range
For Each cellule In Range("B4:IV4")
    If LCase(cellule.Value) = "toto" Then _
        MsgBox "Toto est à la cellule " & cellule.Address
Next

Cette boucle trouve tous les totos de la ligne peu importe s'ils sont en minuscules ou en majuscules.

[didami]

merci,
je vais la tester et je vous dirais si elle a resolu mon probleme ou pas
: