OVH Cloud OVH Cloud

Copie d'une valeur de celulle de "sheet1" vers un autre classeur

1 réponse
Avatar
Guieu
Bonjour =E0 tous de la part de "novice" ;-)=20
je souhaite copier la valeur d'une cellule de "sheet1"=20
vers une cellule d'un autre classeur "base de donn=E9e"=20
connu, mais dont l'adresse de cellule de destination=20
varie en fonction de la demande.
sur "sheet1" dans une cellule j'ai sous format texte les=20
coordonn=E9es de la cellule de destination: =20
Workbooks("Produits.xls").Worksheets("Produits").Range("=20
$G$11") .Value ,il n'y a que " $G$11" qui varie=20
Je voudrait donner =E0 une variable la valeur texte de=20
cette cellule de fa=E7on =E0 pouvoir =E9crire quelquechose=20
comme:"LIEN"(nom de la variable).Value =3D Range=20
("Q10").Value=20
Merci du temps que vous voudrez bien conssacr=E9 =E0=20
mon "probl=E8me" [:-)

1 réponse

Avatar
ru-th
Salut

si à l'adresse en q10 de ta sheet1
Workbooks("Produits.xls").Worksheets("Produits").Range(range("q10").value).v
alue=...
devrait suffire
(si j'ai bien compris)

a+
rural thierry
"Guieu" a écrit dans le message de news:
0bd901c3dc39$fa7b0a40$
Bonjour à tous de la part de "novice" ;-)
je souhaite copier la valeur d'une cellule de "sheet1"
vers une cellule d'un autre classeur "base de donnée"
connu, mais dont l'adresse de cellule de destination
varie en fonction de la demande.
sur "sheet1" dans une cellule j'ai sous format texte les
coordonnées de la cellule de destination:
Workbooks("Produits.xls").Worksheets("Produits").Range("
$G$11") .Value ,il n'y a que " $G$11" qui varie
Je voudrait donner à une variable la valeur texte de
cette cellule de façon à pouvoir écrire quelquechose
comme:"LIEN"(nom de la variable).Value = Range
("Q10").Value
Merci du temps que vous voudrez bien conssacré à
mon "problème" [:-)