2013-12-19 50 views
0

我已經使用Outlook中的自定義窗體作爲任務管理。我想問一下如何解決以下問題。Outlook文本框值更新而不是替換

當有人打開新任務我有一個自定義窗體To字段添加用戶並分配任務。

我的問題是,當一個任務的所有者打開任務時,我希望To字段爲空,並將其保留在另一個字段中(如Textbox)。因此,當用戶需要將同一任務分配給第二個用戶以在To中添加新用戶時,以及在更新Textbox時沒有用新值替換舊值時。這是我創建的代碼。我使用一個按鈕,當點擊在Textbox中添加To字段中的值時,但唯一的辦法是用新值替換舊值。

Sub add_click() 

Set objPage = Item.GetInspector.ModifiedFormPages("Assign Task") 
Set objControl = objPage.Controls("ListBox1") 
Set objassigncheck = objPage.Controls("CheckBox1") 
Set objsend = objPage.Controls("sendtask") 
Set objTo = objPage.Controls("To") 
Set objtest = objPage.Controls("TextBox4") 
Set objcombo1 = objPage.Controls("ComboBox1") 

    For i=1 to Item.Recipients.Count 
    objtest.Value=Join(Array(Recipients.Item(i)),"; ") 
    Next 
End Sub 

有人可以提出一些建議嗎?

+0

試過'objtest.Value = objtest.Value&Recipients.Item(I)& ";「'? – PatricK

+0

它Works.Thank你了 – ktzouv

回答

0

objtest.Value = objtest.Value & Recipients.Item(i) & "; "?

從問題帕特里克comment服用。