NECTEC
NSTDA
Home
Computer
Program
Internet & Web
Graphics
CAI
Multimedia
Electrical Power
General Education
Special Education
Links
Webmaster
Microsoft Excel

สร้างมาโคร Save กราฟเป็น .GIF format

ปกติ Excel จะมีคำสั่ง Save as HTML ซึ่งจะสร้างไฟล์ HTML ให้อัตโนมัติ แต่ถ้าท่านต้องการคำสั่งเฉพาะการจัดเก็บรูปกราฟ ให้เป็นไฟล์ภาพนามสกุล .gif สามารถใช้มาโครมาช่วยดำเนินการ โดย

  • เข้าสู่การทำงานโหมด Visual Basic editor โดยกดปุ่ม <Alt><F11>
  • คลิกเลือกโหมดการทำงานเป็น ThisWorkbook (ตามรูปบน) เพื่อสร้างมาโครให้กับไฟล์ปัจจุบัน
  • เลือกคำสั่ง Insert, Module
  • พิมพ์คำสั่งมาโคร ตามตัวอย่าง
Sub SaveChartAsGIF ()
     Fname = ThisWorkbook.Path & "\" &      ActiveChart.Name & ".gif"
     ActiveChart.Export FileName:=Fname,      FilterName:="GIF"
End Sub
  • ปิดหน้าจอโปรแกรม Microsoft Visual Basic Editor กลับสู่ Excel
  • สร้างกราฟ พร้อมปรับขนาดตามที่ต้องการ
  • คลิกเลือกกราฟ
  • กดปุ่ม <Alt><F8> เพื่อเปิดหน้าต่างมาโคร
  • เลือกมาโครชื่อ SaveChartAsGIF แล้วคลิกปุ่ม Run
  • โปรแกรมจะทำการแปลงรูปกราฟที่เลือก เป็นไฟล์ .GIF ไว้ในโฟลเดอร์เดียวกับไฟล์เอกสาร Excel