Snasui Excel Forum

Posted: **Fri May 25, 2012 5:52 pm**

ถ้าหากว่าต้องการรับค่าของ InputBox เขียนโค้ดคำสั่งยังไงครับ

Inputbox ("กรุณากรอกชื่อ")

ไม่ได้แนบไฟล์ตัวอย่าง ขอโทษด้วยครับพอดีตั้งกระทู้จากโทรศัพท์ครับ

Posted: **Fri May 25, 2012 5:55 pm**

สมมติว่าชื่อที่กรอกให้ส่งข้อความไปที่ sheet1 column:A row:1 ครับ

Posted: **Fri May 25, 2012 7:58 pm**

ต้องกำหนดตัวแปรให้กับค่าที่จะส่งไปยัง Sheet1!A1 ครับ เช่น

sub Test()
   dim s as string
   s = inputbox("กรุณากรอกชื่อ")
   sheets("sheet1").range("a1") = s
end sub

ขอวิธีเชื่อมโยงข้อความของ InputBox ครับ