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

½Ð°Ý¨º¸Ì¿ù¤F

½Ð°Ý¨º¸Ì¿ù¤F

Sub Ex()
    With Sheets("FORM").Range("C7:K12")
        Sheets("Data").[A65536].End(xlUp).Offset(1, 0) = Cell.Resize(1, 9).Value
    End With
End Sub

§Ú¬O·Q§âSheets("FORM").Range("C7:K12")¸ê®ÆÀx¦s¦ÜSheets("Data")

TOP

¥»©«³Ì«á¥Ñ mmggmm ©ó 2011-4-29 14:28 ½s¿è

¹ï¤£°_,¥i¯à§Úªí¹F¤£©ú,Sheets("FORM").Range("c7:k12")¸ê®Æ¥i¥H¦bSheets("Data") A:J Äæ¶}©lÀx¦s(¥i¥H²Ö¿nÀx¦s)

TOP

¥»©«³Ì«á¥Ñ mmggmm ©ó 2011-4-29 21:18 ½s¿è

¦hÁÂHsieh  GBKEE ¨â¦ì«ü¾É

TOP

        ÀR«ä¦Û¦b : ¦³´¼¼z¤~¯à¤À¿ëµ½´c¨¸¥¿¡F¦³Á¾µê¤~¯à«Ø¥ß¬üº¡¤H¥Í¡C
ªð¦^¦Cªí ¤W¤@¥DÃD