วันอาทิตย์ที่ 03 มิถุนายน 2018
  0 ตอบกลับ
  เยี่ยมชม 3.3 พันครั้ง
0
โหวต
แก้
สวัสดีทุกคน
ฉันกำลังพยายามส่งข้อมูลจากแผ่นงาน excel ไปยังเอกสาร word
ข้อมูลกำลังดำเนินไปอย่างสมบูรณ์แบบ ปัญหาเดียวคือเมื่อฉันส่งข้อมูลไปยังคำนั้น การเลี้ยงดูในเอกสารคำจะยุ่งเหยิง
โปรดช่วยด้วยปัญหาหลักของการจัดตำแหน่ง

ขอบคุณ
โชซิบ

นี่คือรหัสที่ฉันใช้

คำสั่งย่อยส่วนตัวButton2_Click()
Dim objWord เป็นวัตถุ
ตั้งค่า objWord = CreateObject("Word.Application")

Sheet1.Range("F1:Q72") คัดลอก
ด้วย objWord
.เอกสาร.เพิ่ม
.การเลือก.วาง
.Visible = จริง
จบด้วย

ตั้ง objWord = Nothing

ย่อยสิ้นสุด
ไม่มีคำตอบสำหรับโพสต์นี้