Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Value Active X control
Hi !
I'm trying to copy data from an outlook form into an excel active x control. I have a solution that allows me to write into an Excel Cell, which I probably could get linked with the active x control, thus avoiding to have to write directly into the control, but for some reason, i need to avoid that. Please find my code below and tell me if you see any reason why it does nothing. I may not use the proper object to manipulate the active x control on the excel sheet. Or is it that there's no way to manipulate those control from outside Excel ? Sub exportVersExcel_Click() 'vbs script on an outlook form ' creating object : Set objExcelApp = Item.Application.CreateObject("Excel.Application") objExcelApp.Workbooks.Open "\\Server03\Annuaire\Demande_Ouverture_Compte.xls" ) Set objExcelBook = objExcelApp.ActiveWorkbook Set objExcelSheets = objExcelBook.Worksheets Set objExcelSheet = objExcelBook.Sheets("DemandeOuverture") objExcelSheet.Activate ' The two following lines will work : objExcelSheet.range("J12").value = Item.LastName objExcelSheet.range("J14").value = Item.FirstName 'Those two ones would work within excel, but don't seem to work in automation : objExcelSheet.OLEObjects("TextBox_NomBenef").Objec t.value = Item.LastName objExcelSheet.OLEObjects("TextBox_PrenomBenef").Ob ject.value = Item.FirstName THANK YOU for reading me, hope you'll come up with a bright idea Philippe |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Value Active X control
Hi,
I don't do much of this controlling one thing from another, but wouldn't this work: objExcelSheet.NomBenef.Text = Item.LastName objExcelSheet.PrenomBenef.Text = Item.FirstName You might try just swapping .Value for .Text in your original code, that may work too. Jeff "philippe" wrote in message ... Hi ! I'm trying to copy data from an outlook form into an excel active x control. I have a solution that allows me to write into an Excel Cell, which I probably could get linked with the active x control, thus avoiding to have to write directly into the control, but for some reason, i need to avoid that. Please find my code below and tell me if you see any reason why it does nothing. I may not use the proper object to manipulate the active x control on the excel sheet. Or is it that there's no way to manipulate those control from outside Excel ? Sub exportVersExcel_Click() 'vbs script on an outlook form ' creating object : Set objExcelApp = Item.Application.CreateObject("Excel.Application") objExcelApp.Workbooks.Open "\\Server03\Annuaire\Demande_Ouverture_Compte.xls" ) Set objExcelBook = objExcelApp.ActiveWorkbook Set objExcelSheets = objExcelBook.Worksheets Set objExcelSheet = objExcelBook.Sheets("DemandeOuverture") objExcelSheet.Activate ' The two following lines will work : objExcelSheet.range("J12").value = Item.LastName objExcelSheet.range("J14").value = Item.FirstName 'Those two ones would work within excel, but don't seem to work in automation : objExcelSheet.OLEObjects("TextBox_NomBenef").Objec t.value = Item.LastName objExcelSheet.OLEObjects("TextBox_PrenomBenef").Ob ject.value = Item.FirstName THANK YOU for reading me, hope you'll come up with a bright idea Philippe |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Value Active X control
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Value Active X control
Thank you for your answer.
I tried your proposition, just in case it may work, but i've unfortunately not been surprised that it doesn't. Thank you anyway, I keep searching "Jeff Standen" a écrit : Hi, I don't do much of this controlling one thing from another, but wouldn't this work: objExcelSheet.NomBenef.Text = Item.LastName objExcelSheet.PrenomBenef.Text = Item.FirstName You might try just swapping .Value for .Text in your original code, that may work too. Jeff "philippe" wrote in message ... Hi ! I'm trying to copy data from an outlook form into an excel active x control. I have a solution that allows me to write into an Excel Cell, which I probably could get linked with the active x control, thus avoiding to have to write directly into the control, but for some reason, i need to avoid that. Please find my code below and tell me if you see any reason why it does nothing. I may not use the proper object to manipulate the active x control on the excel sheet. Or is it that there's no way to manipulate those control from outside Excel ? Sub exportVersExcel_Click() 'vbs script on an outlook form ' creating object : Set objExcelApp = Item.Application.CreateObject("Excel.Application") objExcelApp.Workbooks.Open "\\Server03\Annuaire\Demande_Ouverture_Compte.xls" ) Set objExcelBook = objExcelApp.ActiveWorkbook Set objExcelSheets = objExcelBook.Worksheets Set objExcelSheet = objExcelBook.Sheets("DemandeOuverture") objExcelSheet.Activate ' The two following lines will work : objExcelSheet.range("J12").value = Item.LastName objExcelSheet.range("J14").value = Item.FirstName 'Those two ones would work within excel, but don't seem to work in automation : objExcelSheet.OLEObjects("TextBox_NomBenef").Objec t.value = Item.LastName objExcelSheet.OLEObjects("TextBox_PrenomBenef").Ob ject.value = Item.FirstName THANK YOU for reading me, hope you'll come up with a bright idea Philippe |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
ACTIVE X CONTROL? | Excel Discussion (Misc queries) | |||
Difference between a Forms Control verus Active-X Control | Excel Discussion (Misc queries) | |||
how to set active x control | Excel Discussion (Misc queries) | |||
Active X Control Help | Excel Programming | |||
Tool Tip Text for Form control/ Active-X control | Excel Programming |