Ajouter un code au module d'une feuille dans un nouveau classeur
Résolu/Fermé
Henare
Messages postés
1
Date d'inscription
jeudi 28 mai 2015
Statut
Membre
Dernière intervention
28 mai 2015
-
28 mai 2015 à 16:44
Henare - 2 juin 2015 à 07:50
Henare - 2 juin 2015 à 07:50
A voir également:
- Ajouter un code au module d'une feuille dans un nouveau classeur
- Frédéric cherche à faire le buzz sur les réseaux sociaux. il a ajouté une image de manchots sur une image de plage. retrouvez l'image originale de la plage. que cachent les manchots ? ✓ - Forum Windows
- Créer un nouveau compte gmail - Guide
- Tirexo nouveau site - Guide
- Pas de module ci - Forum Vidéo/TV
- Ajouter un compte gmail - Guide
2 réponses
michel_m
Messages postés
16593
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
7 mars 2023
3 291
29 mai 2015 à 10:26
29 mai 2015 à 10:26
Bonjour
Un tuto ici:
https://silkyroad.developpez.com/VBA/VisualBasicEditor/
Un tuto ici:
https://silkyroad.developpez.com/VBA/VisualBasicEditor/
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
15 mars 2023
2 712
29 mai 2015 à 10:29
29 mai 2015 à 10:29
Bonjour,
C'est clair ?
Très clair Henri...
Voici donc un exemple :
Attention!!! Nécessite de cocher la référence :
Microsoft Visual Basic for Applications Extensibility 5.3
Pour cela, depuis l'éditeur VBA, Outils/Références, cherchez et cochez...
C'est clair ?
Très clair Henri...
Voici donc un exemple :
Attention!!! Nécessite de cocher la référence :
Microsoft Visual Basic for Applications Extensibility 5.3
Pour cela, depuis l'éditeur VBA, Outils/Références, cherchez et cochez...
Sub AjoutModule()
Dim Wbk As Workbook
Dim VBComp As VBComponent
'création d'un nouveau classeur
Set Wbk = Workbooks.Add
'Création d'un module dans ce classeur
Set VBComp = Wbk.VBProject.VBComponents.Add(vbext_ct_StdModule)
'Insertion du code dans ce module
With VBComp.CodeModule
.InsertLines 1, "Sub Test"
.InsertLines 2, "MsgBox ""Hello World !"""
.InsertLines 3, "End Sub"
End With
End Sub
29 mai 2015 à 10:31
Bien vu!
J'avais zappé ceci dans la demande : dans le module d'une feuille
Bonne journée et bon week
2 juin 2015 à 07:50
Bonne journée... Henri