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

[µo°Ý] excel ÀÉ®×µLªk¦s¨ú ½Ð½T©w¤U¦C´X¥ó¨Æ¬O§_¥¿½T

[µo°Ý] excel ÀÉ®×µLªk¦s¨ú ½Ð½T©w¤U¦C´X¥ó¨Æ¬O§_¥¿½T

¦P¼ËªºexcelÀɮצb¤½¥q(¥i¦æ)¦ý¦b®a¸Ì¹q¸£«o¥X²{¥H¤U²{¶H¡C
½Ð°Ý¦³¤H¹J¹L¥H¤U°ÝÃD¶Ü?¦³¸Ñ¶Ü?

¦bExcelÀɮפº³s±µ¨ìyahooªººô­¶§@ªÑ²¼ªº»ù®æ§ó·s¡A
¥i¬O¦b§ó·s¹Lµ{¤¤¡A¦³®É·|¸õ¥X

ÀÉ®×µLªk¦s¨ú¡C½Ð½T©w¤U¦C´X¥ó¨Æ¬O§_¥¿½T:
¡E½T©w©Ò«ü©wªºÀÉ®×§¨¬O§_¦s¦b¡C
¡E½T©wÀÉ®×§¨¤£¬O°ßŪ¡C
¡E½T©wÀɮצWºÙ¤£¥]§t¤U¦C¦r¤¸: < > ? [ ] : ©Î *¡C
¡E½T©wÀɮפθô®|¦WºÙ¤£¶W¹L 218 ­Ó¦ì¤¸²Õ¡C
"¤£¥¿½Tªºweb¬d¸ß" ¡A

¤]´N¬O¦³¨Ç¥i¥H§ó·s¡A¦³¨Ç¤£¦æ¡A
¦Ó§Ú¤]¤£ª¾¹D­þ¨Ç¬O¨S¦³§ó·sªº¡A
³Â·Ð½Ð¦U¦ì¤j¤j«ü¾É¡AÁÂÁÂ!

ÁÂÁÂmark15jill¤jªº¦^ÂСA
¦pªG»¡mark15jill¤j©Ò²qªº¬O¹ïªº¡A¨º¥i¯à¬O"¸ô®|§ó°Ê"¶ûºÃ¤ñ¸û¤j¡C

­è­è¬O¤F¤@­Ó¤èªk"²M°£¨t²Î©U§£"¡Aµo²{¤]¦³À°§U¡A¤£¹L¦n¹³¤S«Ü®e©ö¦A¦¸µo¥Í¡C
¥i¯à§Ú¬O±Ä¥Îoffice2003¤]¦³Ãö¡A§ï¤Ñ¦A¨Ó§ï¦¨2007¦n¤F¡C

ÁÂÁÂmark15jill¤j

TOP

ÁÂÁÂmark15jill¤j¡A§A»¡ªº¨S¿ù¡A§Úµo²{¤½¥qªº¤]¬O2003¡A
¥i¬O§Ú¥u¬O§Q¥ÎIQY¥h§ì¨úyahoo ªº­ÓªÑ¸ê®Æ¡A¦ý¤£ª¾¬°¦ó·|¥X²{¸Ó¶µ°ÝÃD¡C

TOP

·Ð½Ð¦U¦ì¤j¤jÀ°¦£¬Ý¬Ý­þ¸Ì¥X¿ùÅo¡AÁÂÁ¡C
§Q¥Îa1~a20ªºÅܤƨӦ۰ʧó·s­ÓªÑ·í¤ÑªºÅܤơC

³o¬O§Úªº¼gªk¡G¥ý¦æ©I¥srenumber
Sub renumber()

    Windows("test.xls").Activate
    Sheets("cji32").Select
    Range("b1:b20").Select
    Selection.Copy
    Range("a1").Select
    ActiveSheet.Paste
      
    Application.OnTime Now + TimeValue("00:00:5"), "renumber2"
   
    End Sub
Sub renumber2()

  
    Sheets("cji32").Select
    Range("c1:c20").Select
    Selection.Copy
    Range("a1").Select
    ActiveSheet.Paste
   
    End Sub
¦Ó iqy Àɼgªk¦p¤U¡G
WEB
1
http://tw.stock.yahoo.com/q/q?s=["¥N¸¹","¥N¸¹"]

Selection=7
Formatting=None
PreFormattedTextToColumns=True
ConsecutiveDelimitersAsOne=True
SingleBlockTextImport=False
DisableDateRecognition=False
DisableRedirections=False

TOP

¤j·§¸Ñ¨M¤F¡AÀ³¸Ó¬Oie¦b·d°­¡Aupdate¦¨ie8«á¦¹²{¶H¦ü¥G¤£¥X²{¤F¡C

¤§©Ò¥H»{¬°¬Oie¦b·d°­¡A¬O¦]¬°ºô¸ô·j´M¹Lµ{µo²{¦³¤H´£¨ìÃþ¦üªº²{¶H¡C

TOP

        ÀR«ä¦Û¦b : ¤Ó¶§¥ú¤j¡B¤÷¥À®¦¤j¡B§g¤l¶q¤j¡A¤p¤H®ð¤j¡C
ªð¦^¦Cªí ¤W¤@¥DÃD