Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

VBA: lire zone de nom ds autre classeur

4 réponses
Avatar
Laurent
Bonjour,
Je cherche à écrire une macro qui aille lire une cellule particulière
dans une zone de nom définie dans classeur2.xls et insérer la valeur de
cette cellule dans une cellule particuière ce classeur1.xls

Qqun peut il m'aider ??

Laurent

4 réponses

Avatar
lSteph
Bonjour,
sous réserve d'avoir défini au niveau de classeur2 une plage unique nommée
toto,
ramenons par exemple la cellule de ligne2 colonne3 dans cette plage:

Workbooks("Classeur1").Sheets("Feuil1").[c3].Value = _
Range(Workbooks("Classeur2").Names("toto")).Cells(2, 3)

LSteph
<Laurent> a écrit dans le message de news:
20060516054949648+
Bonjour,
Je cherche à écrire une macro qui aille lire une cellule particulière
dans une zone de nom définie dans classeur2.xls et insérer la valeur de
cette cellule dans une cellule particuière ce classeur1.xls

Qqun peut il m'aider ??

Laurent


Avatar
Laurent
Bonjour,
merci de l'info.
J'ai un pb, j'ai une erreur indice en dehors de la plage

le code utilisé est :

Workbooks("Classeur2").Sheets("Feuil1").[c3].Value = Range(Workbooks(
"Classeur1.xls").Names("toto")).Cells(1, 1)

je lis la cellule (1,1) de la zone toto du classeur1.

Une idée ??

merci d'avance


In lSteph wrote:
Bonjour,
sous rÈserve d'avoir dÈfini au niveau de classeur2 une plage unique
nommÈe toto, ramenons par exemple la cellule de ligne2 colonne3 dans
cette plage:

Workbooks("Classeur1").Sheets("Feuil1").[c3].Value = _
Range(Workbooks("Classeur2").Names("toto")).Cells(2, 3)

LSteph
<Laurent> a Ècrit dans le message de news:
20060516054949648+
Bonjour,
Je cherche ? Ècrire une macro qui aille lire une cellule particuliËre
dans une zone de nom dÈfinie dans classeur2.xls et insÈrer la valeur
de cette cellule dans une cellule particuiËre ce classeur1.xls

Qqun peut il m'aider ??

Laurent







Avatar
lSteph
il s'appelle vraiment ainsi,Classeur1.xls
ou Classeur1

<Laurent> a écrit dans le message de news:
20060516233907667+
Bonjour,
merci de l'info.
J'ai un pb, j'ai une erreur indice en dehors de la plage

le code utilisé est :

Workbooks("Classeur2").Sheets("Feuil1").[c3].Value = Range(Workbooks(
"Classeur1.xls").Names("toto")).Cells(1, 1)

je lis la cellule (1,1) de la zone toto du classeur1.

Une idée ??

merci d'avance


In lSteph wrote:
Bonjour,
sous rÈserve d'avoir dÈfini au niveau de classeur2 une plage unique
nommÈe toto, ramenons par exemple la cellule de ligne2 colonne3 dans
cette plage:

Workbooks("Classeur1").Sheets("Feuil1").[c3].Value = _
Range(Workbooks("Classeur2").Names("toto")).Cells(2, 3)

LSteph
<Laurent> a Ècrit dans le message de news:
20060516054949648+
Bonjour,
Je cherche ? Ècrire une macro qui aille lire une cellule particuliËre
dans une zone de nom dÈfinie dans classeur2.xls et insÈrer la valeur
de cette cellule dans une cellule particuiËre ce classeur1.xls

Qqun peut il m'aider ??

Laurent









Avatar
Laurent
j'ai remplacer classeur par classeur.xls et ca marche.

Merci
In lSteph wrote:
il s'appelle vraiment ainsi,Classeur1.xls
ou Classeur1

<Laurent> a Ècrit dans le message de news:
20060516233907667+
Bonjour,
merci de l'info.
J'ai un pb, j'ai une erreur indice en dehors de la plage

le code utilisÈ est :

Workbooks("Classeur2").Sheets("Feuil1").[c3].Value = Range(Workbooks(
"Classeur1.xls").Names("toto")).Cells(1, 1)

je lis la cellule (1,1) de la zone toto du classeur1.

Une idÈe ??

merci d'avance


In lSteph wrote:
Bonjour,
sous r»serve d'avoir d»fini au niveau de classeur2 une plage unique
nomm»e toto, ramenons par exemple la cellule de ligne2 colonne3
dans cette plage:

Workbooks("Classeur1").Sheets("Feuil1").[c3].Value = _
Range(Workbooks("Classeur2").Names("toto")).Cells(2, 3)

LSteph
<Laurent> a »crit dans le message de news:
20060516054949648+
Bonjour,
Je cherche ? »crire une macro qui aille lire une cellule
particuliÀre dans une zone de nom d»finie dans classeur2.xls et ins»
rer la valeur de cette cellule dans une cellule particuiÀre ce
classeur1.xls

Qqun peut il m'aider ??

Laurent