Range à deux variables

[davidm]

Bonjour,

J'aimerais connaitre la syntaxe pour avoir un Range avec deux variables.

Exemple:

Obtenir un Range("A1") en mettant les variables varcol et varligne

PS : Je ne souhaite pas utiliser la fonction cells(varligne,varcol) mais bien un Range.

Merci pour votre aide.

Davidm

 

[tototiti2008]

Re : Range à deux variables

Bonjour davidm,

et pourquoi pas un cells ?

 

[pierrejean]

Re : Range à deux variables

bonjour davidm

Tout depend du contenu de la variable varcol
(on suppose que varligne est un nombre compris entre 1 et 65536
Si c'est une lettre ou un groupe (genre A ou BB) ce sera
Range(varcol & varligne)
Si c'est un chiffre (compris entre 1 et 256)
je te propose la fonction suivante

Function lettre(varcol As Integer)
lettre = Replace(Cells(1, varcol).Address(0, 0), "1", "")
End Function

le range deviendra

range(lettre(varcol) & varligne)

Salut Tototiti
entre parenthese : tout a fait d'accord avec toi !!!

 

[davidm]

Re : Range à deux variables

Bonjour et merci de m'avoir répondu.

En fait je vais l'utiliser pour redimensionner des graphiques (et les placer ou je veux dans la page) et dans ce cas la il ne veut pas entendre parler du cells.

Pierrejean, est ce que ta fonction fonctionne pour les colonnes à deux lettres (de AA à IV)?

Merci

Davidm

 

[pierrejean]

Re : Range à deux variables

Re

un petit test t'aurais permis de savoir que:

OUI la fonction donne de bons resultats de varcol= 1 (A) a varcol=256 (IV)

 

[davidm]

Re : Range à deux variables

Re
j'étais justement en train de faire le petit test (en le mettant juste dans une msgbox).

Parce que dans mon code ca ne fonctionnait pas (à cause des déclarations de variables je susppose) enfin bref je continue de tester.

EDIT : Ok c'est bon ca fonctionne aussi dans mon code.

Davidm