Copie d'1 feuille en la nommant par un combobox

porcinet82

XLDnaute Barbatruc

• 1 Mars 2006

• #2

Salut Dull,

Comme un exemple vaut mieux qu'un long discours, je te laisse regarder le fichier joint.

[file name=Dull.zip size=9351]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Dull.zip[/file]

@+

 

Pièces jointes

• Dull.zip

  9.1 KB · Affichages: 22

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 1 Mars 2006

• #3

Salut porcinet82, le forum,

Merci beaucoup porcinet82... mais... parce qu'il y en à un, ce que je voudrais que
1/le CommandButton1 me copie la feuille active
2/me la renomme selon le combobox1 et
3/me la copie en dernier
(je te jure, la prochaine fois je joint mon '#@ :evil: :whistle: XXX &## Arf!!! inch: de fichier')et encore j'suis poli!

@+ :woohoo:

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 1 Mars 2006

• #4

re,

Il te suffit de modifier le code du bouton du USF en mettant ca a la place de ce qu'il y avait :

Code:

Private Sub CommandButton1_Click()
    ActiveSheet.Copy After:=Sheets(Sheets.Count)
    ActiveSheet.Name = UserForm1.ComboBox1.Value
End Sub

@+

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 1 Mars 2006

• #5

Re:

eh bin voila! je te remercie beaucoup de ta réponse. (Une bonne chose de faite).

@+ :woohoo:

 

Vote positif 0 Vote négatif