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

excel¤¤³]¸m³æ¾Ú­¶½Xªº°ÝÃD

excel¤¤³]¸m³æ¾Ú­¶½Xªº°ÝÃD

½Ð±Ð¦U¦ì¤j«L
§Ú·Q¦bexcel¤¤³]¸m¤@­Ó²©ö¡§°e³f³æ¡¨­¶­±¡A»Ý­n³]¸m¤@­Ó°e³f³æ¦Û°Ê½s½X¸¹¡A¥Î¡§¦~¤ë¤é+¶}³æ¥÷¼Æõì­p¡¨ªº¤è¦¡¡A¦p100519001¡B100519002¡B¡C¡C¡C¡A½Ð±Ð¡A¦p¦ó¥Î¤½¦¡³]¸m¡A¤~¯à¨Ï±o³æ¸¹¦b·í¤Ñ¤¤¦Û°Ê³sÄò½s¸¹¡H§Ú·Q³o¼Ë¡A¦b°e³f³æ³æ¾Ú®ÇÃä³]¸m¤@­Ó¤â°Ê¡§«O¦s¡¨ªº«öÁä¡A¨C«O¦s¤@¦¸¡A³æ¾Ú­¶­±¦Û°Ê¥t¦s¡A¨C«O¦s¤@¦¸¡A³æ¾Ú½s¸¹¦Û°Ê¨ê·s¤@­Ó¡Aª½¨ì¤é´Á´«¤U¤@¤Ñ¶}©l¡A³æ¾Ú½s¸¹¦A±qÀY¶}©l¡C§Ú¤£ª¾¦p¦ó³]¸m¡A½Ð±Ð¦U¦ìÀ°À°¦£§a¡A¦b¦¹·PÁ¤F¡C
¤ÑªÅ¥ô³¾­¸¡A®üÁï¥ô³½¹C¡A¥@¶¡¥ô§Ú¦æ

¦¹ÃD¤£¾A¥Î©ó¤@¯ë°Ï,¥i¯à·|¦³­«½Æ°Ñ·Óªº°ÝÃD,«Øij²¾¦Üµ{¦¡°Ïµo°Ý
ª¾¤§¬°ª¾¤§¡A¤£ª¾¬°¤£ª¾¡A¸Û¹ê¤]¡I

TOP

¦^´_ 1# ¥ô§Ú¦æ


    ²³æ°µ­Ó½d¨ÒÀɨѰѦÒ
°e³f³æ.rar (10.46 KB)
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

A1=100430001
A2=IFERROR((TEXT(RIGHT(YEAR(TODAY()),2),"00")&TEXT(MONTH(TODAY()),"00")&TEXT(DAY(TODAY()),"00")&TEXT(RIGHT(LOOKUP(2,1/(LEFT($A$1:A1,6)=TEXT(RIGHT(YEAR(TODAY()),2),"00")&TEXT(MONTH(TODAY()),"00")&TEXT(DAY(TODAY()),"00")),$A$1:A1),3),"000"))+1,--(RIGHT(YEAR(TODAY()),2)&TEXT(MONTH(TODAY()),"00")&TEXT(DAY(TODAY()),"00")&"001"))
©¹¤UCOPY

TOP

·PÁ¨â¦ì¤¯¥Sªº¼ö¤ß
Hsieh °µªºªþ¥ó¡A§Ú¨S¦³Åv­­¤U¸ü©Î¬d¬Ý¡I
ANGELA °µªº¤½¦¡¡A§Ú½Æ»sÖ߶K¨ìexcelªí¤¤¡A«o±o¤£¥X¤°»òµ²ªG¡I¤£ª¾¦p¦ó¾Þ§@¤~¦n¡AÁٽнç±Ð¡C
Á`¤§¡A«D±`·PÁ¨â¦ìªº´©¤â¤§¼w°Õ
¤ÑªÅ¥ô³¾­¸¡A®üÁï¥ô³½¹C¡A¥@¶¡¥ô§Ú¦æ

TOP

gongª©¥D¡A§Ú¤£ª¾¹D¦p¦ó²¾°Ê°ÝÃD¨ìµ{¦¡°Ï¡A½ÐÀ°À°¦£¦n¶Ü¡H«D±`·PÁ¡I
©ÎªÌ¨ìµ{¦¡°Ï­«·s°µ¤@­Ó¥DÃDµo°Ý¡H
¤ÑªÅ¥ô³¾­¸¡A®üÁï¥ô³½¹C¡A¥@¶¡¥ô§Ú¦æ

TOP

¦^´_ 5# ¥ô§Ú¦æ


   
  1. Private Sub CommandButton1_Click()
  2. Sheet2.[A65536].End(xlUp).Offset(1, 0).Resize(, 21) = Application.Transpose([B1:B21].Value)
  3. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¥»©«³Ì«á¥Ñ PD961A ©ó 2010-5-23 18:04 ½s¿è
¦^´_  ¥ô§Ú¦æ
Hsieh µoªí©ó 2010-5-22 11:37


¤Þ¥ÎHSª©¥D¹ÏÀÉ

   


TOP

¦^´_ 6# ¥ô§Ú¦æ


    ¤p»xª©¥D-ºÞ²z¤½§i°Ï¶ô

³Â»¶®a±Ú°Q½×°Ï » ºÞ²z¤½§i » µoªí·s¥DÃD®É¦p¦ó¿ï¨ú¥DÃD¤ÀÃþ




TOP

©êºp,¥Î¤F2007¤½¦¡,2003½Ð¬Ýªþ¥ó
©w¸q¦WºÙ¤½¦¡¸û²¼ä.

Book1.zip (4.06 KB)

TOP

        ÀR«ä¦Û¦b : ¤Hªº²´·úªø¦b«e­±¡A¥u¬Ý¨ì§O¤Hªº¯ÊÂI¡Aµ·²@¬Ý¤£¨ì¦Û¤vªº¯ÊÂI¡C
ªð¦^¦Cªí ¤W¤@¥DÃD