Goedemiddag,

Graag wil ik in een macro een commando invoegen om de eerste lege cel in kolom B te selecteren. (rij 1 moet overgeslagen worden, want deze is geheel leeg).
Wie kan mij helpen ?

Bedankt voor jullie reacties.

M.vr.gr.
Eric

Hoi Softaid,

Misschien wil iemand mij zeggen wat ik verkeerd doe

Graag zelfs.

Ik ben ook geen crack in VBA, maar je verwijzing in die Cells klopt niet. (Toch niet zoals ik het geleerd heb )

If Cells("B" & rij).Value = "" Then GoTo a

Range("B" & rij).Select
End Sub

Deze lijnen zijn zeker fout.
Het Cells object word anders aangesproken dan een Range object. Veronder stel dat je de cel A5 wil aanspreken met het Cell object schrijf je dit als: Cells(5 ,1)  (rij 5, kolom1).

Probeer het eens op deze manier.
Sub legecel()
For rij = 1 To 200
        If Cells(rij, 2).Value = "" Then
            Cells(rij, 2).Select
            Exit For
        End If
    Next rij
   
End Sub


Wil je in deze cel een waarde opnemen, ga je ongeveer te werk zoals in onderstaand voorbeeldje. Het is allemaal afhankelijk van de toepassing waarin je deze wilt gebruiken.

Sub legecel()
varLegeCel = 0
For rij = 1 To 200
        If Cells(rij, 2).Value = "" Then
            varLegeCel = rij
            Sheets("Blad1").Cells(varLegeCel, 2).value= "test"
            Exit For
        End If
    Next rij
   
End Sub

Groetjes

PS. Ik kan er misschien compleet naast zitten (dat zullen we dan wel horen van de echte Excelspecialisten ), maar ik heb toch een degelijke poging ondernomen.