Verwenden Sie die Variable in Bereich Anweisung

Question

Mein Code ist entworfen, um die erste leere Zelle in Spalte a zu finden, legen Sie eine Variable, und verwenden Sie dann diese Variable finden Sie die Zelle 3 Spalten in derselben Zeile.

'Find Last empty cell in first column 
Dim rngSelect As Range 
Dim rngFstAcCell As Range 
Dim rngLstAcCell As Range 

Set rngSelect = Cells(Rows.Count, "A").End(xlUp).Offset(1) 
MsgBox rngSelect.Address 'just to check 
rngFstAcCell = Range(rngSelect.Address).Offset(0, 3) 

Objektvariable oder mit Blockvariable, die nicht auf der letzten Anweisung gesetzt ist, was ich bekomme. Was mache ich falsch mit dieser Linie. Was ich versuche, ist die Variable rngSelect ... als Lernübung zu verwenden. danke

Answer 1

Fehlende Set. Außerdem haben Sie bereits ein Range-Objekt in rngSelect, so dass Sie Address und Range nicht so verwenden müssen.

Set rngFstAcCell = rngSelect.Offset(0, 3)