OVH Cloud OVH Cloud

piloter Excell

2 réponses
Avatar
Pascal
bonsoir,
qqn peut t'il me renseigner la fàcon de piloter excell à partir D'access
(version 2000)
j'ai ceci
For cpt = 1 To 6
valeur = t1(cpt).Value
rang = cpt
'écrire dans excell
sht.Range("A1").Value = sht.Range("A1").Value + valeur
sht.Range("b1").Value = rang
Next cpt
'enregistrement suivant
t1.MoveNext

le problème est que je ne sais comment faire pour passer soit à la colonne
suivante soit à la ligne suivante
en clair quel est la syntaxe d'écriture pour passer par ex du champ b1 vers
champs suivant c1

merci d'avance
Pascal

2 réponses

Avatar
valentin
Bonjour,
Il faut plutôt utiliser l'objet Cells que Range
par exemple range("A1") sera Cells(1,1) ; à
partir de ceci on peut concevoir des boucles
imbriquées:

for colonne =i to j
for ligne=k to l
cells(ligne,colonne).value=xxx
next ligne
next colonne

etc ..

Bonne chance
Valentin

"Pascal" a écrit dans le message de
news:
bonsoir,
qqn peut t'il me renseigner la fàcon de piloter excell à partir D'access
(version 2000)
j'ai ceci
For cpt = 1 To 6
valeur = t1(cpt).Value
rang = cpt
'écrire dans excell
sht.Range("A1").Value = sht.Range("A1").Value + valeur
sht.Range("b1").Value = rang
Next cpt
'enregistrement suivant
t1.MoveNext

le problème est que je ne sais comment faire pour passer soit à la colonne
suivante soit à la ligne suivante
en clair quel est la syntaxe d'écriture pour passer par ex du champ b1
vers

champs suivant c1

merci d'avance
Pascal




Avatar
Pascal
génial, merci valentin
Pascal

"valentin" a écrit dans le message de
news:415cf345$0$27575$
Bonjour,
Il faut plutôt utiliser l'objet Cells que Range
par exemple range("A1") sera Cells(1,1) ; à
partir de ceci on peut concevoir des boucles
imbriquées:

for colonne =i to j
for ligne=k to l
cells(ligne,colonne).value=xxx
next ligne
next colonne

etc ..

Bonne chance
Valentin

"Pascal" a écrit dans le message de
news:
bonsoir,
qqn peut t'il me renseigner la fàcon de piloter excell à partir D'access
(version 2000)
j'ai ceci
For cpt = 1 To 6
valeur = t1(cpt).Value
rang = cpt
'écrire dans excell
sht.Range("A1").Value = sht.Range("A1").Value + valeur
sht.Range("b1").Value = rang
Next cpt
'enregistrement suivant
t1.MoveNext

le problème est que je ne sais comment faire pour passer soit à la
colonne


suivante soit à la ligne suivante
en clair quel est la syntaxe d'écriture pour passer par ex du champ b1
vers

champs suivant c1

merci d'avance
Pascal