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

[yoguzaa]

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

Code: Select all

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

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

[yoguzaa]

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

[snasui]

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

Code: Select all

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