Page 1 of 1

การสร้างปุ่ม Edit

Posted: Wed Mar 06, 2013 10:05 am
by nongnii
พึ่งเริ่มต้นเรียนรู้ excel อะค่ะ อยากได้วิธีการสร้างปุ่ม edit ค่ะ คือเมื่อกดข้อความที่ต้องการแก้ไขแล้วให้โชว์ขึ้นมา
ให้แก้ เมื่อแก้แล้วจะบันทึกแทนที่อะค่ะ อยากทราบว่าจะต้องเขียนโค้ดใน VBA อย่างไงค่ะ

Re: การสร้างปุ่ม Edit

Posted: Wed Mar 06, 2013 10:51 am
by bank9597
nongnii wrote:พึ่งเริ่มต้นเรียนรู้ excel อะค่ะ อยากได้วิธีการสร้างปุ่ม edit ค่ะ คือเมื่อกดข้อความที่ต้องการแก้ไขแล้วให้โชว์ขึ้นมา
ให้แก้ เมื่อแก้แล้วจะบันทึกแทนที่อะค่ะ อยากทราบว่าจะต้องเขียนโค้ดใน VBA อย่างไงค่ะ
:D หากต้องใช้ vba ตามกฏต้องเขียนมาเองก่อนครับ

Re: การสร้างปุ่ม delete

Posted: Mon Mar 11, 2013 11:15 am
by nongnii
สร้างปุ่ม delete ด้วยโค้ด Range("B23:K40").ClearContents
แต่ถ้าอยากจะลบที่ละบรรทัดจะต้องเขียนอย่างไรค่ะ
ต้องใช้ifหรือเปล่าค่ะ ขอบคุณค่ะ

Re: การสร้างปุ่ม Edit

Posted: Mon Mar 11, 2013 12:03 pm
by joo
:D ลองแนบไฟล์และตัวอย่างโค๊ดที่ทำแล้ว ระบุ Module, Procedure ที่ติดปัญหามาดูกันหน่อยครับ

Re: การสร้างปุ่ม Edit

Posted: Mon Mar 11, 2013 12:39 pm
by nongnii
ค่ะได้แล้วค่ะ ขอบคุณค่ะ

Re: กำหนดพื้นที่

Posted: Tue Mar 19, 2013 2:47 pm
by nongnii
สวัสดีค่ะ การกำหนดพื้นที่นั้นต้องกำหนดอย่างไงดีค่ะ แบบว่าไม่ให้รหัสขึ้นเกิน 10 อะค่ะ
พอดีใส่ สูตร ="A0000-00000" &counta(A10:A20)+1 แต่ไม่สามารถกำหนดให้อยู่แค่
A0000-00010 ได้อะค่ะ ต้องกำหนด if อย่างไรค่ะ

Re: การสร้างปุ่ม Edit

Posted: Tue Mar 19, 2013 2:55 pm
by joo
:D แนบไฟล์มาดูกันหน่อยครับ เงื่อนไขเป็นอย่างไร ต้องการคำตอบที่ซีทไหน เซลล์ไหนเป็นอย่างไรระบุให้ชัดเจน จะได้เข้าใจตรงกันครับ

Re: การสร้างปุ่ม Edit

Posted: Tue Mar 19, 2013 3:34 pm
by nongnii
ใส่สูตรใน excel ค่ะ ใน sheet1
ใสสูตรใน Sheet1 ช่อง B1
สูตร ="A0000-00000" &counta(A10:A20)+1
เมื่อใส่ขอมูลในช่องA1 จะขึ้น A0000-00001 อะค่ะ แต่อยากกำหนดให้ลงข้อมูลได้แค่
A0000-00010 อะค่ะ

Re: การสร้างปุ่ม Edit

Posted: Tue Mar 19, 2013 3:54 pm
by joo
:D อ่านแล้วไม่เข้าใจครับ
joo wrote:แนบไฟล์มาดูกันหน่อยครับ เงื่อนไขเป็นอย่างไร ต้องการคำตอบที่ซีทไหน เซลล์ไหนเป็นอย่างไรระบุให้ชัดเจน จะได้เข้าใจตรงกันครับ