2013-06-25 108 views
0

我的VBA程序在用戶輸入的輸入上處理某些操作,並最終返回結果。Excel - VBA:Userform.Label不會更改

在某些時候,我想讓一些用戶表單顯示並「調整」研究。例如,如果用戶輸入了不適合的州和城市,則會顯示「您的意思是城市?」。然後,點擊是會考慮修改,點擊不會改變任何東西。

我已經試過這一點,因爲在一些教程發現:

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 =等),仍然沒有變化。

謝謝你幫我解決這個問題!

回答

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 
+0

謝謝您的回答,它工作得很好! – Phalanx

1

使用vbModeless ..

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

End If 
+0

感謝您的回答,sous2817的解決方案也是如此,因此我接受了它,但我也非常感謝您的解決方案。 – Phalanx

+0

@Phalanx。沒關係..但是你必須知道,'vbModeless'你可以改變標籤標題..一次又一次..:P – matzone