VBA copier cellules visibles

[C@thy]

Bonjour ,

j'ai des colonnes masquées, comment copier ligne après ligne sans les colonnes masquées?

Merciiiiiiiiiiiiiii

Biz et bon ouik

C@thy

 

[Compte Supprimé 979]

Re : VBA copier cellules visibles

Coucou C@thy

Pour copier ligne par ligne

For X = 1 to 10
Rows(X).SpecialCells(xlCellTypeVisible).Copy Destination:=Sheets("Feuil2").Rows(X)
Next X

Pour copier une Zone

Range("A1:Z500").SpecialCells(xlCellTypeVisible).Copy Destination:=Sheets("Feuil2").Range("A1")

Voili, voilà
Biz

 

[C@thy]

Re : VBA copier cellules visibles

Merci beaucoup Bruno , c'est exactement ce qu'il me fallait, je copie ligne par ligne plusieurs fichiers les uns en-dessous des autres pour un même individu.

Biz et bonne journée

C@thy

 

[CG2000]

Re : VBA copier cellules visibles

Bonsoir C@thy, BrunoM45,

Géniale cette solution !
Merci pour ces solutions. Une question cepeandant :Et si lignes masquées, comment copier ligne après ligne sans les lignes masquées ? est-ce réalisable?

CG2000

 

[C@thy]

Re : VBA copier cellules visibles

Bonsoir le fil,

CG20, Bruno a répondu brillamment, donc tu as la réponse à ma question (en 1er) et à la tienne (tu utilises la 2ème solution).

For X = 1 to 10
Range("A" & i :Z" & i).SpecialCells(xlCellTypeVisible).Copy Destination:=Sheets("Feuil2").Range("A" & i)

Biz

C@thy

 

[CG2000]

Re : VBA copier cellules visibles

Bonsoir le forum, bonsoir le fil,

En effet C@thy, BrunoM45 nous donne bien les deux solutions.
Trop ébahi par le premier effet, je n'ai point vu le deuxième effet.
Ceci-dit merci C@thy d'avoir fait ce fil et de nouveau merci à BrunoM45 pour les solutions.

CG2000

 

[Compte Supprimé 979]

Re : VBA copier cellules visibles

Bonsoir à vous 2

Que de compliments

Merci à vous ça fait toujours plaisir

A+