我正在开发一个VBA脚本来整理一个Word表,用户开始拆分单元格,这会导致自动评估程序出现问题。
所以,我可能在表格中有这样的东西:
Write a journal. HD D C P
(5 marks) (4 marks)
(3 marks)
(2 marks)
(4 x 5表)
想要:
Write a journal. HD D C P
(5 marks) (4 marks) (3 marks) (2 marks)
(2 x 5表)
所以我将表复制到Excel,然后运行VBA脚本来执行此操作。为什么我不在Word VBA中这样做?好问题。我开始使用Excel,因为我更舒服。一旦我在这里工作,可以在Word中试用它。
这是我在行和列的循环中使用的代码,它至少合并了单元格:
Cells(dblStartRow, dblCurrentColumn).Value = Cells(dblStartRow, dblCurrentColumn).Value + Chr(10) + Chr(13) + Replace(Trim(Cells(dblCurrentRow, dblCurrentColumn).Value), Chr(160), "")
我遇到的问题是它在电子表格中就是这样:
Write a journal. HD D C P
(5 marks ) (4 marks ) (3 marks ) (2 marks )
但如果我查看Excel单元格/公式输入框,它看起来是正确的(即之前没有空格)):
Write a journal. HD D C P
(5 marks) (4 marks) (3 marks) (2 marks)
如果我删除了),光标会立即落在" s"在标记中,所以那里似乎没有字符。如果我重新添加,然后按Enter键,则现在出现(5个标记)而不是(5个标记)。经过一些研究后,我尝试在上面的公式中剥离chr(160),但我找不到任何其他可能放在这些隐藏空间中的东西......是否有可能从Word复制做某事,但为什么这些隐藏了空格没有显示在公式栏中?
有什么想法吗?感谢。