انتخاب اخرين سلول استفاده شده

[ali.b]

سلام دوستان وقت شما بخير
دنبال ي كدي ميگردم كه اخرين سول استفاده شده از يك رنج يا محدوه نام گذاري شده (named range) رو برام انتخاب كنه

مثلا اگه named range از B4:B13 هست از بين اين رنج اخرين سلول پر شده رو برام اينخاب كنه
ممنون

[Amir Ghasemiyan]

سلام دوست عزیز
خدمت شما

Sub LastFilledCell()
For Each cel In Range("myrange")
    If cel.Value = "" Then
        cel.Offset(-1, 0).Activate
        Exit For
    End If
Next cel
End Sub