var sidebar_align = 'right';
var content_container_margin = parseInt('290px');
var sidebar_width = parseInt('270px');
Unanswered: Command Button Error
I'm wanting to add a command button, that when clicked will open an excel workbook, paste the data, and allow the user to edit the spreadsheet.
Here's what I have:
Private Sub Command246_Click()
Dim mysheet As Object, myfield As Variant, xlApp As Object
Set xlApp = CreateObject("Excel.Application")
Set mysheet = xlApp.workbooks.Open("T:\War.xls").Sheets(1)
myfield = Master!Payee
mysheet.cells(1, 1).Value = myfield
mysheet.cells(1, 1).Font.Bold = True
mysheet.Application.windows("ole_test.xls").Visibl e = True
Set mysheet = Nothing
I'm getting a 424 Error on the "myfield = Master!Payee"
Master is the name of my Form and Table. Any ideas?
What is master? Are you referencing the form, or the table? Have you tried being more explicit? forms!master!payee ?