OVH Cloud OVH Cloud

Utiliser des variables pour Ligne et Colonnes ?

4 réponses
Avatar
Samuel Vanneste
Bonjour,

Je ne suis pas un as de VBA, loin de là. Mes macros, je les crée en les
enregistrant.

Cette fois, j'aurais besoin de modifier une macro afin qu'elle copie une
ligne et une colonne la cellule contient quelque chose.

Est-il possible utiliser une variable afin d'incrémenter les coordonnées de
la cellule à vérifier ?

Par exemple:
Range("xy")
x=x+1
y=y+1

Pardon de vous importuner avec cela mais le VBA est vraiment abscond pour
moi.

Cordialement,

Samuel

4 réponses

Avatar
isabelle
bonjour samuel,

dans le cas de deux variables, il est plus facile d'utiliser la syntaxe Cells.

Dim ligne As Integer
Dim colonne As Integer
'parcourir la plage A1:C10
For ligne = 1 To 10
For colonne = 1 To 3
x = Cells(ligne, colonne)
Next colonne
Next ligne

isabelle


Bonjour,

Je ne suis pas un as de VBA, loin de là. Mes macros, je les crée en les
enregistrant.

Cette fois, j'aurais besoin de modifier une macro afin qu'elle copie une
ligne et une colonne la cellule contient quelque chose.

Est-il possible utiliser une variable afin d'incrémenter les coordonnées de
la cellule à vérifier ?

Par exemple:
Range("xy")
x=x+1
y=y+1

Pardon de vous importuner avec cela mais le VBA est vraiment abscond pour
moi.

Cordialement,

Samuel


Avatar
Philippe.R
Bonsoir Samuel,
Dans la mesure où tu manipules des cellules une par une, tu peux utiliser l'objet cells(y,x)
avec des variables représentant la ligne et la colonne ; exemple :

Sub parcours()
Dim y As Long, x As Integer
For y = 1 To 23
For x = 1 To 12
Cells(y, x).Select
If ActiveCell = "" Then MsgBox "Vide"
Next x
Next y
End Sub

--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Samuel Vanneste" a écrit dans le message de news:cj9ql7$fii$
Bonjour,

Je ne suis pas un as de VBA, loin de là. Mes macros, je les crée en les
enregistrant.

Cette fois, j'aurais besoin de modifier une macro afin qu'elle copie une
ligne et une colonne la cellule contient quelque chose.

Est-il possible utiliser une variable afin d'incrémenter les coordonnées de
la cellule à vérifier ?

Par exemple:
Range("xy")
x=x+1
y=y+1

Pardon de vous importuner avec cela mais le VBA est vraiment abscond pour
moi.

Cordialement,

Samuel




Avatar
Philippe.R
Bonsoir Isabelle,
Désolé pour le doublon !
:o*)
--
Amicales Salutations

"isabelle" a écrit dans le message de
news:
bonjour samuel,

dans le cas de deux variables, il est plus facile d'utiliser la syntaxe Cells.

Dim ligne As Integer
Dim colonne As Integer
'parcourir la plage A1:C10
For ligne = 1 To 10
For colonne = 1 To 3
x = Cells(ligne, colonne)
Next colonne
Next ligne

isabelle


Bonjour,

Je ne suis pas un as de VBA, loin de là. Mes macros, je les crée en les
enregistrant.

Cette fois, j'aurais besoin de modifier une macro afin qu'elle copie une
ligne et une colonne la cellule contient quelque chose.

Est-il possible utiliser une variable afin d'incrémenter les coordonnées de
la cellule à vérifier ?

Par exemple:
Range("xy")
x=x+1
y=y+1

Pardon de vous importuner avec cela mais le VBA est vraiment abscond pour
moi.

Cordialement,

Samuel




Avatar
isabelle
:-) y a pas de mal !
bisou
isabelle


Bonsoir Isabelle,
Désolé pour le doublon !
:o*)
--
Amicales Salutations

"isabelle" a écrit dans le message de
news:
bonjour samuel,

dans le cas de deux variables, il est plus facile d'utiliser la syntaxe Cells.

Dim ligne As Integer
Dim colonne As Integer
'parcourir la plage A1:C10
For ligne = 1 To 10
For colonne = 1 To 3
x = Cells(ligne, colonne)
Next colonne
Next ligne

isabelle


Bonjour,

Je ne suis pas un as de VBA, loin de là. Mes macros, je les crée en les
enregistrant.

Cette fois, j'aurais besoin de modifier une macro afin qu'elle copie une
ligne et une colonne la cellule contient quelque chose.

Est-il possible utiliser une variable afin d'incrémenter les coordonnées de
la cellule à vérifier ?

Par exemple:
Range("xy")
x=x+1
y=y+1

Pardon de vous importuner avec cela mais le VBA est vraiment abscond pour
moi.

Cordialement,

Samuel