¦hÓexcel sheet¤u§@ªí¦p¦ó§Ö³tÂন¦UÓ¿W¥ßªºexcelÀÉ®×
- ©«¤l
- 17
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 25
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW
- µù¥U®É¶¡
- 2010-5-19
- ³Ì«áµn¿ý
- 2022-9-29
|
¦hÓexcel sheet¤u§@ªí¦p¦ó§Ö³tÂন¦UÓ¿W¥ßªºexcelÀÉ®×
¦U¦ì¤j¤j!§Ú¦³1ÓexcelÀɮ׸̱¦³¬ù50Ó¤u§@ªí,¦³µL§Ö³t¤èªk±N³o50Ó¤u§@ªíÂন50ÓexcelÀÉ®×. |
|
alexwin
|
|
|
|
|
- ©«¤l
- 75
- ¥DÃD
- 19
- ºëµØ
- 0
- ¿n¤À
- 135
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- 2007 010
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2010-5-18
- ³Ì«áµn¿ý
- 2013-10-26
|
Sub §å¶q«þ贝¤u§@ªí()
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Sheets
sht.Copy
Next
End Sub |
|
学习
|
|
|
|
|
¡@¼ÊºÙ: ªü¦N ¡@ÀY»Î: ¤£®¢¤U°Ý,¤£Â_¾Ç²ß,¤~·|¶i¨B
ª©¥D
- ©«¤l
- 647
- ¥DÃD
- 190
- ºëµØ
- 24
- ¿n¤À
- 1037
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- Office 2010 ; OOO3.0 ; Google
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¦Ë«n
- µù¥U®É¶¡
- 2010-5-2
- ³Ì«áµn¿ý
- 2022-6-24
|
¥»©«³Ì«á¥Ñ HUNGCHILIN ©ó 2010-6-27 10:32 ½s¿è
¦^´_ 1# alexwin
§A¥ý¥Î³oÓÀɧa
¥i¥H¸Ñ¨M§Aªº°ÝÃD
¶}ÀÉ «ö·s¤u¨ã¦C«ö¯Ã«á
¦³¤@Óªí³æ¤u§@ªí²M³æ¥i¥H½Æ¿ï
³o«h¬O¦Ñ°ÝÃD¤F
«Ü¤[¥H«eOFFICEFANS¦³¤H¦^¹L
¦h¦~«e¬ã¨s¤F¤@°}¤l ³o¬O¥H«e½m²ß®ÉקïÀu¤Æ¤§«áªº¦¨«~ÀÉ
«á¨Ó´N¦¬¨ìÀÉ®×®w¤F
²{¦b¬Ý¤F¤@¤Uµ{¦¡»Pªí³æ ¤£¬O¨º»ò§¹¬ü¦]¬°ÁÙ¥i¥H¼W¥[³\¦h§ó¨Îªº¤H©Ê¤Æ¬É±»P¥\¯à
¥i¥H¸Ñ¨M°ÝÃD´N¦n
¦Û°Ê¦w¸Ë(&¨Ï¥Î»¡©ú)¾É¥X¤u§@ªí.rar (79.51 KB)
|
|
|
|
|
|
|
- ©«¤l
- 17
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 25
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- OFFICE2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW
- µù¥U®É¶¡
- 2010-5-19
- ³Ì«áµn¿ý
- 2022-9-29
|
¦^´_ alexwin
§A¥ý¥Î³oÓÀɧa
¥i¥H¸Ñ¨M§Aªº°ÝÃD
¶}ÀÉ «ö·s¤u¨ã¦C«ö¯Ã«á
¦³¤@Óªí³æ¤u§@ªí²M³æ¥i¥H½Æ ...
HUNGCHILIN µoªí©ó 2010-6-27 01:16
³oÓ¦n¥Î!ÁÂÁÂ!¥un10¬í´Nok¤F! |
|
alexwin
|
|
|
|
|
- ©«¤l
- 41
- ¥DÃD
- 11
- ºëµØ
- 0
- ¿n¤À
- 83
- ÂI¦W
- 0
- §@·~¨t²Î
- windows
- ³nÅ骩¥»
- xp
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2012-12-20
- ³Ì«áµn¿ý
- 2019-12-17
|
¦^´_ 4# HUNGCHILIN - Sub BrowDir()
- On Error GoTo error1
- Dim bi As BROWSEINFO
- Dim pidl&, rtn&, path$, pos%
- pidl& = SHBrowseForFolder(bi)
- path$ = Space$(512)
- rtn& = SHGetPathFromIDList(ByVal pidl&, ByVal path$)
- ...
- error1: End Sub
½Æ»s¥N½X ¥H¤Wµ{¦¡ºI¦ÜHUNGCHILIN¤jªºªþÀÉ¡A
½Ð°Ý¦U¦ì«e½ú¡ADim pidl&, rtn&, path$, pos%¬O¦b«Å§iÅܼƫ¬ºA¡A&=Long¡B$=String¡A
¹³Dim pidl&=Dim pidl as Long¡AÅܼƬOpidl¡A¦ý¬°¤°»ò¤U±µ{¦¡¦b¨Ï¥Î®É¡A¬O¥Îpidl& = SHBrowseForFolder(bi)¦Ó¤£¬Opidl = SHBrowseForFolder(bi)?
¨âºØ¼gªk¨Ï¥Î¤W·|¦³®t§O¶Ü? ÁÂÁ¡C |
-
1
µû¤À¤H¼Æ
-
-
HUNGCHILIN:
¦b¨Ï¥Î¤W§Úªº·Pı¡AÀ³¸Ó¬O¨S¦³®t§O¡A¤£¹L«á ...ª÷¿ú + 5
|
|
|
|
|
|
¡@¼ÊºÙ: ªü¦N ¡@ÀY»Î: ¤£®¢¤U°Ý,¤£Â_¾Ç²ß,¤~·|¶i¨B
ª©¥D
- ©«¤l
- 647
- ¥DÃD
- 190
- ºëµØ
- 24
- ¿n¤À
- 1037
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- Office 2010 ; OOO3.0 ; Google
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¦Ë«n
- µù¥U®É¶¡
- 2010-5-2
- ³Ì«áµn¿ý
- 2022-6-24
|
¦b¨Ï¥Î¤W§Úªº·Pı¡AÀ³¸Ó¬O¨S¦³®t§O¡A¤£¹L«áÄò´N¹³±z©Ò»¡ªº¤£n¥Î¤~·|²±¶¡C |
|
|
|
|
|
|
- ©«¤l
- 41
- ¥DÃD
- 11
- ºëµØ
- 0
- ¿n¤À
- 83
- ÂI¦W
- 0
- §@·~¨t²Î
- windows
- ³nÅ骩¥»
- xp
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2012-12-20
- ³Ì«áµn¿ý
- 2019-12-17
|
¦^´_ 7# HUNGCHILIN
ÁÂÁÂHUNGCHILIN¤j¡Aªº½Tpidl&»Ppidl¨âÓÅܼƳ£·|³Q©w¸q¦¨Long¡A¬Ý¨Ó¥u¬O²ßºD°ÝÃD¡C |
|
|
|
|
|
|