易截截图软件、单文件、免安装、纯绿色、仅160KB

VB如何让公式中的单元格数目为变量

写了个自动化excel的程序
其中有行代码
objExcel.Cells(i,21)="=(??/10-5)*2"       
i为变量
??为想填入的表格位置

比如想填入(i,3)这样的数,让表格位置随着变量I的变化而变化,从而自动写入公式

但这一行总运行出错
请教一下各位,这一行如何改?


同时,请问各位
用VB操作excel
可以达到使用自动套用吗?
既是我只写第一个表格的公式,然后将同一列指定范围的表格全部自动套用此公式?
VB code:
objExcel.Cells(i, 21) = "=(" & objExcel.Cells(i, 3) & "/10-5)*2"




引用
VB codeobjExcel.Cells(i,21)="=("& objExcel.Cells(i,3)&"/10-5)*2"


按你给的代码输入,运行到此就出错
请再给一个方法吧

引用
引用 1 楼 northwolves 的回复:
VB codeobjExcel.Cells(i,21)="=("& objExcel.Cells(i,3)&"/10-5)*2"


按你给的代码输入,运行到此就出错
请再给一个方法吧

是这样写,VB code 去掉
objExcel.Cells(i, 21) = "=(" & objExcel.Cells(i, 3) & "/10-5)*2"

引用
引用 4 楼 fwcben 的回复:
引用 1 楼 northwolves 的回复:
VB codeob


相关问答:

求教下VB如何给D3D游戏写屏 - VB / API

想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......

VB修改注册表

用VB怎么只针对windows自带的文件的右键添加菜单 如(.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......

vb修改DTPicker1日期问题

Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else ......

VB 请教高手关于用户控件问题

我制作了个用户控件,需要动态加载到窗体上

    Set objExt = Controls.Add("工程1.meActiveX", argName)
    objExt.Visible = True

程序一次能加载N个, 现在想对 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号