Excel

Question

Bonjour &#224; tous.



J'ai une petite question &#224; propos d'excel. Je souhaite renomer une cellule Excel, genre la C3 en Toto.

J'ai donc fait pour cela une macro afin d'en faire sessortir le code et pouvoir l'incorporer &#224; VB.

Le code serais le suivant : 

MonExcel.ActiveWorkbook.Names.Add Name:="Toto", RefersToR1C1:="=Feuil1!R3C3"

Le probleme est que cela ne fonctionne pas du tout. Pas de message d'erreur ni de nom de cellule chang&#233;e.



Merci par avance.

jpleroisse · Answer

Bonjour,
J'ai essay&#233; ta macro elle fonctionne tr&#232;s bien chez-moi, enl&#232;ve MonExcel et r&#233;essaie.

        ActiveWorkbook.Names.Add Name:="toto", RefersToR1C1:="=Feuil1!R3C3"

jpleroisse

cs_Vincent666 · Answer

Bonjour jpleroisse,



En fait si tu execute la macro avec excel, elle fonctionne tres bien
mais des lors que tu la mais dans VB et que tu viens piloter excel,
chez moi elle ne fonctionne plus. Excel est declarer comme cela, 



    Global MonExcel As Excel.Application



ensuite :



    Set MonExcel = CreateObject("excel.application")



    ' Ouvre la Base Voulue (celle qui est vierge mais qui a toutes les colonnes cr&#233;&#233;es)

    MonExcel.Workbooks.Open FileName:=Fenetre3.Chemin + "\Documents\BD_Excel_test.xls"

    'MsgBox ActiveWindow.WindowNumber

    MonExcel.Application.Visible = True



est apres :



 MonExcel.ActiveWorkbook.Names.Add Name:="Toto", RefersToR1C1:="=Feuil1!R3C3"



Salutations

domsig · Answer

bonjour


ne serait-il pas plus simple d'appeler excel comme tu le fais, et de placer dans ton fichier excel une macro "autoopen" ou "autoouvrir" qui s'occupe du nom de ta cellule ?


bon courage

cs_Vincent666 · Answer

Bonjour domsig,



Merci beaucoup, je n'y avais pas penser. Il suffit juste de placer en
parametres les 2 index cellules et colonnes ainsi que le nom de la page
et le nom de la cellule et c'est parti.

Par contre faut-il, lors du lancement du fichier Excel par VB, faire
qqch pour activer les macros ou c apres en interne de Vb que je lance
la macro de Excel??? (Question peut etre con mais je ne l'ai jamais
fais).



Merci encore.



Salutations

[auteurdetail.aspx?ID=335833 ]

VBFranceBlub · Answer

Salut;

MonExcel.Application.ActiveWorkbook.Names.Add "Toto", "Feuil1!R1C1"

Ca fonctionne comme &#231;a?

<-Blub->

domsig · Answer

excel contient des macros sp&#233;ciales mais j'ai jamais &#233;t&#233; capable de
retenir leurs noms, c'est quelque chose comme autoopen, autoouvrir,
auto_open ou auto_ouvrir (fais une recherche dans l'aide d'excel). Tout
ce que tu mets dans ces macros se d&#233;clenche &#224; l'ouverture du classeur
contenant cette macro. Il y a aussi autoclose ou autofermer dans le
m&#234;me ordre d'id&#233;e...

bon courage

valtrase · Answer

Lut,
As tu mis les r&#233;f&#233;rences qu'il faut dans ton projet VB ?

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

cs_Vincent666 · Answer

Bonjour,



C'est bon j'ai trouv&#233;. En fait j'ai declar&#233; ma feuille en tant que
Excel.Worksheet puis une zone de type Excel.Range puis je fais 

    Set Cellule = Xl_F_MOT1S.Range("D3")

    Cellule.Name.Name = "Toto"

Cellule etant ma declaration Excel.range



Et la sa fonctionne.



@+ et merci &#224; tous

Excel

8 réponses

Discussions similaires