Range().Select

[YiFeng]

Range("A2").Select หมายถึง Active ที่ cell A2
Selection.End(xlDown).Select หมายถึง cell ที่ active จะเป็น cell สุดท้ายใน column A ที่มีค่าอยู่ ซึ่งก็คือ A2409
Range("F2409").Select หมายถึง ผมต้องการให้ cell ที่ active คือ column F และเป็นบรรทัดสุดท้ายที่มีค่าใน column A ซึ่ง ก็คือ บรรทัดที่ 2409 ซึ่งได้ cell ที่ active คือ F2409

คำถามคือว่า ผมสามารถกำหนดอย่างไรเพื่อให้ Range("F2409") เป็นค่าที่เปลี่ยนไปเรื่อยๆตาม Selection.End(xlDown).Select

ขอบคุณครับ

[logic]

แบบนี้หรือเปล่าครับ

range("a2").end(xldown).offset(0,5).select

[ivan901]

ตั้งค่าตัวแปรเพื่อเก็บค่าข้อมูลที่นับใน Column A แล้วกำหนดค่า Cell ไปหา Row ที่เก็บค่าไว้

Code: Select all

Sub GotolastRow()

Dim lastrow As Integer     'กำหนดตัวแปร
lastrow = Application.WorksheetFunction.CountA(Range("A:A"))  'เก็บข้อมูลตัวแปรโดยการนับจำนวนข้อมูลใน Column A
Cells(lastrow + 1, 6).Select     'ไปหา Cell สุดท้าย 

End Sub

lastrow เป็นตัวแปรที่เก็บจำนวนข้อมูลใน Column A
ส่วน +1 คือช่องว่างในส่วนของ Row ที่ 1
6 คือ Column ที่ 6 ก็คือ Column F ครับ