ต้องการแมโคร excel เพื่อสร้างไฟล์ข้อความที่จัดรูปแบบ
ฉันเพิ่งเรียนรู้วิธีสร้างมาโครและฉันพบมาโครที่เกือบจะทำในสิ่งที่ฉันต้องการทำซึ่งก็คือส่งออกไฟล์ข้อความจาก Excel สิ่งที่ฉันต้องทำก็คือเอาท์พุทนี้ใน .mhd รูปแบบที่ฉันได้ทำแล้วนำข้อมูลทั้งหมดที่เขียนใน #fnum เซลล์และส่งคืนหลังจากแต่ละรายการในไฟล์ Excel โดยพื้นฐานแล้วฉันแค่ต้องการข้อมูลทั้งหมดเพื่อให้มีบรรทัดเฉพาะในไฟล์ข้อความ ฉันแน่ใจว่ามีวิธีที่สง่างามที่จะไปเกี่ยวกับเรื่องนี้ แต่ฉันไม่สามารถรับมันได้ Sub CreateFile() Do While Not IsEmpty(ActiveCell.Offset(0, 1)) MyFile = ActiveCell.Value & ".mhd" 'set and open file for output fnum = FreeFile() Open MyFile For Output As fnum 'use Print when you want the string without quotation marks Print #fnum, …