Bouton, macro copier/coller et changement valeurs cellules

Bonjour,

Je voudrais créér un bouton "Nouvelle réunion" associé à une macro "Nouvelle_Réunion" qui consiste à copier le contenu complet d'une feuille vers une autre feuille. J'ai trouvé le moyen en faisant :

Sub Nouvelle_Réunion()

'

' Nouvelle_Réunion Macro

' Nouvelle-Réunion

'

'

Cells.Select

Selection.Copy

Sheets.Add After:=Sheets(Sheets.Count)

Cells.Select

ActiveSheet.Paste

End Sub

Mais en plus, j'aimerais que lors de l'exécution de la macro, on me demande (formuilaire ?) le nom de la nouvelle feuille (dans le fichier, pour créer par exemple RS893 à partir de la feuille RS982), la date (dans le fichier, pour modifier 22/05/2012) et enlever 1 à la valeur de la cellule A1 (donc pour avoir 887 dans la nouvelle feuille).

Voici mon fichier, ce sera peut-être plus clair

Merci d'avance.

David.

Bonjour ,

Essaye le fichier joint

Cordialement

275liste-de-presence.zip (15.43 Ko)

Exactement ce que je voulais. Merci beaucoup.

Rechercher des sujets similaires à "bouton macro copier coller changement valeurs"