[Excel2k] Cellen op regel controleren

[-=Sentinel=-]

Ik ben bezig met een macro te maken die controleert of een regel leeg is. Ik kan wel controleren of een bepaalde cel op die regel leeg is, maak ik kan er niet achterkomen hoe ik kan zien of de hele regel leeg is. Ik heb het volgende:

Visual Basic:

For Each s In Range("B4:B100")
        If s.Value = "" Then
            Rows("100:100").Copy
            s.EntireRow.Select
            ActiveSheet.Paste
        End If
Next s

Nu controleert ie aleen in kolom B of die waardes leeg zijn. Hoe kan ik ook in de rest van de kolommen controleren of die cellen leeg zijn?

[BtM909]

Je kan dit probleem ook op een andere (snellere) manier oplossen:

Visual Basic:

    Range("A100").Select
    Selection.End(xlToRight).Select
    If (ActiveCell.Column = 256) Then
        'yep: lege regel
    Else
        'nope: geen lege regel!
    End If

edit:
Wil je nou checken op lege rows of lege columns

[ Voor 15% gewijzigd door BtM909 op 18-07-2003 14:19 ]

[-=Sentinel=-]

Ik wil controleren welke regels leeg zijn. Als ie een lege regel tegenkomt, moet ie een bepaalde regel (regel 100) plakken op de lege regel.

[BtM909]

Mijn stukje code checkt of regel 100 leeg is. Dan kan je deze toch iets aanpassen?

[-=Sentinel=-]

Ik ga het proberen. Bedankt!