ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¶}ÀɮצsÀÉOR¤£¦sÀÉ¥X¿ù

¶}ÀɮצsÀÉOR¤£¦sÀÉ¥X¿ù

¶}ÀÉ®×¥i¥H¦ý¦s¤£¦æ
¶}¬¡­¶¤£¦æ
½Ð°Ý«e½ú§Ú¤°»ò¦a¤è¦³¿ù»~..ÁÂÁÂ
  1. Sub ¶}·s¬¡­¶()
  2.     Workbook.Add
  3. End Sub
  4. Sub Ãö·s¬¡­¶()
  5.     Workbook.Close
  6. End Sub

  7. Sub ¶}ÀÉ®×()
  8.     Workbooks.Open "C:\Users\Administrator\Desktop\TEST001\ÀÉ®×1.xlsx"
  9. End Sub

  10. Sub ÃöÀɮפ£¦s()
  11. Workbooks "C:\Users\Administrator\Desktop\TEST001\ÀÉ®×1.xlsx": .Close False
  12. End Sub
  13. Sub ÃöÀɮצsÀÉ()
  14. Workbooks "C:\Users\Administrator\Desktop\TEST001\ÀÉ®×1.xlsx": .Close savechanges:=True
  15. End Sub
½Æ»s¥N½X

TEST001.rar (20.5 KB)

excel¾Ç²ß¤¤!¿v¥X¹Ú·Q
https://www.youtube.com/channel/UCPAiRNsHX3k_omp0YDgfDiA

¥»©«³Ì«á¥Ñ lpk187 ©ó 2016-2-10 19:19 ½s¿è

¦^´_ 1# kkooo15


   ¶}±ÒÀɮ׻ݭn¸ô®|¡AÃö³¬«o¤£¥Î¡A¥u­n¸ÓÀɦWºÙ´N¥i¥H¤F
Workbooks("ÀÉ®×1.xlsx").Close False
¸Ô±¡½Ð°Ñ¦ÒVBE¤¤ªºWorkbooks ª«¥ó¦¨­û¤Î Workbook ª«¥ó¦¨­û ªº»¡©ú

TOP

        ÀR«ä¦Û¦b : ¹ï¤÷¥À­nª¾®¦¡A·P®¦¡B³ø®¦¡C
ªð¦^¦Cªí ¤W¤@¥DÃD