Sujet Précédent Sujet Suivant

Comment faire une copie depuis une feuille masquée.

Résolu/Fermé
madani.m Messages postés 4 Date d'inscription lundi 11 novembre 2019 Statut Membre Dernière intervention 11 novembre 2019 - Modifié le 11 nov. 2019 à 14:59
 madani_m - 12 nov. 2019 à 11:29
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

3 réponses

Réponse 1 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié le 12 nov. 2019 à 10:12
En partant toujours ligne 2 folio "avancement etc" puisqu'on nettoie avant tout



La maquette
https://mon-partage.fr/f/wcpCxdu3/
1
madani_m
12 nov. 2019 à 11:29
Bonjour
mais la macro d'effacement efface les données mais l'entête du tableau reste c'est pour cela on doit se positionner a la cellule A2.
Merci michel pour votre aide
0
Réponse 2 / 3
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394
11 nov. 2019 à 14:52
Bonjour
pour vous adresser à la feuille masquée, remplacer Select par Activate
crdlmnt
0
madani.m Messages postés 4 Date d'inscription lundi 11 novembre 2019 Statut Membre Dernière intervention 11 novembre 2019
11 nov. 2019 à 14:54
Merci pour votre réponse
Déjà fait mais aucune résultats malheureusement
0
Réponse 3 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié le 11 nov. 2019 à 15:52
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...

0
madani.m Messages postés 4 Date d'inscription lundi 11 novembre 2019 Statut Membre Dernière intervention 11 novembre 2019
11 nov. 2019 à 15:51
Bonjour michel_m pour votre aide
La macro effacer ne pause pas de problème car elle est exécutée sur une feuille visible mais la 2ème macro generer qui pose de problème car je veux copier depuis une feuille masquée.
merci
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
11 nov. 2019 à 16:50
Donc, tu ne veux pas rendre la feuille CF SALE 1 visible ?
0
madani.m Messages postés 4 Date d'inscription lundi 11 novembre 2019 Statut Membre Dernière intervention 11 novembre 2019
11 nov. 2019 à 16:53
Merci pour votre aide michel
la feuille CF SALE 1 est une feuille masquée je veux copier des donner depuis elle vers la feuille Avancement programme qui est visible.
mais avant de copier j'exécute la macro pour supprimer les données situer dans la feuille Avancement programme.
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
11 nov. 2019 à 17:58
Ok, mais si tu effaces les lignes dans "avancement travaux" pourquoi cherches tu ensuite la ligne dans cette feuille puisque tu sélectionnes A2 ?

A demain
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
12 nov. 2019 à 08:21
Bonjour

quelle est la lettre de la dernière colonne utilisée ?
0

Discussions similaires

Sécurité de l'URL
ghaouar -
fiddy -

2 réponses
lien copié
alaurore -
LEFEUVRE -

7 réponses
La nouvelle messagerie du Boncoin....
Utilisateur anonyme -
Madabatro -

69 réponses
comment lire un message masqué????
linx33 -
linx33 -

6 réponses
Comment retrouver des lien copier sur sont téléphone
SAMA -
Lylou -

2 réponses