Autres VBA Dupliquer un Onglet dans un autre Onglet en Valeur (Sans formule et avec un nom d'onglet specifique)...

[Armand11]

Bonsoir à toute la communauté Exceldownload,
J'espère que vous allez bien?
Je vous sollicite pour une fonction VBA :
a. Mon onglet "work" qui récupére des éléments calculés je voudrais le dupliquer dans un autre onglet en valeur
b. et dupliquer ce nouvel onglet en le nommant "Data"

J'arrive dans ma fonction à le dupliquer mais mon bouton de commande ne fonctionne pas ... J'arrive pas à le lier à la macro.
Pouvez vous m'aider ?

De plus y a t'il une possibilité de dupliquer l'onglet Work en Valeur MAIS => en ouvrant une nouvelle feuille Excel classique en mode xls et non pas xlms... ?
Merci beaucoup pour votre aide précieuse.
Armand

 

[patricktoulon]

Bonjour

Sub DupliquerOnglet()
    Dim Onglet As Worksheet: On Error Resume Next
    Set Onglet = ActiveWorkbook.Worksheets("work"): Onglet.Copy , Onglet
    With ActiveSheet
        .Name = Application.InputBox("Entrez un nom pour la copie de la feuille", "Copie de la feuille", "copie(Work)")
        With .[A20].Resize(.UsedRange.Rows.Count, .UsedRange.Columns.Count)
            .Value = .Value
        End With
    End With
End Sub

 

[Armand11]

Bonjour Patrick,
Je viens de voir votytre retour, Merci beaucoup ! effectivement cela fonctionne... je récupére bien les éléments en VALEUR.
Par contre comment puis je faire pour récupérer la copie mais sans le bouton de commande ?
Merci encore

 

[patricktoulon]

re

Sub DupliquerOnglet()
    Dim Onglet As Worksheet: On Error Resume Next
    Set Onglet = ActiveWorkbook.Worksheets("work"): Onglet.Copy , Onglet
    With ActiveSheet
        .Name = Application.InputBox("Entrez un nom pour la copie de la feuille", "Copie de la feuille", "copie(Work)")
        With .[A20].Resize(.UsedRange.Rows.Count, .UsedRange.Columns.Count)
            .Value = .Value
            .Shapes(1).delete
       End With
    End With
End Sub

 

[Armand11]

Bonsoir Patrick, j'ai utilisé votre nouvelle programmation mais le Bouton de commande continue d'apparaître.

 

[Armand11]

En effet lorsque je lance la requête il me demande de nommer le nouvel onglet mais le bouton de commande reste apparant et fonctionnel sur le nouvel onglet...

 

[patricktoulon]

bonsoir
j'ai testé chez moi sur ton fichier et le bouton est bien supprimé