Macro m'empêche de masquer une feuille

DoubleZero

XLDnaute Barbatruc

• 28 Mai 2015

• #2

Re : Macro m'empêche de masquer une feuille

Bonjour, good57, le Forum,

Les données d'un onglet ne semblent pas fictives : merci de bien vouloir retirer le fichier joint en #1...

Une suggestion, avec le présent code :

Code:

Option Explicit
Sub Zurückstellen2()
    Application.ScreenUpdating = False
    With Sheets("Zurückstellen")
        .Visible = -1
        .Rows("1:2139").Copy Destination:=Sheets("Nachkalkulation").Range("a8")
        .Visible = 0
    End With
    Application.ScreenUpdating = True
End Sub

Bis bald 🙂

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 28 Mai 2015

• #3

Re : Macro m'empêche de masquer une feuille

Bonjour,

Surtout pour saluer notre chère ânesse 🙂

Et pour préciser qu'en VBA on peut toujours faire du copier-coller à partir d'une feuille masquée si on ne la sélectionne pas.

Bonne soirée.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 28 Mai 2015

• #4

Re : Macro m'empêche de masquer une feuille

Re-bonjour, bonjour, job75 😀,

Un gr😱s MERCI, j😀b75 !

Le code mentionné en #2 peut devenir :

Code:

Option Explicit
Sub Zurückstellen2_Merci_job75()
    Application.ScreenUpdating = False
    Sheets("Zurückstellen").Rows("1:2139").Copy Destination:=Sheets("Nachkalkulation").Range("a8")
    Application.ScreenUpdating = True
End Sub

A bientôt 🙂🙂

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 28 Mai 2015

• #5

Re : Macro m'empêche de masquer une feuille

Re 00 🙂

Et les Application.ScreenUpdating sont alors inutiles...

A+

 

Vote positif 0 Vote négatif

good57

XLDnaute Occasionnel

• 1 Juin 2015

• #6

Re : Macro m'empêche de masquer une feuille

Bonjour Job75 et DoubleZero.
Merci pour cette macro ! Ca tourne comme une horloge !

 

Vote positif 0 Vote négatif