macro : sélectionner lignes

gdel45 · 3 Février 2010

bonour,

quelqu'un est-il en mesure de me fournir la macro permettant de sélectionner les lignes actives d'un tableau, c'est-à-dire de la ligne1 jusqu'à la dernière ligne utile, sachant que des lignes intermédiaires peuvent être vides.
merci d'avance pour votre aide

Pierrot93 · 3 Février 2010

Re : macro : sélectionner lignes

Bonjour gdel

essaye peut être le code ci-dessous, si j'ai bien compris :

Code:

Option Explicit
Sub test()
Dim p As Range, i As Long
For i = 1 To Cells.Find("*", , xlValues, , 1, 2, 0).Row
    If Application.CountA(Rows(i)) > 0 Then
        Set p = Union(IIf(p Is Nothing, Rows(i), p), Rows(i))
    End If
Next i
p.Select
End Sub

bonne soirée
@+

gdel45 · 3 Février 2010

Re : macro : sélectionner lignes

Merci beaucoup Pierrot, cela fonctionne parfaitement.
Bonne soirée

macro : sélectionner lignes

gdel45

Guest

Pierrot93

XLDnaute Barbatruc

gdel45

Guest

Discussions similaires

macro : sélectionner lignes

gdel45

Guest

Pierrot93

XLDnaute Barbatruc

gdel45

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency