Page 1 of 1
ทำยังไงให้00ไม่หายครับ
Posted: Fri May 11, 2012 1:47 pm
by kalipso
คือว่า ผมใส่ข้อมูลตัวเลขในช่อง j3 '001
แล้วเมื่อกด enter ตัวเขาเดี่ยวจะหายไปเหลือแค่ตัวเลข
แต่พอผมใช้คำสั่ง sheet2.rang("j3") = sheet2.rang("j3") + 1
ค่ากลายเป็น2 ครับ ถ้าจะให้ค่ากลายเป็น 002 ทำยังไงครับ
ขอบคุณครับ
Re: ทำยังไงให้00ไม่หายครับ
Posted: Fri May 11, 2012 2:06 pm
by bank9597

ลองแนบไฟล์มาดูกันครับ
หรือให้ตอบแบบเดาสุ่ม ลองปรับโค๊ดตามนี้ครับ
Code: Select all
Sheet2.Range("j3") = Sheet2.Range("j3") + 1
Sheet2.Range("j3").NumberFormat = "000"
Re: ทำยังไงให้00ไม่หายครับ
Posted: Fri May 11, 2012 3:10 pm
by kalipso
bank9597 wrote:
ลองแนบไฟล์มาดูกันครับ
หรือให้ตอบแบบเดาสุ่ม ลองปรับโค๊ดตามนี้ครับ
Code: Select all
Sheet2.Range("j3") = Sheet2.Range("j3") + 1
Sheet2.Range("j3").NumberFormat = "000"
ได้แล้วครับขอบคุณมากเลย อธิบายโค้ด Sheet2.Range("j3").NumberFormat = "000" ให้อ่านได้ไหมครับ
ว่ามันหมายความว่อะไร
Re: ทำยังไงให้00ไม่หายครับ
Posted: Fri May 11, 2012 3:27 pm
by bank9597
ได้แล้วครับขอบคุณมากเลย อธิบายโค้ด Sheet2.Range("j3").NumberFormat = "000" ให้อ่านได้ไหมครับ
ว่ามันหมายความว่อะไร

ความหมายตามตัวครับ คือ ในชีท Sheet2 เซลล์ J3 เปลี่ยนฟอร์แมต
ตัวเลขเป็นเลข 3 หลัก
หากทำด้วยเอ็กเซลล์ก็ต้องเข้าปรับใน FormatCell > Custom ในช่อง Type คีย์ 000 ก็จะได้ผลลัพธ์เหมือนกันครับ