关于判断合并单元格的问题(50分)

  • 主题发起人 主题发起人 babyzhong
  • 开始时间 开始时间
B

babyzhong

Unregistered / Unconfirmed
GUEST, unregistred user!
我查找过VBA的帮助,里面提供了函数可以判断某一单元格是否在一个合并单元格内,但是这函数搬到delphi中用不了,提示说不支持。那么Delphi中是否提供了相应的函数来判断呢?
请各位指教
 
最好把你的代码贴上来看看,应该支持的,是不是集合类的对象有()引用,应用[]
 
给你一段代码--
ExcelApp := CreateOleObject('Excel.Application');
MyworkBook := CreateOleObject('Excel.Sheet');
MyworkBook.worksheets[1].range['B1:D1'].merge;
if Myworkbook.worksheets[1].range['C1'].mergecells then
begin
Myworkbook.worksheets[1].range['E1'].value := 'C1 is merge';
end;
测试过的
 
给你一段代码--
ExcelApp := CreateOleObject('Excel.Application');
MyworkBook := CreateOleObject('Excel.Sheet');
MyworkBook.worksheets[1].range['B1:D1'].merge;
if Myworkbook.worksheets[1].range['C1'].mergecells then
begin
[red]Myworkbook.worksheets[1].range['C1'].mergearea.cells[1,1].value := 'merge';
// 这是在合并区域里面赋值的, 前面的例子是在合并区域外面复制的[/red]
end;

 
I know it. 在VBA中的通过HasMergeCells来判断,在Delphi中是通过MergeCells来判断
 
后退
顶部