Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment copier une feuille cachée dans Excel?

Dans Excel, nous pouvons déplacer et copier une feuille dans un classeur courant ou autre rapidement et facilement, mais avez-vous déjà essayé de copier une feuille cachée dans un classeur actif? Cet article, je vais vous présenter un code VBA pour vous de copier une feuille cachée spécifique au fichier Excel actif.

Copiez une feuille de calcul masquée dans le classeur actif avec le code VBA


flèche bleue droite bulle Copiez une feuille de calcul masquée dans le classeur actif avec le code VBA


Pour copier une feuille masquée d'un classeur et lui donner un nom, le code VBA suivant peut vous rendre service:

1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Copiez une feuille de calcul masquée dans le classeur actif:

Sub DupSheet()
'Updateby Extendoffice 20161109
    Dim Actsheet As String
    Application.ScreenUpdating = False
    On Error Resume Next
    ActiveWorkbook.Sheets("Sheet12").Visible = True
    ActiveWorkbook.Sheets("Sheet12").Copy _
    after:=ActiveWorkbook.Sheets("Sheet12")
    ActNm = ActiveSheet.Name
    ActiveSheet.Name = InputBox("Enter the name for the new sheet.")
    Sheets(ActiveSheet.Name).Visible = True
    ActiveWorkbook.Sheets("Sheet12").Visible = False
    Application.ScreenUpdating = True
End Sub

Note: Dans le code ci-dessus, Fiche 12 est la feuille cachée que vous voulez copier, s'il vous plaît changer à votre besoin.

3. Et puis appuyez sur F5 clé pour exécuter ce code, une boîte de dialogue apparaîtra pour vous rappeler de spécifier un nom pour la nouvelle copie de la feuille de calcul cachée, voir capture d'écran:

doc copie feuille cachée 1

4. Puis clique OK bouton, et la feuille masquée a été copiée avec le nouveau nom dans le classeur actif à la fois.



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.