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

[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