Prob excel macro
Fermé
student15
-
24 déc. 2005 à 13:09
g Messages postés 1262 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 15 mai 2017 - 24 déc. 2005 à 14:37
g Messages postés 1262 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 15 mai 2017 - 24 déc. 2005 à 14:37
A voir également:
- Prob excel macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Si et excel - Guide
- Macro word - Guide
- Aller à la ligne excel - Guide
1 réponse
g
Messages postés
1262
Date d'inscription
vendredi 23 avril 2004
Statut
Membre
Dernière intervention
15 mai 2017
573
24 déc. 2005 à 14:37
24 déc. 2005 à 14:37
Bonjour,
Sub FeuilCopie()
NomFeuille = ActiveCell 'Copie le nom dans la cellule active
Sheets("Feuil1").Copy After:=Sheets(1) 'Copie la feuille 1
ActiveSheet.Name = NomFeuille 'Nomme la nouvelle feuille
End Sub
Bonne continuation.
Sub FeuilCopie()
NomFeuille = ActiveCell 'Copie le nom dans la cellule active
Sheets("Feuil1").Copy After:=Sheets(1) 'Copie la feuille 1
ActiveSheet.Name = NomFeuille 'Nomme la nouvelle feuille
End Sub
Bonne continuation.