Page 1 of 1

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

Posted: Tue Jan 15, 2013 11:31 pm
by tantanz
จากไฟล์ เมื่อกดปุ่มคำนวณระยะทางใน sheet1 แล้ว
จะคำนวณค่าออกมาซึ่งอยู่ในรูปแบบตารางใน sheetที่ชื่อ FromToDis ค่ะ แต่ติดตรงจะทำการตีตารางล้อมรอบทุกช่องที่มีข้อมูลในหน้านั้นค่ะ
มีแนวทางยังไงบ้างคะ :D :D

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

Posted: Tue Jan 15, 2013 11:47 pm
by snasui
:D ได้ลองเขียน Code การตีตารางไว้แล้วหรือไม่ หากเขียนไว้แล้วอยู่ใน Module ใด Code ชื่ออะไรครับ

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

Posted: Wed Jan 16, 2013 12:02 am
by tantanz
คือไม่ทราบว่าใช้ฟังก์ชั่นใดในการเขียนเลยได้ทำการบันทึกแมโครดูแล้วค่ะ
ได้ code ดังในไฟล์อันใหม่ที่แนบมา ซึ่งยาวมาก ^^"
อยากถามว่ามีวิธีการอื่นไหมคะ

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

Posted: Wed Jan 16, 2013 12:08 am
by snasui
:D ลองปรับ Code เป็นตามด้านล่างครับ

Code: Select all

'Other code
Range("A3:F8").Borders.LineStyle = xlContinuous
'Other code

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

Posted: Wed Jan 16, 2013 12:19 am
by tantanz
ขอบคุณมากค่ะ :))