Décaler ligne de tableau

ascal44 · 22 Avril 2009

Bonjour,
je joint un fichier où je voudrais décaler des lignes vers le haut si des cellules de la colone D sont vide.

mromain · 22 Avril 2009

Re : Décaler ligne de tableau

bonjour ascal44

voici un code à adapter :

Code:

Sub test()
noColonneTrain = 4
moPremiereLigneTableau = 4

With ActiveSheet
    For i = .Cells(.Rows.Count, noColonneTrain).End(xlUp).Row To moPremiereLigneTableau Step -1
        If .Cells(i, noColonneTrain).Text = vbNullString Then .Rows(i).Delete
    Next i
End With
End Sub

a+

ascal44 · 23 Avril 2009

Re : Décaler ligne de tableau

Bonjour,
cela fonctionne, mais j'ai des données à coté du tableau que je ne voudrais voir disparaitre.

Comment appliquer ce code aux seules cellules B4:F18 ?

Décaler ligne de tableau

ascal44

XLDnaute Occasionnel

Pièces jointes

mromain

XLDnaute Barbatruc

ascal44

XLDnaute Occasionnel

Discussions similaires

Décaler ligne de tableau

ascal44

XLDnaute Occasionnel

Pièces jointes

mromain

XLDnaute Barbatruc

ascal44

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency