Page 1 of 1

Range().Select

Posted: Tue Apr 23, 2019 9:00 am
by 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

ขอบคุณครับ

Re: Range().Select

Posted: Tue Apr 23, 2019 2:37 pm
by logic
แบบนี้หรือเปล่าครับ

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

Re: Range().Select

Posted: Tue Apr 23, 2019 5:28 pm
by 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 ครับ