Range("A1:A12").Select Selection.Copy'''''''''''''''''''''''''è¿ä¸ªè²ä¼¼ä¸æ§è¡å Range("C1:C12").Select ActiveSheet.Paste''''''''''''''''''è¿ä¸ªä¹å°±ä¸æ§è¡äº Windows("1.doc").Activate''''''''''''''è¿ä¸ªwordå«æè¡¨æ ¼ï¼å¤äºæå¼ç¶æ Selection.HomeKey wdStory Selection.MoveDown Unit:=wdLine, Count:=11, Extend:=wdExtend Selection.paste''''''''''''''''''''è¿ä¸ªä¸ç¥éæ没æåé ä¸å¤´è¿ä¸æ®µæ¹æ Range("A1:A12").copy Windows("1.doc").Activate tables(1).cells(1,1).paste è¿æ ·åºè¯¥å¯ä»¥äºã
温馨提示:答案为网友推荐,仅供参考