将Word表单元格值分配给Word Document中的变量

时间:2019-08-10 07:02:57

标签: vba ms-word word-vba

我正在尝试从单元格中的字符串创建2个变量。单元格字符串是“ Jonhattan Smith Sun先生”。我想要的Value1是“ Jonhattan”,而值2是“ 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)

1 个答案:

答案 0 :(得分:0)

尝试:

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)