Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Display Problem with Excel Textboxes
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Display Problem with Excel Textboxes
Divers
Thread ID:
00867646
Message ID:
00867646
Vues:
58
Hi All,

I'm attempting to change the Text(Value)of an Excel Workbook Textbox using Automation from VFP. I'am able to change the the Text (Value) property using code like by using code such as:

oExcel = CREATEOBJECT("Excel.Application")
oWorkBook = oExcel.Workbooks.Add("Some File Name")
oSheet = oWorkBook.ActiveSheet

WITH oSheet
.txt1.Text = "Some Text 1"
.txt2.Text = "Some Text 2"
.txt1.Text = "Some Text 3"
ENDWITH && oSheet

oExcel.Visible = .T.
oSheet.Activate()

When I view the Spreadsheet, even though the Text (Value) property has the info I set from VFP, the info is not displaying in Excel.

An alternate approach which seems to work is to link the Excel text box values (via the Linked Cell Textbox Property) to a (hidden) cell in the spreadsheet and set the value using standard code like:

oSheet.Range("Some Cell").Value = "Some Text 1"

Has anyone dealt with this issue? Is the alternate approach the practical way to go about acheiving this result?
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform