copier cellules non vide

[remy]

Bonsoir tout le monde,

Je voudrais copier sans le format les cellules de la feuille 1 dans la feuille 2.
:evil:
Mais voila il ne faut copier que les lignes dont la cellule « E » est pleine, de plus dans un ordre différent des cellules.
:unsure:
Merci pour votre aide.
Voir le fichier joint si mes explications ne sont pas claires.


[file name=colonnes_20051104214847.zip size=5160]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/colonnes_20051104214847.zip[/file]

 

[Bernard_XLD]

Bonjour remy

voila un exemple de code qui copiera les données de la feuille 1 sur la feuille 3

Cordialement, A+

Sub Copy()
Sheets(1).Range('E2:E' & Sheets(1).Range('E65536').End(xlUp).Row).SpecialCells(xlCellTypeConstants, 23).EntireRow.Copy
With Sheets(3)
    .Range('A1:IV' & Sheets(1).Range('E2:E' & Sheets(1).Range('E65536').End(xlUp).Row).SpecialCells(xlCellTypeConstants, _
    23).Count).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
    .Columns('D:D').Cut
    .Columns('C:C').Insert Shift:=xlToRight
    .Columns('F:F').Cut
    .Columns('D:D').Insert Shift:=xlToRight
    .Columns('G:G').Cut
    .Columns('F:F').Insert Shift:=xlToRight
End With
End Sub

 

[remy]

Bonjour Yeahou, le Forum,
Ton code ,Yeahou marche a merveille........
Merci...

Serait il possible de reconstruire la feuille 1 grace a la feuille 3. :silly:
Sachant que la cellule maitre est la cellule 'A'.

Cordialement
@+ [file name=colonnes_V2.zip size=11745]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/colonnes_V2.zip[/file]

 

[Guest]

 

[remy]

Bonsoir le forum,

Dommage j’ai cru que tu avais une solution l’inconnu…… :ermm:
(Post precedent)

Salutation.

 

[remy]

Bonjour le forum,

Le code de Yeahou me pose un petit probleme
Il me selectionne la ligne entiere !!!!!(EntireRow)
Comment ne copier que les 9 colonnes de la feuille1
Pour les copier dans la feuille3


Merci d'avance
A+