excel file

[Steve_F]

I am working with access in vb anjd i want to have there be a file in the "\" directory called excel1, how do i do this in my application?

[lintz]

Your question isn't very clear? Do you want to create a file named excel1 in the same directory as your app?

[Steve_F]

yes exactly!

[Steve_F]

also it wont let me do

appExcel.Range("B1").Value = text1.Text

[lintz]

The following link will give you an example of how to do what you're after. HTH

http://www.erlandsendata.no/english/vba/adodao/

[Steve_F]

sort of but i dont really understand it all, and i dont need to use access jsut excel.

[lintz]

If you just want to use Excel then this thread is what you're after.

http://www.visualbasicforum.com/show...ght=save+excel

[Steve_F]

why cant i use this line

appExcel.Range("B1").Value = text1.Text

?????

[lintz]

If you have declared everything then it should work. Can you post all the code you're working with so we can have a look to see if you may hve over looked something.

[Steve_F]

'Reference Microsoft Excel 8.0 Library Object or up from your program first
Sub command1_click()
  Dim appExcel As Excel.Application
  Set appExcel = New Excel.Application
  appExcel.DisplayAlerts = False
  appExcel.Visible = False
  appExcel.ScreenUpdating = False
  appExcel.Workbooks.Open FileName:="c:\myfile.xls"
  appExcel.Worksheets("Sheet1").Select
  Range("A2").Value = text2.Text
  appExcel.ActiveWorkbook.Close Savechanges:=True
  appExcel.Quit
  Set appExcel = Nothing
  MsgBox "Process Complete!"
End Sub

[lintz]

There is nothing wrong with your code???

What line does the error occur?/?

[Steve_F]

there is no error , but the text doesnt go to the block on the excel form.