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

«_¬N½Ð±ÐDDE¨C¤ÀÄÁ°O¿ýªº¸ê®Æ,¦p¦ó¦A¼W¥[©]½Lªº°O¿ý?

«_¬N½Ð±ÐDDE¨C¤ÀÄÁ°O¿ýªº¸ê®Æ,¦p¦ó¦A¼W¥[©]½Lªº°O¿ý?

¯uªº«Ü·PÁÂ"­ã´£³¡ªL"¤j©Ò´£¨ÑªºDDE¨C¤ÀÄÁ°O¿ýªº¸ê®Æ,
¯uªº®¤¤p§Ì·M¬N,¬Ý¤F«Ü¤[¤~¦³ÂI²¤À´¸Ì­±ªº¤åªk...
¥Ø«e¥xªÑ¦³¤À¤é©]½L...
­Y·Q±N­ì¥»µ{¦¡¸Ìªº±µ¦¬¤é½Lªº°O¿ý,­n¦A¦h¤@­Ó¬¡­¶Ã¯°O¿ý©]½Lªº°O¿ý,¤£ª¾­n¦p¦ó§ó§ï?·Ð½Ð«ü¾É,ÁÂÁÂ

¥D­n¬O·Q¦b¦P¤@­ÓEXCELªºÀɮ׸Ì,¥i¥H¦³¤é½L©M©]½Lªº¨â­Ó°O¿ýªº¬¡­¶Ã¯

TOP

¦^´_ 2# jaway


20120531a02(DDE¨C1¤À°O¿ý)-2.rar (21.44 KB)

TOP

¦^´_ 3# ­ã´£³¡ªL

¤Ó·PÁ±z...§Ú»°ºò¨Ó¬ã¨s!ÁÂÁ­ã¤j....m(_ _)m

TOP

¥»©«³Ì«á¥Ñ pkey1999 ©ó 2019-1-26 15:53 ½s¿è

¦^´_ 3# ­ã´£³¡ªL



¦p¦ó¦b¤j§¡ªº¨º¦æ  ­×§ï  ¶W¹L+5 -5 §ïÅÜÃC¦â
                                   ¤p¼ÆÂI¤]´î¤Ö

   ³nÅé¤~¶]ªº¶¶ºZ

TOP

¦^´_ 3# ­ã´£³¡ªL


½Ð°Ý"­ã´£³¡ªL"¤j¤j¡G
¥Ø«e¥i¥H¨C¤ÀÄÁ°O¿ý¥xªÑªº¤é¡B©]½L¡A
­Y·Q°O¿ý¥xªÑªº¤é¡B©]½L¡u¨C¤@¤ÀÄÁªº¶}¡B°ª¡B§C¡B¦¬¡v¡A¤£ª¾­n¦p¦ó§ó§ï¡H
·Ð½Ð«ü¾É¡IÁÂÁ±z¡I¡I

TOP

¦^´_ 6# cslu37


­n§ì­þ¤@ºØ¼Æ¾Ú, ¶·¦Û¦æ¥HDDE¤½¦¡¥h¨ú±o,
§Ú¥u¯à´£¨Ñªº¥u¬O¤@­Ó²³æ¤¶­±, ÁÙ¶·¦Û¤v¥h½Õ¦¨©Ò»Ýªº¼Ë¦¡~~

TOP

¦^´_ 7# ­ã´£³¡ªL


    ÁÂÁ­㴣³¡ªL¤j¤j¡A§Ú·|§V¤O¾Ç²ßªº¡I¡I

TOP

¥»©«³Ì«á¥Ñ cslu37 ©ó 2019-5-18 21:21 ½s¿è

¦^´_ 3# ­ã´£³¡ªL


  «Ü·PÁ¤j¤j¤À¨É³o­ÓÀɮסI
¡@ Åý¦­½L¡B©]½L·|¤À§O¦Û°Ê§PÂ_¨Ã¬ö¿ý¡A¯uªº«ÜÁÂÁ­㴣³¡ªL¤j¤j¡I¡I
     
     ¬ã¨s¤F¤j¤jªº¤À¨ÉÀɮסA
     ¤@¡B·Q­×§ï¦¨¡u¤é½L¡v¤£¦P®É¶¡ªº°Ó«~¬ö¿ý¡A
             ¨Ò¦p¡GSheet1¡u8:30¡v¶}©l°O¿ý
                        Sheet2¡u8:45¡v¶}©l°O¿ý
               ¡@        Sheet3¡u9:00¡v¶}©l°O¿ý
              ½Ð°Ý¤j¤j­n¦p¦ó­×§ï©O¡HÀµ½Ð¤j¤j«ü¾É¡IÁÂÁ±z¡I¡I

¡@ ¤G¡B¤j¤j¤À¨ÉªºÀɮ׬O±NA8:N8ªº¸ê®Æ¶K¨ì³Ì¤U­±ªº¤@¦æ¡A·Q­×§ï¦¨±NA8:N8½Æ»s ¨Ã ´¡¤J­È¨ìA9:N9¡A¥BA8:N8ªº¤½¦¡¤£ÅÜ¡C
             ¦³¹Á¸Õ­×§ï¡A¦ý¥u¦³Sheet1·|¨C5¬í§ó·s¡ASheet2¡BSheet3³£·|¥X²{¿ù»~°T®§...
             ¥H¤U¬O§Ú¼gªº...¦ý³£¤@ª½¥X¿ù...Àµ½Ð¤j¤j«ü¾É¡IÁÂÁ±z¡I¡I
  1.     ShtA.Range("8:8").Copy
  2.     ShtA.Range("8:8").Select
  3.     Selection.Insert
  4.     ShtA.Range("9:9").Select
  5.     Selection.PasteSpecial Paste:=xlPasteValues
  6.     ShtA.Range("C8").Value = "=R[-2]C"
  7.     ShtA.Range("D8").Value = "=R[-2]C"
  8.     ShtA.Range("E8").Value = "=R[-2]C"
  9.     ShtA.Range("F8").Value = "=R[-2]C"
  10.     ShtA.Range("A8").Value = Date
  11.     ShtA.Range("B8").Value = Time
½Æ»s¥N½X

TOP

¦^´_ 9# cslu37


¬Ý¨Ó¹³¨C15¤ÀÄÁ°µ¤@­Óªí,
«Øij±NÀÉ®×µ²ºc³]­p¦n, ¦A¥t¦æµo©«~~

TOP

        ÀR«ä¦Û¦b : ¤p¨Æ¤£°µ¡B¤j¨ÆÃø¦¨¡C
ªð¦^¦Cªí ¤W¤@¥DÃD