vba - 将 Word 表格单元格值分配给 Word 文档中的变量

Question

我正在尝试从单元格中的字符串创建 2 个变量。单元格字符串是“Mr Jonhattan Smith Sun”。Value1 我想作为“Jonhattan”，value2 作为“Smith Sun”。我有以下代码，但似乎无法正常工作。任何帮助请

value1 = Left(ThirdTable.Rows(10).Cells(2).Range.text, Len(ThirdTable.Rows(10).Cells(2).Range.text) - InStrRev(ThirdTable.Rows(10).Cells(2).Range.text, " "))

value2 = Right(ThirdTable.Rows(10).Cells(2).Range.text, Len(ThirdTable.Rows(10).Cells(2).Range.text) - InStrRev(ThirdTable.Rows(10).Cells(2).Range.text, " ") + 1)

标签： vbams-word

Answer 1

尝试：

ss = Split(ThirdTable.Rows(10).Cells(2).Range.Text, " ")

Value1 = ss(1)
Value2 = ss(2) & " " & ss(3)

鉴于

ThirdTable.Rows(10).Cells(2).Range.Text给你Mr Jonhattan Smith Sun

演示：

---

如果在演示中出现那个奇怪的字母，请使用：

Value2 = ss(2) & " " & Left(ss(3), Len(ss(3)) - 1)