[Macro Excel] Dupliquer sans remplacer

Dupliquer sans remplacer [Macro Excel] - VB/VBA/VBS - Programmation

Marsh Posté le 10-07-2012 à 11:43:53    

Bonjour à tous,
 
Contexte : Je me sers d'une feuille de calcul "exemple" pour la dupliquer et créer des copies de celles-ci.
 
Problème : La feuille que je duplique "écrase" la feuille que j'avais dupliqué avant.
 
Code :  

Code :
  1. Public Sub p_creationDetails(ByVal numPrix As String, designation As String)
  2.    
  3.     'Copie/colle de la page "Exemple"'
  4.     Sheets("Exemple" ).Copy after:=Worksheets(Worksheets.Count)
  5.    
  6.     'Changement du nom de la feuille creee'
  7.     ActiveSheet.Name = numPrix
  8.    
  9.     'Affecte les valeurs des variables dans les cellules'
  10.     Cells(5, 7) = numPrix
  11.     Cells(6, 7) = designation
  13. End Sub


 
Je remercie d'avance toute personne qui m'aidera ^^.
 
Edit: je créée bien une copie de la feuille exemple mais ce n'est pas celle-ci qui est éditée par la fonction.


Message édité par wantha le 10-07-2012 à 12:03:33
Reply

Marsh Posté le 10-07-2012 à 11:43:53   

Reply

Marsh Posté le 10-07-2012 à 14:54:04    

Je n'ai pas tout compris, mais tu as quelques problèmes :
tu te base sur la feuille active (tu la renommes, tu la modifie), mais tu n'as pas choisi quelle était la feuille active. Ca peut être n'importe quelle feuille... Tes problèmes viennent peut-être de là ...
 
Essaie de voir les solutions de création d'onglet pour trouver comment sélectionner la feuille que l'on vient de créer. (son nom n'étant pas forcément prédictible)  
 

Reply

Marsh Posté le 10-07-2012 à 16:21:57    

Mon problème venait en fait du fait que ma feuille exemple (celle copiée à chaque fois) était "hidden".
 
En tout cas, merci pour ta réponse.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed