duplication de feuille excel (conservation macro, format ...)

tanguy1 · 3 Juin 2016

Bonjour,
Je réalise un outil excel pour mon entreprise, la feuille excel est terminée, mon problème est le suivant : je voudrais créer une macro qui me servirait à dupliquer cette feuille excel, mais je ne sais pas comment conserver les boutons qui activent des macros et aussi le format, les formules ... ?

Merci d'avance,
Tanguy

Chris401 · 3 Juin 2016

Re : duplication de feuille excel (conservation macro, format ...)

Bonjour

Essaye avec ce code

Code:

Sub DupliqueFeuille()
    Sheets("Modele").Copy Before:=Sheets(2)    
End Sub

Remplace Modele par le nom de ta feuille

Cordialement
Chris

riton00 · 3 Juin 2016

Re : duplication de feuille excel (conservation macro, format ...)

Bonjour à tous

Code à tester (Chez moi il fonctionne)

Code:

Private Sub CommandButton1_Click()
Dim st As String
    Dim sh As Worksheet
    Dim shDest As Worksheet
    Set sh = ActiveSheet
    st = InputBox("Copy feuille " & sh.Name & " vers Feuille :")
    If st <> "" Then
        On Error GoTo ErrCopy
         sh.Copy after:=sh
        Set shDest = ActiveSheet
        shDest.Name = st
    End If
 
      Exit Sub
 
ErrCopy:
     MsgBox "Erreur : " & Err.Number & " " & Err.Description & vbCrLf & "Sur copie " & sh.Name & " vers feuille " & st, vbCritical
End Sub

Slts

duplication de feuille excel (conservation macro, format ...)

tanguy1

XLDnaute Nouveau

Chris401

XLDnaute Accro

riton00

XLDnaute Impliqué

Discussions similaires