2. ดูที่ Module1 จะเห็นโค้ดของ fillText ซึ่งเป็น Macro ที่เราสร้างไว้ ดังภาพ
3. ลองทำความเข้าใจดูนิดนึง :) จะเห็นว่ามีรูปแบบคล้าย ๆ กัน คือ
Range("A5").Select
ActiveCell.FormulaR1C1 = "A"
นั่นคือ เลือก cell "A5" ก่อน (บรรทัดแรก) จากนั้นให้ใส่อักษร "A" ลงไป (บรรทัดสอง) หรืออีกนัยยะคือ ให้สมการ (Formula) ของ cell ที่เราเลือก คือ A
4. เราอาจปรับโค้ดของเราให้สั้นลง ได้ดังนี้
Range("A5").FormulaR1C1 = "A"
ซึ่งจะได้ผล "คล้ายๆ"กัน (ต่างกันตรงไหน? เอาไว้มาคุยกันคราวหน้าค่ะ)
จากนั้นปรับโค้ดทั้งหมด โดยที่
Range("E5").Select
ไม่จำเป็นสำหรับงานของเรา จึงสามารถตัดออกได้ ดังภาพ
5. กลับไปที่หน้า Excel ลอง run macro ของเราดู จะได้ผล(หมายถึงงานที่เราต้องการ)เช่นเดียวกันค่ะ
ส่วนจะต่างกันตรงไหน ?... ลองสังเกตดูเองเน้อ :P
