关于操作word的两个问题，急！！！！！

Question

1，我想在word每行的某一位置加入字符
   Selection.TypeText "嘻嘻哈哈"
   Selection.MoveRight Unit:=wdCharacter, Count:=30
   Selection.TypeText "Word9.0 中文版"
   我想得到"嘻嘻哈哈       Word9.0 中文版",可得到的却是"嘻嘻哈哈Word9.0 中文版",为什么？该怎么才能得到我想的效果？
2，我在表格中输入字符，当单元格宽度不够时希望文字自动换行，但我发现输入汉字时能做到而输入字母或数字时则不会自动换行，为什么?
3,表格单元格合并后如何设置其宽度( 用列的setwidth方法)？如将第一行的2=9列单元格合并后的单元格是否还是第二列？

Answer 1

1，我想在word每行的某一位置加入字符
   Selection.TypeText "嘻嘻哈哈" & space(30)
   Selection.TypeText "Word9.0 中文版"

Answer 2

WORD录宏,看看代码怎么写的就是了啊

Answer 3

好象对表格的操作无法录制宏，不知道是不是我的office有问题

Answer 4

第一问题的意思是想将字符加入到每行的某一绝对位置而不是相对位置（目的是对齐文本），所以不能用faysky2的方法。第2、3问题已解决。
   另外问两问题：1、我引用的ExcelApp或WordApp用ExcelApp.Quit,set ExcelApp=nothing,set mydoc=nothing等方法均不能退出，在进程里仍然可以看到Excel或word程序仍然在运行。怎么办？
   2、当wordapp.visible=False时用Selection.MoveDown定位会出问题（定不到位）而当 wordapp.visible=True且word窗口最大化时一切正常，是什么原因？