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

[µo°Ý] ½Ð°Ý¥¨¶°­n¦p¦ó§ó§ï~¤~¯à°õ¦æ¤£¦PsheetÄæ¦ìªº³Ì«á¤@¦æ©O?

[µo°Ý] ½Ð°Ý¥¨¶°­n¦p¦ó§ó§ï~¤~¯à°õ¦æ¤£¦PsheetÄæ¦ìªº³Ì«á¤@¦æ©O?

¥»©«³Ì«á¥Ñ alltest ©ó 2013-1-4 21:21 ½s¿è

¹Ï001        sheet1 ¿ý»s¥¨¶°
¹Ï002        sheet2 °õ¦æ¥¨¶°«á
¹Ï001¥¨¶°  µ{¦¡

½Ð°Ý¤j¤j­Ìsheet1¿ý»sªº¥¨¶°­n¦p¦ó§ó§ï,
¤~¯àÅýsheet2¤]¯à°õ¦æ¦p¦Psheet1ªºµ²ªG©O?



Book-­pºâ.rar (6 KB)

¦^´_ 2# alltest


    ¥u»Ý¤@¥y, ¤@¥y¨ì§À
  1. Range(Range("D2"), Range("D2").Offset(, -1).End(xlDown).Offset(0, 1)).FormulaR1C1 = "=RC[-1]-RC[-2]"
½Æ»s¥N½X
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

¦^´_ 2# kimbal


    ÁÂÁª©¥D¤j¤jkimbalªº¦^ÂÐ^^
    °õ¦æ«áªºµ²ªG, ·|¥X²{¿ù»~­C
   ½Ð°Ý­n¦p¦ó­×§ï¤~¦n©O?

TOP

¦^´_ 3# alltest
  1. Sub Macro1()
  2. '
  3. ' Macro1 Macro
  4. ' user ¦b 2013/1/4 ¿ý»sªº¥¨¶°
  5. '

  6. '
  7. With ActiveSheet
  8.     .[D2].FormulaR1C1 = "=RC[-1]-RC[-2]"
  9.     .[D2].AutoFill Destination:=.Range(.[D2], .Range("C2").End(xlDown).Offset(, 1))
  10.     .Range(.[D2], .Range("C2").End(xlDown)).Select
  11.     .Range("E2").Select
  12. End With
  13. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 3# alltest
³o¤Tµ{¦¡½X§@¥Î³£¬Û¦P,(¸m©ó¤@¯ë¼Ò²Õ¤¤ Module1 )¥i¾A¥Î¦³¬Û¦P¸ê®Æ®æ¦¡ªº¤u§@ªí
   
  1. Sub Ex() '*************** CÄæ.Offset(, 1) => DÄ檺¤½¦¡
  2.     Range("C2", Range("C2").End(xlDown)).Offset(, 1) = "=RC[-1]-RC[-2]"      '
  3.     End Sub
½Æ»s¥N½X
  1. Sub Ex1() '************** DÄæ.Offset(, -1)°Ñ¦ÒCÄæ³Ì«á¦³¸ê®Æ¦ì¸m
  2.     Range("D2", Range("D2").Offset(, -1).End(xlDown).Offset(0, 1)).FormulaR1C1 = "=RC[-1]-RC[-2]"
  3. End Sub
½Æ»s¥N½X
  1. Sub Ex2() '***************
  2.     Range("D2").Select                               '"D2"¬°«ü©wÀx¦s®æ
  3.     ActiveCell.FormulaR1C1 = "=RC[-1]-RC[-2]"
  4.     'Selection.AutoFill Destination:=Range("D2:D8") '³o¸Ì"D2:D8",¤~¤£·|¥X¿ù
  5.     Selection.AutoFill Destination:=Range("D2:D" & Range("C2").End(xlDown).Row)
  6.     ' Range("C2").End(xlDown).Row ¥i©µ¦ù¨ìCÄæ³Ì«á¦³¸ê®Æ¦ì¸m¤§¦C¸¹(Row)
½Æ»s¥N½X

TOP

¦^´_ 4# Hsieh


    ÁÂÁ±z~ Hsieh ¶W¯Åª©¥D¤j¤jªºÀ°¦£^^
   °õ¦æµ²ªG¤w¸g¦¨¥\,·P®¦~

TOP

¦^´_ 5# GBKEE


    ÁÂÁ±z~ GBKEE ª©¥D¤j¤jªº¼ö¤ßÀ°¦£^^
    ´£¨Ñ¦n¦h¤£¦Pµ{¦¡À°¦£¸Ñ¨M,
    Åýªì¾Çªº§Ú¤Î°Q½×°ÏªºªB¤Í­Ì
   ¥i¥H¦h¾Ç¤@¨Ç,·P®¦~
    (¨C­Óµ{¦¡¬Ò¥i°õ¦æ¦¨¥\)

TOP

        ÀR«ä¦Û¦b : §Ñ¥\¤£§Ñ¹L¡A§Ñ«è¤£§Ñ®¦¡C
ªð¦^¦Cªí ¤W¤@¥DÃD