hello!
since i am still not able to solve the problem here's more code. hope
it will help...
public class form1
inherite system.windows.forms.form
dim excel as excel.application
dim exlsheet as excel.worksheet
dim exlbook as excel.workbook
dim beginn, ende as integer
dim datei(53) as string
dim i as integer
private sub button1_click(...)
datei(1)= "...."
datei(2)= "...."
....
beginn = beginn_eingabe.text
ende = ende_eingabe.text
excel = createobject ("excel.application"
excel.visible = true
i = beginn
do
exlbook = excel.workbooks.open (datei(i))
exlsheet = exlbook.activesheet
with exlsheet
.name = "..."
.columns ("B:B").Insert()
.range ("b7").formular1c1 = "=RC[-1]*1"
.....
the application is interupting at the last command (formular1c1). i
don't know whats the problem. please help me!!!!
thanks in advance
adrian
p.s. i am using microsoft visual studio 2002 and excel xp
ak*******@arcor.de (adrian) wrote in message news:<6a**************************@posting.google. com>...
hello!
i am using visual studio 2000 and am trying to insert a formúla into
an excel cell. the code goes like this:
with excel
.workbooks.open (datei(i))
.activesheet.name ="statistik 2004"
.activesheet.range("b7").select()
.selection.insert()
.range("b7").formular1c1 = "=rc[-1]*1"
end with
excel is defined as excel.application
i have problems with the formular1c1 command. i think the syntax is
ok, but when i am executing the application visual basic shows me a
messagebox with
"An unhandled exeption of type
'system.runtime.interopservices.comexception' occured in mscorlib.dll.
Additional information: Exception from HRESULT: 0x800A03EC"
can anyone help me?
adrian
--------------------------------------------------------------------------------