Snasui Excel Forum

Posted: **Thu Jan 17, 2013 10:32 pm**

จากที่แนบไฟล์ ติดตรงการใช้ userform ค่ะ ที่ form Newmachine
ตรง RefEdit1 เมื่อเข้าไปแก้ไข code คือต้องการให้เมื่อคลิกคำสั่งนี้จะให้ไปที่หน้าชีท Layout

แต่ลองใส่ code

Code: Select all

Worksheets("Layout").Activate

ไปแล้ว ไม่เกิดอะไรขึ้นค่ะ

ลองตรวจสอบให้หน่อยนะคะ

Posted: **Fri Jan 18, 2013 6:48 am**

ลองเปลี่ยนเป็น MouseUp แทนตาม Code ด้านล่างครับ

Code: Select all

Private Sub RefEdit1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As stdole.OLE_XPOS_CONTAINER, ByVal y As stdole.OLE_YPOS_CONTAINER)
   Sheets("Layout").Select
End Sub

Posted: **Fri Jan 18, 2013 7:30 am**

ได้แล้วค่ะ ขอบคุณค่ะ

Snasui Excel Forum

สอบถามเรื่อง userform ค่ะ

สอบถามเรื่อง userform ค่ะ

Re: สอบถามเรื่อง userform ค่ะ

Re: สอบถามเรื่อง userform ค่ะ