สารบัญ
เมื่อเราต้องการคัดลอกและวางข้อมูลใดๆ ใน Microsoft Excel เรามีเครื่องมืออำนวยความสะดวกทางลัดและ Ribbon ต่างๆ ใน Excel Excel VBA มาโครมีสิ่งอำนวยความสะดวกดังกล่าวมากกว่าตัวเลือกสมุดงาน เราจะหารือเกี่ยวกับค่าและรูปแบบ VBA Paste Special ใน Excel
ดาวน์โหลดแบบฝึกหัดแบบฝึกหัด
ดาวน์โหลดแบบฝึกหัดแบบฝึกหัดนี้เพื่อทำแบบฝึกหัดในขณะที่คุณกำลังอ่าน บทความนี้
ค่าและรูปแบบโดยใช้ PasteSpecial.xlsm
9 ตัวอย่างการคัดลอกค่าและรูปแบบด้วย Paste Special ใน Excel VBA
ในบทความนี้ เราจะพูดถึง 9 วิธีการกับ VBA Macros เพื่อ วางแบบพิเศษ ค่าและรูปแบบใน Excel
เราจะ พิจารณาชุดข้อมูลด้านล่างเพื่อจุดประสงค์นี้
1. ใช้ InputBox ใน VBA Paste Special เพื่อคัดลอกค่าและรูปแบบ
เราจะใช้ตัวเลือก InputBox ในตัวอย่างนี้สำหรับ Paste Special .
ขั้นตอนที่ 1 :
- ไปที่แท็บ นักพัฒนาซอฟต์แวร์
- คลิกที่ บันทึกมาโคร
- ตั้งค่า Excel_Paste_Special_1 เป็น ชื่อมาโคร .
- จากนั้นกด ตกลง .
<0 ขั้นตอนที่ 2:
- ตอนนี้ คลิกคำสั่ง มาโคร
- เลือก มาโคร แล้วกด เข้าสู่ขั้นตอน .
ขั้นตอนที่ 3:
- คัดลอกและวางข้อมูลต่อไปนี้ รหัสบนโมดูลคำสั่ง
3804
ขั้นตอนที่ 4:
- กด F5 เพื่อเรียกใช้รหัส
- กล่องโต้ตอบใหม่จะปรากฏขึ้น เลือกช่วงแหล่งที่มาในช่องนั้น
- จากนั้นกด ตกลง .
ขั้นตอนที่ 5:
- กล่องโต้ตอบอื่นจะปรากฏขึ้น เลือกช่วงว่างที่จะวางเซลล์ที่คัดลอก
ตอนนี้ ให้ดูที่ชุดข้อมูล
ข้อมูลทั้งหมดจะถูกคัดลอกด้วยค่าและรูปแบบโดยใช้ VBA Paste Special .
อ่านเพิ่มเติม: วิธีใช้ VBA PasteSpecial และเก็บการจัดรูปแบบต้นฉบับใน Excel
2. แทรกช่วงเซลล์ด้วยค่าและรูปแบบโดยใช้ xlPasteAllUsingSourceTheme ใน VBA Paste Special
เราจะแทรกช่วงเซลล์โดยตรงในโค้ด VBA ในส่วนนี้
ขั้นตอนที่ 1:
- กด Alt+F11 เพื่อเข้าสู่โมดูลคำสั่ง
- ใส่รหัสต่อไปนี้ในโมดูลคำสั่ง<13
6213
ขั้นตอนที่ 2:
- ตอนนี้ กด F5 เพื่อเรียกใช้โค้ด
คำสั่ง xlPasteAllUsingSourceTheme นี้คัดลอกข้อมูลต้นฉบับที่ซ้ำกันทุกประการ
อ่านเพิ่มเติม: <2 Excel VBA: คัดลอกค่าเซลล์และวางลงในเซลล์อื่น
3. ใช้ตัวแปร VBA เพื่อแทรกช่วงที่มีค่าและรูปแบบโดยใช้การวางแบบพิเศษ
เราจะแสดงการใช้ตัวแปรในโค้ด VBA Paste แบบพิเศษ ที่นี่
ขั้นตอนที่ 1:
- ขั้นแรก ป้อนโมดูลคำสั่งโดยกด Alt+F11
- เขียนโค้ดด้านล่างในคำสั่งโมดูล
1948
ขั้นตอนที่ 2:
- กด F5 และเรียกใช้ รหัส
อ่านเพิ่มเติม: Excel VBA: คัดลอกช่วงไปยังสมุดงานอื่น
4. ใช้ xlPasteValues และ xlPasteFormats เพื่อคัดลอกค่าและรูปแบบในแผ่นงานอื่นโดยไม่เปลี่ยนแปลงรูปแบบ
วิธีการข้างต้นใช้สำหรับการคัดลอกและวางข้อมูลในแผ่นงานเดียวกัน ตอนนี้ เราจะแสดงวิธีใช้ VBA Paste Special สำหรับแผ่นงานต่างๆ
ขั้นตอนที่ 1:
- ป้อนโมดูลคำสั่ง โดยคลิก Alt+F11 และคัดลอกโค้ดต่อไปนี้ลงไป
5822
ขั้นตอนที่ 2:
- กด F5 เพื่อรันโค้ด
เราจะเห็นว่าข้อมูลของ Data_Set ถูกคัดลอกไปที่ Different_Sheet .
อ่านเพิ่มเติม: วิธีใช้ VBA PasteSpecial สำหรับสูตรและรูปแบบใน Excel (3 วิธี)
การอ่านที่คล้ายกัน
- วิธีคัดลอกหลายเซลล์ไปยังชีตอื่นใน Excel (9 วิธี)
- ความแตกต่างระหว่างการวางและการวางแบบพิเศษใน Excel
- Excel VBA เพื่อคัดลอกข้อมูลจากสมุดงานอื่นโดยไม่ต้องเปิด
- วิธีคัดลอกและวางใน Excel และ รักษาขนาดเซลล์ (7 ตัวอย่าง)
- คัดลอกและวางค่าไปยังแถวว่างถัดไปด้วย Excel VBA (3 ตัวอย่าง)
5 . ใช้ xlPasteFormats เพื่อวางรูปแบบเท่านั้น
ในวิธีการก่อนหน้านี้ เราคัดลอกข้อมูลทั้งหมดแล้ววางโดยไม่มีการเปลี่ยนแปลง แต่ในส่วนนี้ เราจะคัดลอกเฉพาะรูปแบบของข้อมูลเท่านั้น
ขั้นตอนที่ 1:
- ไปที่โมดูลคำสั่งโดยกด Alt+ F11 .
- คัดลอกและวางโค้ดด้านล่างในโมดูลคำสั่ง
8381
ขั้นตอนที่ 2:
- ตอนนี้ กดปุ่ม F5 และรันโค้ด
ดูที่ชุดข้อมูล คัดลอกเฉพาะรูปแบบ ไม่มีค่าใดๆ อยู่ที่นี่
อ่านเพิ่มเติม: วิธีคัดลอกและวางใน Excel โดยไม่เปลี่ยนรูปแบบ
6. ใช้ xlPasteValues เพื่อวางค่าเท่านั้น
เราสามารถคัดลอกค่าได้โดยใช้ VBA Paste Special เท่านั้น
ขั้นตอนที่ 1:
- กด Alt+F11 เพื่อเข้าสู่โมดูลคำสั่ง
- เขียนโค้ดต่อไปนี้บนโมดูลคำสั่ง
8948
ขั้นตอนที่ 2:
- คลิกที่ F5 และเรียกใช้โค้ด
สังเกตชุดข้อมูล เฉพาะค่าเท่านั้นที่จะถูกคัดลอกที่นี่ วิธีนี้ไม่มีการคัดลอกรูปแบบ
อ่านเพิ่มเติม: วิธีใช้ VBA เพื่อวางค่าเฉพาะโดยไม่มีการจัดรูปแบบใน Excel
7. คัดลอกและวางเนื้อหาทั้งหมดของเซลล์เดียว
ในส่วนก่อนหน้านี้ เราได้คัดลอกช่วงของข้อมูล ที่นี่ เราจะคัดลอกเพียงเซลล์เดียว
ขั้นตอนที่ 1:
- ตอนนี้ กด Alt+F11 แล้วป้อนคำสั่ง โมดูล
- พิมพ์รหัสต่อไปนี้บนโมดูล
3463
ขั้นตอนที่ 2:
- ตอนนี้ กดปุ่ม F5 ปุ่มเพื่อเรียกใช้โค้ด
เราจะเห็นว่าเซลล์เดียวถูกคัดลอกที่นี่ ไม่ใช่ช่วง
อ่านเพิ่มเติม: สูตรการคัดลอกและวางค่าใน Excel (5 ตัวอย่าง)
8. คัดลอกและวางแอตทริบิวต์ทั้งหมดของบางคอลัมน์ด้วย VBA
เช่นเดียวกับเซลล์เดียว เราสามารถคัดลอกคอลัมน์เดียวในชุดข้อมูล
ขั้นตอนที่ 1:
- เพียงกด Alt+F11 เพื่อเข้าสู่โมดูลคำสั่ง
- เขียนโค้ดด้านล่างในโมดูล
8754<0
ขั้นตอนที่ 2:
- เรียกใช้โค้ดโดยกด F5 .
ที่นี่ เราจะเห็นว่า คอลัมน์ B ถูกคัดลอกไปยัง คอลัมน์ E
อ่านเพิ่มเติม: [แก้ไขแล้ว]: คลิกขวาคัดลอกและวางไม่ทำงานใน Excel (11 วิธีแก้ไข)
9. คัดลอกและวางแอตทริบิวต์ทั้งหมดของแถวด้วย Excel VBA
ในทำนองเดียวกัน เราสามารถคัดลอกแถวเดียวโดยใช้ วางแบบพิเศษ
ขั้นตอนที่ 1 :
- คลิกที่ Alt+F11 เพื่อเข้าสู่โมดูลคำสั่ง
- คัดลอกโค้ดต่อไปนี้บนโมดูลคำสั่ง
8518
ขั้นตอนที่ 2:
- เรียกใช้โค้ดโดยกด F5 . <14
ที่นี่ แถว 4 จะถูกคัดลอกไปยัง แถว 11
อ่านเพิ่มเติม: วิธีคัดลอกหลายแถวใน Excel โดยใช้มาโคร (4 ตัวอย่าง)
บทสรุป
ในบทความนี้ เราได้อธิบาย 9 วิธีการ ของ VBA Paste ค่าและรูปแบบพิเศษใน Excel ฉันหวังว่าสิ่งนี้จะตอบสนองความต้องการของคุณ โปรดดูที่เว็บไซต์ของเรา Exceldemy.com และให้คำแนะนำของคุณในช่องความคิดเห็น