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

¸ê®Æ¶×¥X¥t¦s·sÀÉ

¸ê®Æ¶×¥X¥t¦s·sÀÉ

¥»©«³Ì«á¥Ñ hugh0620 ©ó 2011-5-5 11:15 ½s¿è

Dear ¤j¤j­Ì~
            ¤p§Ì¨Ó½Ð¯q~~~~  
            ²{¦bªº°ÝÃD¦b©ó­n±N¸ê®Æ¶×¥X«á,¸ÓSheet ¦b·sÀÉ«á¨äsheet«O¯d¦bsheet1ªº¦ì¸m
        ¦p¤U¹Ï»PªþÀÉ
         ¸ê®Æ¶×¥X¥t¦s·sÀÉ.rar (36.75 KB)
            
¾Ç²ß¤~¯à´£¤É¦Û¤v

¦^´_ 1# hugh0620
  1. Private Sub CommandButton1_Click()
  2.     Sheets("Test").Copy
  3.     ActiveWorkbook.VBProject.VBComponents(2).Name = "Sheet1"
  4. End Su
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ hugh0620 ©ó 2011-5-9 11:52 ½s¿è

¦^´_ 2# GBKEE


    GBKEE ¤j¤j~  ¦³§Q¥Î±z¼gªºµ{¦¡½X~ ¶i¦æ´ú¸Õ~ ¦ý¬Oµ²ªG¤£¦æ­C~
    °õ¦æªºµ²ªG À³¥Îµ{¦¡©Îª«¥ó©w¸q¤Wªº¿ù»~
¾Ç²ß¤~¯à´£¤É¦Û¤v

TOP

¥»©«³Ì«á¥Ñ mark15jill ©ó 2011-5-10 16:03 ½s¿è

¦^´_ 3# hugh0620

¼Ó¥D ¦b¤U¤§«e¦³¦^´_¨ä¥L¤j¤jªº©«¤l(¬ÛÃöªº)
¤U¦C¬°¬ÛÃöµ{¦¡½X

Sub «ö¶s1_Click()

    Sheets("sheet2").Copy
    Application.DisplayAlerts = False
    ActiveWorkbook.VBProject.VBComponents(2).Name = "Sheet1"


    ActiveWorkbook.SaveAs Filename:="C:\Users\user\Desktop\¿é¥X´ú¸Õ.xls", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
        Sheets(""Sheet2").Select
        Sheets("Sheet2").Name = "sheet1"
        ThisWorkbook.Close savechanges:=True
End Sub
                                       
¥t¥~ªþ¤W¸ÓÀÉ®×
¦Û°Ê¿é¥X©M§ï¦WºÙ.rar (17.86 KB)

TOP

¥»©«³Ì«á¥Ñ hugh0620 ©ó 2011-5-9 12:33 ½s¿è

¦^´_ 4# mark15jill

     Dear mark15jill

     ActiveWorkbook.VBProject.VBComponents(2).Name = "Sheet1"
     ¦b°õ¦æ¨ì³o¤@¦æ´N·|²£¥Í¿ù»~
   ¦³¤U¸ü±z´£¨Ñ¤§ÀÉ®×~ °õ¦æ«á¦p¤U¹Ï ²£¥Í¿ù»~

   
¾Ç²ß¤~¯à´£¤É¦Û¤v

TOP

¥»©«³Ì«á¥Ñ mark15jill ©ó 2011-5-9 12:47 ½s¿è

¦^´_ 5# hugh0620

¦pªG¦³¨º­Ó°ÝÃDªº¸Ü(§Ú¤W¶Ç«e´ú¸Õ¨S°ÝÃD...)
±N¤U¦Cµ{¦¡§R°£§Y¥i

ActiveWorkbook.VBProject.VBComponents(2).Name = "Sheet1"


¥t¥~ ·s¼W«áªºÀÉ®× ¹w³]Àx¦s¸ô®|¬° win 7ªº®à­±¸ô®|...
¦]©È XP ©M WIN7 ªº®à­±¸ô®|¤£¦P «Øij ¦Û¦æ­×§ï...(µ{¦¡½X¬ÛÃö¦b      ActiveWorkbook.SaveAs Filename:="C:\Users\user\Desktop\¿é¥X´ú¸Õ.xls", _       ³o¦æ...)

TOP

TOP

¦^´_ 7# GBKEE


    ·PÁ¤j¤j~ ¥i¥H¤F~ ·P®¦­ò~
¾Ç²ß¤~¯à´£¤É¦Û¤v

TOP

        ÀR«ä¦Û¦b : ¤ß¤¤±`¦sµ½¸Ñ¡B¥]®e¡B·P«ä¡Bª¾¨¬¡B±¤ºÖ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD