EXCEL 2007 : PB filtres / Copier-Coller

Merci bcp,

il fallait la trouver celle-là!

je peux enfin coller une serie de données (cellules contigües) sur un zone de cellules filtrées sans que les données finissent dans les cellules masquées.

télécharge le Service Pack 1 pour microsoft office system 2007. ca devrait régler le tout...

Voici une petit macro que je me suis fait et que j'ai mis dans mon fichier de démarage excel

Sub past_tres_special2()
'
'Copier coler avec des filtre en respectant les ligne non sélectionné
'
'YunZuki
'2008-05-14
'

'***************************************
'Variable

' entrez la valeur du mesage box saisit dans la variable ColStrt
ColStrt = InputBox("Entrez la lettre de la Colonne à copier :", "Colonne copiée")
' Si l'utilisateur n'a saisie aucune donnée et qu'il clique sur OK,
' ou si l'utlisateur clique sur Annuler, on quitte la procédure.
If ColStrt = "" Then
MsgBox "Aucune donnée n'a été saisie"
Exit Sub
' Sinon la donnée saisie est affichée
Else

ColEnd = InputBox("Entrez la lettre de la Colonne à coller :", "Colonne collée")
If ColEnd = "" Then
MsgBox "Aucune donnée n'a été saisie"
Exit Sub
Else

LineStart = InputBox("Entrez la ligne de départ :", "Ligne départ")
If LineStart = "" Then
MsgBox "Aucune donnée n'a été saisie"
Exit Sub
Else

LineEnd = InputBox("Entrez la ligne de départ :", "Ligne de fin")
If LineEnd = "" Then
MsgBox "Aucune donnée n'a été saisie"
Exit Sub
Else

'***************************************
'paste

x = LineStart
For x = LineStart To LineEnd
If Range("A" & x).Height <> 0 Then
Range(ColEnd & x).Value = Range(ColStrt & x).Value
End If
Next

'***************************************
'Fin des if des variable
End If
End If
End If
End If

End Sub

Tu peux copier la sélection qui t'intéresse puis faire un collage spécial "Valeur et format des nombres".

SI tu fait un filtre (certaine ligne ce cache)
fait une sélection de plusieurs lignes consécutives (ligne qui ne se suivent opas sans filtre)
ex.: ligne 2, 4 et 8 de la colonne "A"
sans désactiver les filtre tu sélection la ligne 2 de la colonne B
en suite coller

Résultat obtenu :
les valeurs de A2, A4 et A8 ce retrouvent en B2, B3 & B4

Résultat voulu :
Les valeurs de A2, A4 et A8 ce retrouvent en B2, B4 & B8

c'est simple et c'est ce que la macro fait
mais il y a peux-être une solution "out of the box" dans Excel.

Merci

au temps pour moi... :(

je me suis emballé trop vite.

bonjour el Musho,

merçi pour cette astuce elle existait à l'époque de excel2003
cela a sauvé le logiciel excel2007 car j'étais prêt à le deleter.

Comment avez-vous fais pour trouver cette astuce?
car les habitudes que j'avais sur excel2003, je ne les trouves
plus sur excel2007 c'est complétement déroutant!

cordialement
phil

Filtrer le tableaucomme souhaité avec le filtre automatique
Sélectionner tout le tableau
Appuyer sur la touche du clavier [F5]
Appuyer sur le bouton [Cellules...] en bas à gauche
Cocher la case "Cellules visibles seulement" dans la colonne de droite
Procéder au Copier-Coller

vu sur :https://www.excel-downloads.com/threads/coller-dans-une-liste-filtree-automatiquement.72768/

Je me suis inspiré des reponses de ce thread et d'autres pour écrire une macro qui coupe une plage de cellules de 2 colonnes et x lignes et la colle 2 cellules vers la gauche.
C'est evidemment modifiable (notemment remplacer copy par cut pour une copie), en espérant que ca puisse aider les prochains à moins galérer que moi

Sub Cut2col()
Dim i As Long
Dim j As Long
Dim fin As Long

fin = Selection.Count / 2 ' compte le nombre de cellules selectionnees et le divise par 2 (on a 2 colonnes)
For i = 1 To fin ' descend les colonnes
If ActiveCell.Rows.Height <> 0 Then ' si la cellule est apparente (taille non nulle)
For j = 1 To 2 ' fait les 2 colonne de la ligne
ActiveCell.Cut Destination:=ActiveCell.Offset(0, -2) ' copie 2 cellules vers la gauche
ActiveCell.Offset(0, 1).Select ' selectionne la cellule de droite
Next
ActiveCell.Offset(0, -2).Select ' revient dans la colonne de depart
End If
ActiveCell.Offset(1, 0).Select ' passe a la ligne suivante
Next
End Sub

Bonsoir,

J'utilise régulièrement les filtres sous excel 2007 et mes copier coller fonctionnent très bien ??? Je ne comprends pas ce qu'il vous arrive.

Chez moi ça marche bien.Pouvez-vous détailler exactement votre problème et les manipulations que vous effectuez ?

Bonne soirée et à bientôt.

Wanajo38

P.S. : fan d'Excel 2007 !!! c'est trop puissant comme logiciel