Création d'un module par macro, Option Explicit en trop

jeanpierre

Nous a quitté

Repose en paix

• 21 Novembre 2008

• #2

Re : Création d'un module par macro, Option Explicit en trop

Bonjour Magpie et Bienvenue sur XLD,

En déclarant toutes tes variables dans ton classeur A, le problème devrait être résolu.

Bon après-midi.

Jean-Pierre

 

Vote positif 0 Vote négatif

M

Magpie

Guest

• 21 Novembre 2008

• #3

Re : Création d'un module par macro, Option Explicit en trop

Merci jeanpierre.
Je déclare bien toutes les variables.

Je repose le pb:

comment eviter que lors de la création d'un module, "Option Explicit" ne s'inscrive par défaut, puisque le code recopié dans le module contient déja cette ligne, du coup, l'erreur qui sort : "Instruction d'option dupliquée" puisque :

Option Explicit
Option Explicit

Ou autre option comment supprimer cette ligne dans le module fraichement créé ?

 

Vote positif 0 Vote négatif

C

Claude72

Guest

• 21 Novembre 2008

• #4

Re : Création d'un module par macro, Option Explicit en trop

Bonjour à vous,

Ai trouvé cette piste sur le forum en 2003.
A creuser, mais l'idée peut servir...

Le code suivant ne met pas "Option Explicit"

With Workbooks("LeClasseurCible.xls").VBProject
.VBComponents.Import Modulos
End With

(Voir fichier Piste.zip)

 

Pièces jointes

• Piste.zip

  998 bytes · Affichages: 57

Vote positif 0 Vote négatif

M

Magpie

Guest

• 21 Novembre 2008

• #5

Re : Création d'un module par macro, Option Explicit en trop

Claude72 à dit:

Bonjour à vous,

Le code suivant ne met pas "Option Explicit"

With Workbooks("LeClasseurCible.xls").VBProject
.VBComponents.Import Modulos
End With

(Voir fichier Piste.zip)

Cliquez pour agrandir...

Merci claude
Oui il ne le met pas parcqu'il importe directement un fichier sans créer un module tout neuf.
Si l'option de déclaration obligatoire est cochée, un nouveau module est créé avec Option Explicit par défaut. 😡

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 21 Novembre 2008

• #6

Re : Création d'un module par macro, Option Explicit en trop

Re,

Il faudrait voir un extrait de ton classeur avec macros, ou au minimum les macros, pour pouvoir tester et comprendre.

Sans, cela est plus compliqué.

Jean-Pierre

 

Vote positif 0 Vote négatif

bqtr

XLDnaute Accro

• 21 Novembre 2008

• #7

Re : Création d'un module par macro, Option Explicit en trop

Bonsoir à tous,

Essaye en utilisant l'instruction DeleteLines (Ligne Début,Ligne Fin) :

Pour supprimer la première ligne de ton module DeleteLines 1, 1

Code:

'.../...
VBComp.Name = "Nmodule"
With VBComp.CodeModule
 .DeleteLines 1, 1
End With
'.../...

Où VBComp est ton module


A+

 

Vote positif 0 Vote négatif

C

Claude72

Guest

• 23 Novembre 2008

• #8

Re : Création d'un module par macro, Option Explicit en trop

Bonjour à tous,

Ai trouvé une solution et elle fonctionne.
Cela suppose que les fichiers source et cible soient ouverts ensemble.

Copier la macro "mModule" à partir du fichier "Source.xls" et tester là dans "Cible.xls".

Clic sur le bouton, puis double-clic dans la Listbox triée (vous avez en plus un tri de ListBox...)

A vous de l'améliorer si bon vous semble.

Bon Dimanche à vous

 

Pièces jointes

• Cible.zip

  5.5 KB · Affichages: 53
• Source.zip

  21.7 KB · Affichages: 55
• Source.zip

  21.7 KB · Affichages: 54
• Source.zip

  21.7 KB · Affichages: 60

Vote positif 0 Vote négatif

M

Magpie

Guest

• 26 Novembre 2008

• #9

Re : Création d'un module par macro, Option Explicit en trop

Merci pour toutes vos solutions.

J'ai pris le parti d'exporter dans un fichier temporaire puis de l'importer dans mon fichier cible (Macro ImpotExportModule() ) trouvé sur le net ici Ce site n'existe plus
Je passe à autre chose.
Merci

 

Vote positif 0 Vote négatif