5,392
社区成员
发帖
与我相关
我的任务
分享delphi操作excel表的一个问题?求助
插入换页符怎么写?
VBA宏是这样写的:
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
这Before:=ActiveCell是Add方法的一个怪参数,怎么改成
适合delphi的
VBA宏是这样写的:
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
这Before:=ActiveCell是Add方法的一个怪参数,怎么改成
适合delphi的
...全文
请发表友善的回复…
发表回复
BCB 2002-01-31
- 打赏
- 举报
!
cobi 2002-01-31
- 打赏
- 举报
关注
yhec 2002-01-31
- 打赏
- 举报
to iBear:
HPageBreaks.Add（ActiveCell）会出现类型不匹配,add()内的参数必须是
范围Range,就可省掉before了:
ActiveSheet.HPageBreaks.Add(ActiveSheet.Range("a20"))
这样就可很容易改成其它语言了,如用于delphi中
HPageBreaks.Add（ActiveCell）会出现类型不匹配,add()内的参数必须是
范围Range,就可省掉before了:
ActiveSheet.HPageBreaks.Add(ActiveSheet.Range("a20"))
这样就可很容易改成其它语言了,如用于delphi中
yhec 2002-01-31
- 打赏
- 举报
i = 17 ; 第i行前插入换页符
ActiveSheet.HPageBreaks.Add (ActiveSheet.Range("a" & i))
ActiveSheet.HPageBreaks.Add (ActiveSheet.Range("a" & i))
iBear 2002-01-31
- 打赏
- 举报
如果defore是该函数的默认参数的话，delphi中可如下调用：
HPageBreaks.Add（ActiveCell）
是否是默认可参见vba帮助
HPageBreaks.Add（ActiveCell）
是否是默认可参见vba帮助
yhec 2002-01-31
- 打赏
- 举报
这样改,
ActiveSheet.HPageBreaks.Add(ActiveSheet.Range("a20"))
ActiveSheet.HPageBreaks.Add(ActiveSheet.Range("a20"))
lance09 2002-01-30
- 打赏
- 举报
如何使用F1BOOK控件操作excel97,2000的表
