Copier feuille en avant dernier

speedball · 21 Octobre 2010

Bonjour

Je cherche un code VBA pour copier une feuille en avant dernier.

Pour etre précis
Je veux copier la feuille "Vierge" avant la feuille "Classement"
Et la renommer par le contenu de la cellule Inscriptions!M2

Voici mon code qui ne fonctionne pas

Sheets("Vierge").Select
Sheets("Vierge").Copy Before:=Sheets("Classement")
Sheets("Vierge (2)").Select
Sheets("Vierge (2)").Name = "Inscriptions!M2"

Merci

JNP · 21 Octobre 2010

Re : Copier feuille en avant dernier

Bonsoir le fil 🙂,
J'espère que Jean-Marcel ne m'en voudra pas mais son code serait plus juste avec

Code:

Sub CopieFEuille()
Sheets("Vierge").Copy Before:=Sheets("Classement")
ActiveSheet.Name = Sheets("Inscriptions").Range("M2")
End Sub

Bonne soirée 😎

speedball · 26 Octobre 2010

Re : Copier feuille en avant dernier

Bonjour à tous
Une réponse un peu tardive de ma part, mais je vous remercie pour ces écritures.
Des écritures différentes qui m'aide à mieux comprendre.
J'avais réussi après cout en déclarent une variable. Mais le code de JNP est carrement mieux.
Merci encore

JNP · 26 Octobre 2010

Re : Copier feuille en avant dernier

Re 🙂,

speedball à dit:
Mais le code de JNP est carrement mieux.

T'exagère, il n'y a pas de code à moi, juste une correction de celui de Jean-Marcel qui avait loupé une subtilité 😛.
Fais attention à ce que tu dis 😉.
Bonne journée 😎

Copier feuille en avant dernier

speedball

XLDnaute Junior

JNP

XLDnaute Barbatruc

speedball

XLDnaute Junior

JNP

XLDnaute Barbatruc

Discussions similaires

Copier feuille en avant dernier

speedball

XLDnaute Junior

JNP

XLDnaute Barbatruc

speedball

XLDnaute Junior

JNP

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency