Probléme syntaxe macro excel 4

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Probléme syntaxe macro excel 4

seagull6

Bonjour,
Je dois récupérer la valeur d'une cellule dans un fichier externe fermé.
le nom du fichier ou se trouve la valeur correspond à la valeur d' une cellule du fichier actif (B10). Pour le nom d'onglet (toujours dans le fichier externe), celui ci est parfois amené à changer de nom et je ne peux donc pas utiliser ce paramétre dans ma macro et voudrais plutôt utiliser le N° d'ordre de l'onglet qui lui ne changera pas. Voici concrétement mes lignes de code :

Cette ligne fonctionne avec le nom d'onglet (ONGLET N°3)

Code :

Cells(1, 1).Value = ExecuteExcel4Macro("'c:\mondossier\monsousdossier\[" & (ThisWorkbook.Sheets("MONONGLET" ).Cells(10, 2).Value) & "]ONGLET N°3'!R1C12" )

Cette ligne ne fonctionne pas avec le N° d'ordre (Sheets(3))car je ne trouve pas la bonne syntaxe :cry: (si toutefois c'est possible?)

Code :

'Cells(1, 1).Value = ExecuteExcel4Macro("'c:\mondossier\monsousdossier\[" & (ThisWorkbook.Sheets("MONONGLET" ).Cells(10, 2).Value) & "] Sheets(3)'!R1C12" )

Un grand merci à qui pourra m'aiguiller vers la solution

Message édité par seagull6 le 06-11-2012 à 10:05:16

Publicité

vave

Nice to meet me

Salut,

Tu peux surement utiliser la fonction INDIRECT(), mais je ne connais pas trop la syntaxe excel4.

Ca donnerait un truc dans ce genre :

Code :

Cells(1, 1).Value = ExecuteExcel4Macro(INDIRECT("'c:\mondossier\monsousdossier\[" & (ThisWorkbook.Sheets("MONONGLET" ).Cells(10, 2).Value) & "] Sheets(3)'!R1C12" ))

---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"- Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1

seagull6

Bonsoir et merci pour ton intervention oovaveoo mais cela ne fonctionne pas , je pense que c'est au niveau de la syntaxe pour exprimer le sheet(3).name du classeur fermé que ça ne colle pas...

vave

Nice to meet me

Tu peux peut-être essayer comme ça alors :

Code :

Cells(1, 1).Value = ExecuteExcel4Macro("'c:\mondossier\monsousdossier\[" & (ThisWorkbook.Sheets("MONONGLET" ).Cells(10, 2).Value) & "]" & Sheets(3).Name & "'!R1C12" )

---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"- Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Probléme syntaxe macro excel 4

Sujets relatifs
Problème RobotProg	Probleme avec une ligne,dont je ne comprend pas
(VBA) excel 2003 erreur 1004	Fonction excel
Problème affichage tableau de taille variable	Problème Connection MySQL sur mon VPS
Excel 2010 - Eviter l'actualisation du workbook quand...	probleme lecture swf flash cs6
[Ada] Problème avec Pm_Read de la bibliothèque portmidi	Problème carrousel
Plus de sujets relatifs à : Probléme syntaxe macro excel 4

Page générée en 0.032 secondes