Question

我的VBA程序处理用户输入的输入上的一些操作，并最终返回结果。

在某些时候，我希望有一些用户形式出现并“调整”研究。例如，如果用户键入了一个州和一个不适合的城市，它会在州中显示“你的意思是城市吗？”。然后，单击yes将考虑修改，单击否将不会更改任何内容。

我试过这个，就像在一些教程中找到的那样：

city = sMain.Range("J12").Value
province = sMain.Range("J6").Value
provinceSugg = sCurrent.Cells(p, db_column).Value

If province = "" And city <> "" Then
UserForm2.Show
UserForm2.Label1 = "Do you mean : " & city & " in " & provinceSugg
Else
End If

不幸的是，它根本不起作用，无论我为Label1写的文字和我使用的任何写作方式（Label1.Caption =，Userform2.Label1.Caption =，Label1 =等），仍然没有变化。

感谢您帮助我解决此问题！

Answer 1

在显示表单之前设置标题...像这样：

city = sMain.Range("J12").Value
province = sMain.Range("J6").Value
provinceSugg = sCurrent.Cells(p, db_column).Value

If province = "" And city <> "" Then
UserForm2.Label1 = "Do you mean : " & city & " in " & provinceSugg
UserForm2.Show
Else
End If

Answer 2

使用vbModeless ..

If province = "" And city <> "" Then
  UserForm2.Show vbModeless
  UserForm2.Label1 = "Do you mean : " & city & " in " & provinceSugg
Else

End If

Excel - VBA：Userform.Label不会更改

2 个答案: