Discussion :

[Corlo]

J'ai un problème. Je recherche la valeur d'une cellule en fonction d'une variable qui désigne le numéro d'une colonne.
En effet, si la variable est la ligne on écrit par exemple :

Code :

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

1
2
3
4
i = 1
while feuil.range("A" & i).Text <> valeur
        i = i + 1
wend

Mais je ne trouve pas la solution pour une colonne.
J'ai testé çà mais çà ne marche pas :

Code :

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

1
2
3
4
5
6
i = 2
While Feuil2.Range("ColLettre(i)" & "5") <> largeur
      i = i + 1
Wend
 
TextBox19 = Feuil2.Range("ColLettre(i)" & 7)

ColLettre étant une fonction permettant de récupérer la lettre de la colonne (cette fonction fonctionne correctement car avec des msgbox elle m'affiche bien le résultat voulu).

Quelqu'un connaitrait la syntaxe ?

[random]

range(cell te permet d'adresser ligne colonne

[Corlo]

Je cherche la syntaxe :

Code :

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

While Feuil2.Range(Cells("ColLettre(i)" & "5")) <> largeur

Erreur définie par l'application ou par l'objet

Code :

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

While Feuil2.Range("ColLettre(i)" & "5").Text <> largeur

La méthode Range de l'objet WorkSheet a échoué

[alsimbad]

salut
en dehors de savoir si le code fonctionne, si colettre est une fonction, tu t'y prend mal. il ne faut pas de guillemet

While Feuil2.Range(Cells("ColLettre(i)" & "5")) <> largeur

Code :

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

While Feuil2.Range("ColLettre(i)" & "5").Text <> largeur

ça serais plutot

Code :

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

1
2
lettrecolone = colettre(i)
range(lettrecolone & 5).texte...

mais je ne peux pas tester collettre est inconnu au bataillon chez moi
par contre, tu peux aussi utiliser cells, c'est plus pratique pour des variable

Code :

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

range(cells(5,macolone),cells(5,masecondecolone)).text ...

[AlainTech]

Pour une seule cellule, Cells suffit, pas besoin de Range.

[Corlo]

Code :

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

1
2
3
4
5
6
7
 
colonne = ColLettre(i)
            While Feuil4.Cells(5, colonne).Text <> largeur
                i = i + 1 'recherche de l'indice pour la vitesse selon la largeur récupéré précédemment
                colonne = ColLettre(i)
            Wend
            vitesse = Feuil4.Cells(6, colonne)

Merci pour la méthode Cells çà marche et je m'étais planté dans ma feuil. C'est pas la 2 c'est la 4.
Mon étourderie m'a fait apprendre au moins une nouvelle méthode plus simple que la méthode range.