1

Konu: excel 2007 IF hatası

selamlar;
office 2007 kullanıyorum.  aşağıdaki problem oluyor. yardımlarınızı bekliyorum.

Visual Fox Pro
local Lcformul

Lcformul='=IF(E3>0;SUM(C3*E3+D3*60/$C$1);SUM(C3*D3*60/$C$1))'
loexcel = Createobject('Excel.Application')
lowb    = loexcel.workbooks.Add()
loexcel.Visible = .T.
lows    = loexcel.worksheets(1)
Lcformul='=IF(E3>0;SUM(C3*E3+D3*60/$C$1);SUM(C3*D3*60/$C$1))'
lows.cells(1,1)=m.Lcformul 
lows.cells(1,1)="=IF(A1=1;0;2)"
 
** yukarıda ki son 3 satıradada hata veriyor. hata: OLE error code 0x80030002: Unknown COM status code.
 
* ama  IF dışındakiler hata verimiyor.
lows.cells(1,1)="=AVERAGE(B1:F1)"
Bilmediğin Neyse Yanıldığındır.

2

Re: excel 2007 IF hatası

Visual Fox Pro
local Lcformul

loexcel = Createobject('Excel.Application')
lowb    = loexcel.workbooks.Add()
loexcel.Visible = .T.
lows    = loexcel.worksheets(1)
 
Lcformul='=IF(E3>0;SUM(C3*E3+D3*60/$C$1);SUM(C3*D3*60/$C$1))'
lows.cells(1,1).value = 1
lows.cells(1,2).value = 2
lows.cells(2,1).formula = "= (a1+b1)"
 
lows.cells(3,1).value = 10
lows.cells(3,2).value = 10
lows.cells(3,3).value = 10
lows.cells(3,4).value = 10
lows.cells(3,5).value = 10
lows.cells(1,3).value = 100
 
 
lows.cells(2,2).formulalocal = lcFormul

3

Re: excel 2007 IF hatası

selamlar;
yine olmadı aşağıdaki satır hata veriyor. Normal formüllerde sorun yok zaten hatayı IF li formüllerde veriyor.

lows.cells(2,1).formula = Lcformul

Bilmediğin Neyse Yanıldığındır.

4

Re: excel 2007 IF hatası

lows.cells(2,2).formulalocal = lcFormul ile sorun çözüldü. aşağıda olduğu için görmemişim. teş.

Bilmediğin Neyse Yanıldığındır.