Copier/coller cellule non vide d'un tableau

micapilote · 4 Décembre 2011

Bonjour, j'ai eu beau passer par la recherche, je ne trouve pas le but recherché,
je cherche en effet à copier / coller par macro uniquement les cellules non vides d'un tableau vers un autre tableau de la même feuille.
j'avais trouvé un méthode (que j'ai oublié) mais qui était très très lente.
Merci

Fred0o · 4 Décembre 2011

Re : Copier/coller cellule non vide d'un tableau

Bonjour micapilote,

Peut-être ceci correspondra-t-il à ton besoin ?

VB:

Sub Essai()
    Application.ScreenUpdating = False
    Dim Li, Co
    For Co = 1 To 5
        For Li = 1 To 5
            If Cells(Li + 1, Co) = "" Then Cells(Li + 1, Co) = Cells(Li + 1, Co + 6)
        Next
    Next
    Application.ScreenUpdating = True
End Sub

A+

micapilote · 4 Décembre 2011

Re : Copier/coller cellule non vide d'un tableau

Merci beaucoup, c'est au poil

Odette · 4 Décembre 2011

Re : Copier/coller cellule non vide d'un tableau

Bonjour,

Tu peux le faire très facilement en faisant simplement un copier/collage spécial et cocher "Blancs non compris"

Ça prend 2 secondes!

Odette

Copier/coller cellule non vide d'un tableau

micapilote

XLDnaute Junior

Pièces jointes

Fred0o

XLDnaute Barbatruc

micapilote

XLDnaute Junior

Odette

XLDnaute Nouveau

Discussions similaires