Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2839 connectés 

  FORUM HardWare.fr
  Windows & Software
  Logiciels

  [VBA] Ajout d'une feuille excel via un bouton

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Ajout d'une feuille excel via un bouton

n°2726235
kanabzh29
Padme c'est ma mienne
Posté le 04-10-2007 à 10:11:19  profilanswer
 

Bonjour,
 
J'aimerais rajouter une feuille excel via un bouton, et j'aimerais que cette feuille soit faite à partir d'un modèle.
J'ai crée le bouton, et quand je double clik dessus, j'ai la fenêtre VBA qui apparaît, mais que mettre entre :
 
Private Sub CommandButton1_Click()
 
End Sub

mood
Publicité
Posté le 04-10-2007 à 10:11:19  profilanswer
 

n°2726246
Idoine
Posté le 04-10-2007 à 11:16:37  profilanswer
 

Le plus simple est de commencer l'enregistrement d'une macro, de faire l'opération en environnement Excel (Fichier/Nouveau... et ta feuille, ou un truc du genre) et d'arrêter l'enregistrement.  
Ensuite tu pompes le code généré. :D

n°2726265
kanabzh29
Padme c'est ma mienne
Posté le 04-10-2007 à 13:43:28  profilanswer
 

La création d'une nouvelle feuille marche avec :
 
Sheets.Add
 
Maintenant j'aimerais donner un nom à cette feuille, le nom étant récupéré à partir d'une cellule.

n°2726306
Idoine
Posté le 04-10-2007 à 16:48:51  profilanswer
 

Ceci te crée une feuille standard... C'est ce que tu veux ? Tu parlais d'un modèle ?
En tout cas, une fois que tu as fait Sheets.add (ou Worksheets.add), la feuille nouvellement créée devient la feuille active, et tu peux la nommer avec un :
Activesheet.name=Worksheets("LeNomdelafeuillequicontientlacelluleNom" ).Range("A1" ).value (si A1 est la cellule en question)
Fais F1 après Add en VBA et tu auras l'aide correspondante (vive la touche F1 ! :D )

n°2726508
kanabzh29
Padme c'est ma mienne
Posté le 05-10-2007 à 13:45:38  profilanswer
 

Merci, pour le modèle oui tu as raison, la feuille crée devra toujours contenir le mème modèle de base (mais j'apprends étape par étape) maintenant il faut que je mette automatiquement le mème modèle dans la feuille...

n°2726524
Idoine
Posté le 05-10-2007 à 14:43:03  profilanswer
 

Tu peux aussi éventuellement te faire une feuille "modèle" dans ton classeur, que tu masques (soit juste masquée, soit "very hidden", et ça en code), et que tu copies ensuite...

n°2727246
kanabzh29
Padme c'est ma mienne
Posté le 08-10-2007 à 13:26:27  profilanswer
 

Je n'arrive pas à la copier, voila mon code :
 
Sheets("Mod_Fich_Ano" ).Select
Selection.Copy
 
Sheets.Add.name = "test"
Sheets("test" ).Select
ActiveSheet.Paste
 
Et la il me sort l'erreur suivante :
"La méthode Select de la classe WorkSheet a échoué"

n°2727459
kanabzh29
Padme c'est ma mienne
Posté le 09-10-2007 à 08:35:09  profilanswer
 

Bon j'ai réussi a créer la feuille excel à partir du modèle, voila le code :
 
Dim i As String
i = "ANO_"
Sheets("Mod_Fich_Ano" ).Copy
ActiveSheet.Name = i + ComboBox1.Value
 
Seulement cette nouvelle feuille excel se crée dans un autre classeur, et j'aimerais qu'elle se crée dans le mème classeur. Quelqu'un peut m'aider

n°2727517
Idoine
Posté le 09-10-2007 à 12:42:34  profilanswer
 

L'utilisation de l'aide sur la méthode Copy te donne l'explication ! ;)
Si tu ne veux pas qu'il te copie la feuille dans un nouveau classeur, tu dois préciser soit "avant FeuilleTruc", soit "après FeuilleTruc", avec:
Sheets("Mod_Fich_Ano" ).Copy After:=Sheets(Sheets.count) 'ici copie la feuille en dernière position

n°2727770
kanabzh29
Padme c'est ma mienne
Posté le 10-10-2007 à 13:17:51  profilanswer
 

Merci cela marche très bien

mood
Publicité
Posté le 10-10-2007 à 13:17:51  profilanswer
 

n°3296438
matt57000
Posté le 10-01-2018 à 13:17:52  profilanswer
 

Bonjour,
 
J'ai besoin de votre aide pour créer un bouton qui crée une nouvelle feuille dans le classeur à partir d'une feuille modèle.
Enfin quelque chose d'un peu plus pointu...
Je souhaite créer un bouton avec un champ sur ce même bouton qui va me permettre de renseigner le nom de cette future feuille.
Une fois le champ renseigné, je clique sur ok/valider et cela crée ma feuille qui portera le nom du champ renseigné dans le bouton.
 
Merci d'avance,


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Windows & Software
  Logiciels

  [VBA] Ajout d'une feuille excel via un bouton

 

Sujets relatifs
Excel : passer d'une cellule à une autre automatiquement?Disparition des boutons supprimer de la liste Ajout/Supp
excel calcule mal une formule simple, bug ?fomat de cellule personnalisé excel
Trier les onglets d'un classeur excel[resolu]recherche sous excel caratère spéciaux
Logiciel qui génère des pdf depuis le scanner en 1 clic ou 1 bouton ?EXCEL - Menu "donnees" qui a disparu
exel transfert automatique vers boite emailEXCEL - effacement automatisé de cellules
Plus de sujets relatifs à : [VBA] Ajout d'une feuille excel via un bouton


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)