Page 2 of 2
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Fri Mar 22, 2013 7:41 pm
by snasui
Code ที่เขียนมาไม่มี End Sub ช่วยเขียนให้ครบแล้วแนบมาใหม่หากยังติดปัญหา
กรณีต้องการจะเที่ยบค่ากับชีทอื่นให้อ้างชื่อชีทเข้าไปใน Code ด้วยครับ เช่น
Code: Select all
'Other code
ElseIf Sheets("Database").Range("A2") = 1 Then
.Range("N204") = .Range("N204") + 1
'Other code
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Fri Mar 22, 2013 8:09 pm
by suka
ได้ตรงตามต้องการแล้วค่ะ ขอบคุณอาจารย์มากๆเลยค่ะ
ขอรบกวนถามเพิ่มนะคะ
ที่ชีท Sheet5 สูตรการนำข้อมูลจากหลาย Sheet มาต่อกันใน Sheet เดียว
หากเราต้องการนำข้อมูลจากไฟล์อื่นๆมาต่อด้วยจะได้ไหมค่ะ
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Fri Mar 22, 2013 8:14 pm
by snasui
สามารถนำข้อมูลจากไฟล์อื่นมาต่อกันได้
แต่จะต้องเปิดไฟล์ต้นทางไว้ด้วยทุกครั้งครับ
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Sat Mar 23, 2013 11:18 am
by suka
การนำข้อมูลจากไฟล์อื่นมาต่อกันโดยใช้สูตร Excel ตามลิงค์นี้
http://snasui.blogspot.com/2009/12/sheet-sheet.html มาปรับใช้
กับการใช้ VBA บันทึกข้ามชีท มีผลต่างกันไหมคะ
อยากขอความรู้เรื่องข้อควรระวังทั้งการใช้ สูตร Excel และ การใช้ VBA ค่ะ
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Sat Mar 23, 2013 11:22 am
by snasui
ถ้าเขียน VBA ได้ก็ไม่จำเป็นที่จะต้องเขียนสูตรลักษณะนั้นครับ เพราะ VBA สามารถเขียนอย่างไรก็ได้
การใช้ VBA ข้อจำกัดอยู่ที่ผู้ใช้ครับ ไม่ใช่ติดว่าต้นแหล่งเป็นอะไร ต้นแหล่งเป็นอย่างไร
Re: ต้องการเพิ่มโค๊ด VBA รันตัวเลขเพิ่มอีกหนึ่งชุดค่ะ
Posted: Sat Mar 23, 2013 12:10 pm
by suka
ขอบคุณค่ะอาจารย์ จะพยายามศึกษาการใช้ VBA ให้เข้าใจมากขึ้นค่ะ