copier avec des cellules fistres

D

david84

XLDnaute Barbatruc

• 14 Janvier 2012

• #2

Re : copier avec des cellules fistres

Bonjour,

J'ai des lignes masquées par un filtre
Et quand je veux copier il me copie dans les cellules masquées et non masquées.

Cliquez pour agrandir...

Oui c'est normal. Et donc ?
A+

 

Vote positif 0 Vote négatif

A

a10

XLDnaute Impliqué

• 14 Janvier 2012

• #3

Re : copier avec des cellules fistres

Bobjour,

D'aprés david 84, c'est normal.
Moi je voudrai que lorsque je recopie je colle les informations uniqueemnt sur les cellules visibles.

A+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Janvier 2012

• #4

Re : copier avec des cellules fistres

Bonjour a10, David🙂


regarde ceci, mais comme tu donnes peu de détails sera à adapter à ton projet...

Code:

Dim p As Range
Set p = Range("_FilterDatabase")
If WorksheetFunction.Subtotal(3, p.Offset(1).Resize(p.Rows.Count - 1, 1)) > 0 Then
    p.Offset(1).Resize(p.Rows.Count - 1).Copy Sheets("Feuil2").Range("L1")
End If

bon après midi
@+

 

Vote positif 0 Vote négatif

A

a10

XLDnaute Impliqué

• 14 Janvier 2012

• #5

Re : copier avec des cellules fistres

bonjour,

Ce code c'est pour faire une macro?

a+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Janvier 2012

• #6

Re : copier avec des cellules fistres

Re,

bah oui.... sinon soit peut être un peu plus explicite....

 

Vote positif 0 Vote négatif

A

a10

XLDnaute Impliqué

• 14 Janvier 2012

• #7

Re : copier avec des cellules fistres

re,
voici un exemple de fichier:
nom critere
a 1
b 0
c 1
d 0
e 1


si je fais un filtre sur les criteres=1 j'obtiens:
nom critere
a 1
c 1
e 1

Voici je que je veux copier:
tuyau
cable
lunette

je veux copier cette liste uniquement pour les criteres =1, mais quand je copie voici le résultat:
nom critere
a 1 tuyau
c 1 lunette
e 1

et voici ce que je voudrai comme résultat en copiant et coller:
nom critere
a 1 tuyau
c 1 cable
e 1 lunette



a+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 15 Janvier 2012

• #8

Re : copier avec des cellules fistres

Bonjour,

place un tout petit fichier en pièce jointe représentant uniquement le problème posé et le résultat attendu, ce sera plus simple...

bonne journée
@+

 

Vote positif 0 Vote négatif