[VBA Excel 2007] erreur Nombre d'arguments incorrects [RESOLU]

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VBA Excel 2007] erreur Nombre d'arguments incorrects [RESOLU]

astik89

Bonjour,

j'ai créé des macro dans un classeur excel 2007 (fichier xlsm). Elles fonctionnent parfaitement (je les ai testées en les affectant à un CommandButton).
Ensuite pour j'ai créé une barre d'outils dans le ruban à l'aide de Office 2007 Custom UI Editor (trouvé sur http://dj.joss.free.fr/ruban.htm). La barre d'outils apparait bien dans le ruban, seulement, lorsque je clique sur le bouton, il y a une erreur VBA "Nombre d'arguments incorrects ou affectation de propriété incorrecte".

Quelqu'un a-t-il déjà eu ce problème? Et comment le résoudre??

Merci

Astik

Message édité par astik89 le 25-07-2009 à 17:06:43

Publicité

astik89

:bounce:

SuppotDeSaTante

Aka dje69r

Bah si tu dis pas ou le programme s'arrete ca risque d'etre dur de t'aider...

---------------
Soyez malin, louez entre voisins !

astik89

dsl
l'erreur se produit dès le lancement de la macro. avant la première comande. et avec n'importe quelle macro.

SuppotDeSaTante

Aka dje69r

Euh oui mais quelle commande ?

Un bout de code ? une explication ?

---------------
Soyez malin, louez entre voisins !

astik89

Donc voici déjà le code que j'ai tapé avec MS Office Custom UI Editor

Code :

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon startFromScratch="false">
<tabs>
<tab id = "CA" label="Suivi CA" insertAfterMso="TabAddIns">
<group id="Analyse" label="Analyse">
<button id="Graphs" label="Construction des graphiques" onAction="Graphs" size="large" imageMso="ChartRefresh" />
</group>
<group id="Impression" label="Impression">
<button id="ImprimSimple" label="Imprimer le tableau simple" onAction="PrintSimple" size="large" imageMso="FilePrintQuick" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>

Puis le code ma macro "PrintSimple"

Code :

Sub PrintSimple()
'
' PrintSimple Macro
'
'
Range("A:A,C:I,O:S" ).EntireColumn.Hidden = True
Range("B1" ).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True
Cells.EntireColumn.Hidden = False
Range("A1" ).Select
End Sub

Donc, lorsque je lance la macro depuyis l'éditeur VBA (via Exécution) elle fonctionne parfaitement. Mais quand je clique sur le bouton de ma barre d'outils j'ai le message suivant:

titre: "Microsoft Visual Basic"; Message"Nombre d'arguments incorrects ou affectation de propriété incorrecte"; OK/Aide.

J'ai essayé en mettant un point d'arrêt sur la ligne SUB, et même comme ça j'ai le message.

SuppotDeSaTante

Aka dje69r

Et si dans ta macro tu mets juste un
MsgBox "coucou"

Ca le fait aussi ?

Si oui, c'est que ton tool doit importer des macro dans Excel, qui peuvent etre buggées aussi...

Message édité par SuppotDeSaTante le 24-07-2009 à 10:22:40

---------------
Soyez malin, louez entre voisins !

astik89

Oui c'est pareil.

Ce week end je vais prendre le temps de refaire des rrecherche sur google.
Je vais essayer de trouver une autre méthode pour créer une barre d'outil sur ce p****n de logiciel.

Merci pour ton implication.

Astik

astik89

J'ai résolu mon souci.

Grace a cet article http://silkyroad.developpez.com/excel/ruban/

En fait il faut passer le controle du ruban en paramètre de la macro:

Code :

Sub MaMacro (control As IRibbonControl)
End Sub

Tout fonctionne maintenant.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VBA Excel 2007] erreur Nombre d'arguments incorrects [RESOLU]

Sujets relatifs
VBA Premier programme assez coriace	[XML/php/Mysql] Caractere chinois
erreur : Set RS = db.OpenRecordset("SITE", dbOpenTable)	[VBA] Erreur out of range sur script
[Excel] renommer bouton de commande + l'affecter à ttes les feuilles	VBA Excel
[VBA] créer fichier excel à partir d'onglet
Plus de sujets relatifs à : [VBA Excel 2007] erreur Nombre d'arguments incorrects [RESOLU]

Page générée en 0.049 secondes