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

[µo°Ý] °õ¦æ³t«×®t²§

¦^´_ 1# li_hsien
  1. Sub Ex()
  2.     With ActiveSheet.[C:C]  'CÄæ
  3.         .Cells = "=RC[-2]+RC[-1]"  '=AÄæ+BÄæ ªº¤½¦¡
  4.         '.Cells = .Value            '¤½¦¡Âন­È
  5.         '¤½¦¡Âন­È ÀuÂI:¦sÀɮɴî¤Ö°O¾ÐÅé
  6.         '¤½¦¡Âন­È ¯ÊÂI:¤½¦¡°Ñ·ÓªºÀx¦s®æ¦³§ïÅܵLªk¥ß§Y§ó·s
  7.     End With
  8. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

        ÀR«ä¦Û¦b : ¬O«D·í±Ð¨|¡AÆg¬ü§@ĵ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD