View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Philippe[_6_] Philippe[_6_] is offline
external usenet poster
 
Posts: 2
Default ActiveX textBox : value doesn't show after programatically changing the value

Hi,

I've a quite strange problem.
A VBScript in an Outlook form, opens an Excel WorkBook containing on a
sheet, several Active X Controls.
The script adds the name of the contact in the ActiveX TextBox Control : the
fields value and text are actually modified as a result.
But, the displayed control doesn't show the value !

Does any one has any idea how to solve this issue ?

Thanks for reading,
Philippe

----------------------------
Sub exportVersExcel_Click()

Set objExcelApp = Application.CreateObject("Excel.Application")
Set objExcelBook = objExcelApp.Workbooks.Open _
("\\Server03\annuaire\Demande_Ouverture_Compte.xls ")
Set objExcelSheet = objExcelBook.Sheets("DemandeOuverture")
objExcelSheet.Activate


Set objTextBox_NomBenef = objExcelSheet.OLEObjects("TextBox_NomBenef")
objTextBox_NomBenef.Object.value = Item.LastName

objExcelApp.Application.Visible = True

End Sub
-------------------------------