Comment faire une copie depuis une feuille masquée. Résolu

Question

Bonjour
je veux copier des données depuis une feuille masquer vers une autre feuille
l'exécution du macro ne donne aucune résultats voilà le code :

Sub effacer()
Sheets("Avancement programme").Select
Rows("2:100000").Select
Selection.Delete shift:=xlUp
Range("A2").Select
End Sub
Sub generer()

Application.ScreenUpdating = False
effacer
    Sheets("CF SALE 1").Visible = True
    Sheets("CF SALE 1").Select
    k = Range("A100000").End(xlUp).Row
        For i = 2 To k
            Sheets("CF SALE 1").Select
            Rows(i).Select
            Selection.Copy
            Sheets("Avancement programme").Select
            lr = Range("A100000").End(xlUp).Row + 1
            Sheets("Avancement programme").Cells(lr, 1).Select
            ActiveSheet.Paste
            Application.CutCopyMode = False
        Next i
        Application.ScreenUpdating = True
       Sheets("CF SALE 1").Visible = False
End Sub

Vaucluse · Answer

Bonjour
pour vous adresser à la feuille masquée, remplacer Select par Activate
crdlmnt

michel_m · Answer

Bonjour madami.m,
Mes respects, mon cher Vaucluse  :o)

Principe pour effacer des lignes sur une  feuille masquée
Sub effacer()
With Sheets("feuil2")
.Rows("2:100").Delete
End With
'Vérif
Sheets("feuil2").Visible = True
End Sub

mais je n'ai rien compris à ce que tu veux faire...

michel_m · Answer

En partant toujours ligne 2 folio "avancement etc" puisqu'on nettoie avant tout


 
 La maquette
https://mon-partage.fr/f/wcpCxdu3/

Comment faire une copie depuis une feuille masquée.

3 réponses

Votre réponse

Discussions similaires