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

Range ¤º®e«ü©wªº»yªk­n¦p¦ó¼¶¼g¡C

Range ¤º®e«ü©wªº»yªk­n¦p¦ó¼¶¼g¡C

°ÝÃD
·Q­n¤ñ¹ï¦h±i¸ê®Æªí¡A¬Û¦P¦ì¸mªº¤º®e¬O§_¬Û¦P¡A¥Î Range ­n¦p¦ó¼g¡C
¨Ò¦p¡G­n¤ñ¹ïE6:E12¡A¦b¡u22¡v³o±i Sheet »P¡u°Ñ¦Òªí®æ¡v¡A2ªÌ¬O§_¬Û¦P¡C

¦P±iªí®æ¡A¤£¦P Range ¥i¥H¸Ñ¨M
Set Range_Area1 = Range("E6:E12")
Set Range_Area2 = Range("H6:H12")
Range_Area1.FormulaArray = Range_Area2.FormulaArray

¦ý¤£¦P Sheet ªº¤ñ¹ï­n¦p¦ó¼g
¤w¹Á¸Õ¹L
    '1.Range_X = Range_Area1
    '2.Range_X.Value = Range_Area1.Value
    '3.Range_X.FormulaArray = Range_Area1.FormulaArray
    '4.Range_X = Sheets("°Ñ¦Òªí®æ").Range_Area1

[½t¬G]
¦]¬°²{³õªº¤p©j¤£·|¥Î¸ê®Æ®w¡A§â Excel ·í°µ¬OWord ¦b³B²z¡C
¦]¬°­n¾ã²z¦¨¸ê®Æ®w¡A·Q­n¥Î¥¨¶°¼g¡A¥Î¥H§ì¸ê®Æ¡C
¦ý­n¥ý¦æ¤ñ¹ï¡A¿é¤J¸ê®Æªº¡u³æ¦ì¼Æ¡v¬O§_¬Û¦P¡C
¾ã­Ó¡u³øªí®æ¦¡¡v¬O§_¬Û¦P
Macro_Rng_Test.zip (12.11 KB)

ÁÂÁ§A¡T¶W¯Åª©¥D¡C
»yªk¤j·§¥i¥H²q¥X§A¼gªºÅÞ¿è¡C
¡u«ü©w½d³ò¤£¥]§t°}¦C¤½¦¡¡A¥»ÄݩʶǦ^ Null¡v³o¤@¬q¡A¬Ý¤£¤ÓÀ´¡C
1.¦]¬°¦P±i Sheet ®É¥i¥H¥Î(·N«ä¬O ¥]§t°}¦C¤½¦¡)¡C
2.¤£¦P±iSheet ®É¡A´NÅܦ¨ ¤£¥]§t°}¦C¤½¦¡¡C
¤£¹L³o­ÓÀ³¸Ó¤£¼vÅT¾ã­ÓVBA ªº¶i«×¡C¥ý®³¨Ó°µ¦A»¡¡C

TOP

        ÀR«ä¦Û¦b : ¦³®É·í«äµL®É­W¡A¦n¤Ñ­n¿n«B¨Ó³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD