วิธีคัดลอกสูตรไปยังชีต Excel VBA อื่น

Excel VBA เป็นเครื่องมือที่มีประสิทธิภาพมากที่ช่วยให้คุณสามารถคัดลอกสูตรจากชีตหนึ่งไปยังอีกชีตหนึ่งโดยทางโปรแกรม ในบทความนี้ เราจะแสดงวิธีใช้ Excel VBA เพื่อคัดลอกสูตรไปยังชีตอื่น

ก่อนอื่นเราจะสร้างมาโครอย่างง่ายที่จะคัดลอกสูตรจากเซลล์หนึ่งไปยังอีกเซลล์หนึ่งบนแผ่นงานเดียวกัน จากนั้นเราจะแก้ไขแมโครเพื่อคัดลอกสูตรไปยังชีตอื่น

เริ่มต้นใช้งาน

เมื่อคุณบันทึกแมโคร Excel จะสร้างรหัส VBA โดยอัตโนมัติซึ่งคุณสามารถใช้เพื่อทำซ้ำการกระทำที่คุณบันทึกไว้ คุณยังสามารถเขียนโค้ด VBA ด้วยตนเองเพื่อให้ได้ผลลัพธ์เดียวกัน ในบทความนี้ เราจะแสดงวิธีทำทั้งสองอย่าง

การบันทึกมาโคร

เมื่อต้องการบันทึกแมโคร ให้ทำตามขั้นตอนเหล่านี้:

1. เปิดสมุดงานที่มีแผ่นงานพร้อมสูตรที่คุณต้องการคัดลอก

2. กดปุ่ม "บันทึกมาโคร" บนแท็บ "นักพัฒนา" หากคุณไม่เห็นแท็บ “นักพัฒนาซอฟต์แวร์” คลิกที่นี่เพื่อเรียนรู้วิธีเพิ่ม

3. ป้อนชื่อสำหรับมาโครของคุณและเลือกปุ่มทางลัดหากต้องการ

4. คลิก “ตกลง”

5. เลือกเซลล์ที่มีสูตรที่คุณต้องการคัดลอก

6. กด “Ctrl” + “C” เพื่อคัดลอกเซลล์ที่เลือก

7. เลือกเซลล์ที่คุณต้องการวางสูตรที่คัดลอก

8. กด “Ctrl” + “V” เพื่อวางสูตรที่คัดลอก

9. กดปุ่ม "หยุดการบันทึก" บนแท็บ "นักพัฒนา"

มาโครของคุณพร้อมใช้งานแล้ว! หากต้องการเรียกใช้ เพียงกดปุ่มทางลัดที่คุณกำหนดให้ หรือคลิกปุ่ม "มาโคร" บนแท็บ "นักพัฒนา" แล้วเลือกมาโครของคุณจากรายการ

การเขียนโค้ด VBA ด้วยตนเอง

คุณยังสามารถบรรลุผลลัพธ์เดียวกันได้ด้วยการเขียนโค้ด VBA สองสามบรรทัด โดยทำตามขั้นตอนเหล่านี้:

1. เปิดสมุดงานที่มีแผ่นงานพร้อมสูตรที่คุณต้องการคัดลอก

2. กด “Alt” + “F11” เพื่อเปิด Visual Basic Editor

3. คลิก “แทรก” > “โมดูล”

4. ป้อนรหัสต่อไปนี้ในโมดูล:

สูตรคัดลอกย่อย ()

Dim sourceRange เป็นช่วง

Dim targetRange เป็นช่วง

ตั้ง sourceRange = Range(“A1”) 'เปลี่ยน A1 เป็นเซลล์สูตรของคุณ

ตั้ง targetRange = Range(“B1”) 'เปลี่ยน B1 เป็นเซลล์วางที่คุณต้องการ

targetRange.Formula = sourceRange.Formula

จบซับ

5. กด “F5” เพื่อรันโค้ด

ตอนนี้สูตรของคุณควรถูกคัดลอกไปยังเซลล์ที่ต้องการแล้ว!

การแก้ไขมาโครเพื่อคัดลอกสูตรไปยังชีตอื่น

มาโครที่เราบันทึกไว้ในส่วนก่อนหน้าจะคัดลอกสูตรภายในชีตเดียวกันเท่านั้น อย่างไรก็ตาม คุณสามารถแก้ไขเพื่อคัดลอกสูตรไปยังชีตอื่นได้อย่างง่ายดาย โดยทำตามขั้นตอนเหล่านี้:

1. เปิดสมุดงานที่มีแผ่นงานพร้อมสูตรที่คุณต้องการคัดลอก

2. กด “Alt” + “F11” เพื่อเปิด Visual Basic Editor

3. ดับเบิลคลิกที่มาโครของคุณในรายการทางด้านซ้ายของหน้าจอ รหัสสำหรับมาโครของคุณจะปรากฏทางด้านขวา

4. ค้นหาบรรทัดของรหัสต่อไปนี้:

ตั้ง targetRange = Range(“B1”) 'เปลี่ยน B1 เป็นเซลล์วางที่คุณต้องการ

5. เปลี่ยน “B1” เป็นเซลล์บนแผ่นงานอื่นที่คุณต้องการวางสูตรโดยใช้รูปแบบนี้: SheetName!CellAddress ตัวอย่างเช่น ถ้าคุณต้องการวางสูตรลงในเซลล์ B2 บนแผ่นงานชื่อ "Sheet2" คุณต้องเปลี่ยนรหัสดังนี้:

ตั้งค่า targetRange = Sheets(“Sheet2”).Range(“B2”)

6. กด “F5” เพื่อรันโค้ด ตอนนี้สูตรของคุณควรคัดลอกไปยังแผ่นงานอื่นแล้ว!

ความคิดสุดท้าย

หลังจากอ่านบทความนี้แล้ว ตอนนี้คุณควรรู้วิธีคัดลอกสูตรไปยังแผ่นงานอื่นโดยใช้ Excel VBA คุณสามารถใช้มาโครที่บันทึกไว้ตามที่เป็นอยู่ หรือปรับเปลี่ยนให้เหมาะกับความต้องการของคุณ หากคุณต้องการเรียนรู้เพิ่มเติมเกี่ยวกับ Excel VBA โปรดดูบทความอื่นๆ ของเราในหัวข้อนี้!

นี่คือจุดสิ้นสุดของบทช่วยสอน


Minecraft เวอร์ชั่น Bedrock คืออะไร?

Minecraft เวอร์ชั่น Bedrock คืออะไร?

Minecraft มีให้บริการในทุกแพลตฟอร์มที่คุณสามารถเล่นเกมได้ ซึ่งรวมถึงแพลตฟอร์มเดสก์ท็อป แพลตฟอร์มมือถือ เกมคอนโซล รวมถึง

เปลี่ยนชื่อไดรฟ์ใน Windows ด้วย Drive Namer

เปลี่ยนชื่อไดรฟ์ใน Windows ด้วย Drive Namer

สมมติว่าคุณมีเครื่องเขียนดีวีดีสองตัวติดตั้งอยู่ในคอมพิวเตอร์ของคุณ ทั้งสองไดรฟ์มีตัวอักษรต่างกันแต่มีชื่อเหมือนกัน นั่นคือ 'DVD-RW' ไม่มีทางเข้ามา

Screen2Exe – ซอฟต์แวร์จับภาพวิดีโอหน้าจอทันทีฟรี

Screen2Exe – ซอฟต์แวร์จับภาพวิดีโอหน้าจอทันทีฟรี

คุณต้องการสาธิตวิธีการใช้ผลิตภัณฑ์หรือซอฟต์แวร์ให้ผู้อื่นดูหน้าจอแบบทันทีหรือไม่ หรือบางทีคุณอาจต้องการสอนวิธีเข้าถึงตัวเลือกหรือก

วิธีสร้างปฏิทินรูปภาพส่วนบุคคลฟรี

วิธีสร้างปฏิทินรูปภาพส่วนบุคคลฟรี

TKexe Kalendar (ลิงค์ดาวน์โหลดโดยตรงคือ (https://www.tkexe.eu/kalender/install/setup_ca_en.exe) ที่นี่) เป็นซอฟต์แวร์ฟรีที่ช่วยคุณในการสร้าง

Steam เข้ากันได้กับ Windows 10 Creators Update หรือไม่

Steam เข้ากันได้กับ Windows 10 Creators Update หรือไม่

Steam เข้ากันไม่ได้กับ Windows 10 Creators Update หรือไม่

วิธีรีสตาร์ทไดรเวอร์กราฟิกในคอมพิวเตอร์ Windows หรือ macOS

วิธีรีสตาร์ทไดรเวอร์กราฟิกในคอมพิวเตอร์ Windows หรือ macOS

มาเป็นผู้เชี่ยวชาญด้านการแก้ไขปัญหาพีซีของคุณเองโดยเรียนรู้วิธีรีสตาร์ทไดรเวอร์กราฟิกและจัดการกับปัญหาที่เกี่ยวข้องกับกราฟิกที่ไม่พึงปรารถนาอย่างชาญฉลาด

วิธีปิดคำบรรยายสดบน Windows

วิธีปิดคำบรรยายสดบน Windows

คำบรรยายสดอาจสร้างความรำคาญให้กับหน้าจอของคุณหากคุณไม่ต้องการ คุณสามารถปิดใช้งานได้ด้วยวิธีง่ายๆ เหล่านี้

Media Center Studio – ปรับแต่งรายการเมนูเริ่มของ Windows Media Center

Media Center Studio – ปรับแต่งรายการเมนูเริ่มของ Windows Media Center

แม้ว่า Windows Media Center จะมีชุดเครื่องมือที่ดีรวมอยู่ในเมนูต่างๆ ตั้งแต่ Extras, Pictures+Videos, Music, etc. ผู้ใช้จำนวนมาก

วิธีรักษาความปลอดภัย Windows Server ของคุณ

วิธีรักษาความปลอดภัย Windows Server ของคุณ

ยังใหม่กับ Windows Server และต้องการเพิ่มความปลอดภัยหรือไม่? คู่มือนี้สามารถช่วยได้ อธิบายวิธีการรักษาความปลอดภัย Windows Server ของคุณ

วิธีปิดการแจ้งเตือนบน Windows 11

วิธีปิดการแจ้งเตือนบน Windows 11

รับการแจ้งเตือนที่น่ารำคาญอย่างต่อเนื่องบน Windows 11 หรือไม่ นี่คือตัวเลือกที่รวดเร็วและชาญฉลาดที่คุณสามารถเปิดใช้งานเพื่อปิดได้