C
Cameron Powell
I have a UserForm that will pull the name, fax #, and phone # from Outlook.
When you click Add Recipient, the text boxes clear, but until I hit finish or
add another recipient, The information does not show up on the document.
Private Sub cmdAdd_Click()
ActiveDocument.Tables(1).Rows(4).Select
Selection.InsertRowsAbove
With ActiveDocument.Tables(1)
.Cell(4, 2).Range.Text = txtTo.Value
.Cell(4, 3).Range.Text = txtFax.Value
.Cell(4, 4).Range.Text = txtPhone.Value
End With
txtTo.Value = ""
txtFax.Value = ""
txtPhone.Value = ""
End Sub
When you click Add Recipient, the text boxes clear, but until I hit finish or
add another recipient, The information does not show up on the document.
Private Sub cmdAdd_Click()
ActiveDocument.Tables(1).Rows(4).Select
Selection.InsertRowsAbove
With ActiveDocument.Tables(1)
.Cell(4, 2).Range.Text = txtTo.Value
.Cell(4, 3).Range.Text = txtFax.Value
.Cell(4, 4).Range.Text = txtPhone.Value
End With
txtTo.Value = ""
txtFax.Value = ""
txtPhone.Value = ""
End Sub