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

[µo°Ý] ½Ð±Ðª«¥óÅܼƪº»yªkset»Pwith-end with

¥»©«³Ì«á¥Ñ luhpro ©ó 2010-9-7 21:57 ½s¿è

¦^´_ 6# oak0723-1

§A§âµ{¦¡¬Ý½ÆÂø¤F,
¨ä¹êÂk®Úµ²©³´N¥u¦³¨â­Ó³¡¥÷ :
1.  ¦b With A  »P End With ¤¤¶¡ªº±Ô­z¸Ì, ¥H "." ¶}ÀYªº±Ô­z¤@«ßµ¥¦P "A.", ¥ç§Y
With Sheets("1")
  rng = ¡ERange(¡E[c10], ¡E[m83].End(3))
End With

·|µ¥¦P©ó

rng = Sheets("1")¡ERange(Sheets("1")¡E[c10], Sheets("1")¡E[m83].End(3))

µù : ¤W¨Ò¤¤ ¬°¨D®ÄªG©úÅã¤@«ß¥H "¡E" ¥Nªí "."

2. ¦b±Ô­z¤¤ rng ªº«e¤è¨Ã¨S¦³ "." ,
©Ò¥H¥¦»P Sheets("1") ¨Ã¨S¦³ª½±µªº¨Ì¦sÃö«Y.

¦Ó¦]¬°¥¦¥kÃäµ¥¸¹ªº¥k¤è¬O ".RANGE()" §Î¦¡ªº±Ô­z,
©Ò¥H¥¦ªº¤º§t¬° Sheets("1") ¤¤¬Y­Ó RANGE½d³ò ªº¤º§t­È,
¥ç§Y¬O "¦h­Ó" (°£¤F Range ¥u¦³¤@­ÓÀx¦s®æ¥H¥~)­È ²Õ¦¨ªº¸ê®Æ,
©Ò¥H³Ì¦³¥i¯àÀx¦s¥¦(­Ì)ªºÀ³¸Ó·|¬O¤@­Ó "°}¦C".

TOP

        ÀR«ä¦Û¦b : ¶¢¤HµL¼Ö½ì¡A¦£¤HµL¬O«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD