在SWT中使用OLE操作Excel(四):使单元格或列自动调整宽度

在实际应用中,常常会遇到单元格的值比较长而被遮住,用户不得不手动调整宽度,如果能通过程序就自动调整宽度就会很方便了。实际上在通过OleView.exe这个工具查询得知Range有AutoFit的方法,它的Id是0x000000ed,那么如果获得了Range的引用,只要调用AutoFit这个方法,就可以自动调整宽度了。下面请看代码与示例效果:

package com.jrkui.example.excel;
import org.eclipse.swt.SWT;
import org.eclipse.swt.layout.FillLayout;
import org.eclipse.swt.ole.win32.OLE;
import org.eclipse.swt.ole.win32.OleAutomation;
import org.eclipse.swt.ole.win32.OleClientSite;
import org.eclipse.swt.ole.win32.OleFrame;
import org.eclipse.swt.ole.win32.Variant;
import org.eclipse.swt.widgets.Display;
import org.eclipse.swt.widgets.Shell;
publicclass AutofitShell {
publicstaticvoid main(String[] args) {
   new AutofitShell().open();
} 
publicvoid open()
{
   Display display = Display.getDefault();
   Shell shell = new Shell();
   shell.setText("Auto Fit");
   shell.setSize(700, 300);
   shell.setLayout(new FillLayout());
   createExcelPart(shell);
   shell.open();
   while(!shell.isDisposed())
     if(!display.readAndDispatch())
       display.sleep();
   display.dispose();
}
privatestaticfinalintSHEET_ID = 0x000001e5;
privatestaticfinalintCELL_ID =0x000000c5;
privatestaticfinalintCELL_VALUE_ID = 0x00000006;
privatevoid createExcelPart(Shell shell)
{
   OleFrame frame = new OleFrame(shell,SWT.NONE);
   OleClientSite clientSite = new OleClientSite(frame,SWT.NONE,"Excel.Sheet");
   clientSite.doVerb(OLE.OLEIVERB_SHOW);
   OleAutomation workbook = new OleAutomation(clientSite);
   OleAutomation worksheet = workbook.getProperty(SHEET_ID,new Variant[]{new Variant(1)}).getAutomation();
   OleAutomation cellA3 = worksheet.getProperty(CELL_ID,new Variant[]{new Variant("A3")}).getAutomation();
   cellA3.setProperty(CELL_VALUE_ID, new Variant("if you don't fit the width of the cell, you couldn't see all."));
   autoFitWidth(cellA3);
//   autoFitWidth(getColumnOfCell(cellA3));
}
publicstaticfinalintAUTO_FIT_RANGE      = 0x000000ed;
/**
*自适应宽度
*@paramautomation
*/
privatevoid autoFitWidth(OleAutomation automation)
{
   //如果使用automation.getProperty(AUTO_FIT_RANGE)也是同样的效果
   automation.invoke(AUTO_FIT_RANGE);
}
publicstaticfinalintCOLUMN_OF_CELL    = 0x000000f6;
/**
*获得单元格所在的列
*@paramcell
*@return
*/
private OleAutomation getColumnOfCell(OleAutomation cell)
{
   return cell.getProperty(COLUMN_OF_CELL).getAutomation();
}
}

时间: 2024-11-03 04:02:43

在SWT中使用OLE操作Excel(四):使单元格或列自动调整宽度的相关文章

在SWT中使用OLE操作Excel(三)——设置单元格背景色

packagecom.jrkui.example.excel; import org.eclipse.swt.SWT;import org.eclipse.swt.layout.FillLayout;import org.eclipse.swt.ole.win32.OLE;import org.eclipse.swt.ole.win32.OleAutomation;import org.eclipse.swt.ole.win32.OleClientSite;import org.eclipse.

在SWT中使用OLE操作Excel(二):为Excel的A1单元格赋值

代码: packagecom.jrkui.example.excel; import java.io.File;import org.eclipse.swt.SWT;import org.eclipse.swt.layout.FillLayout;import org.eclipse.swt.ole.win32.OLE;import org.eclipse.swt.ole.win32.OleAutomation;import org.eclipse.swt.ole.win32.OleClient

在SWT中使用OLE操作Excel(一):使Excel嵌入到SWT窗口中

使用的Eclipse版本:3.3.1 使用的jdk版本:5.0 packagecom.jrkui.example.excel; import org.eclipse.swt.SWT;import org.eclipse.swt.layout.FillLayout;import org.eclipse.swt.ole.win32.OLE;import org.eclipse.swt.ole.win32.OleClientSite;import org.eclipse.swt.ole.win32.O

在SWT中使用OLE操作Excel(五):设置单元格的字体格式

设置字体格式是常见的需求 package com.jrkui.example.excel; import org.eclipse.swt.SWT; import org.eclipse.swt.layout.FillLayout; import org.eclipse.swt.ole.win32.OLE; import org.eclipse.swt.ole.win32.OleAutomation; import org.eclipse.swt.ole.win32.OleClientSite;

swt ole-Java SWT操作Excel(OLE),如何给单元格区域赋值?

问题描述 Java SWT操作Excel(OLE),如何给单元格区域赋值? import java.io.File; import org.eclipse.swt.SWT; import org.eclipse.swt.layout.FillLayout; import org.eclipse.swt.ole.win32.OLE; import org.eclipse.swt.ole.win32.OleAutomation; import org.eclipse.swt.ole.win32.Ol

用OLE操作Excel

用OLE操作Excel(目前最全的资料)(04.2.19更新) 本文档部分资料来自互联网,大部分是ccrun(老妖)在Excel中通过录制宏-->察看宏代码-->转为CB代码而来.本文档不断更新中.欢迎大家关注. 要在应用程序中控制Excel的运行,首先必须在编制自动化客户程序时包含Comobj.hpp #include "Comobj.hpp" C++ Builder把Excel自动化对象的功能包装在下面的四个Ole Object Class函数中,应用人员可以很方便地进

c++-C++ OLE操作EXCEL,使用指定的数据生成折线图

问题描述 C++ OLE操作EXCEL,使用指定的数据生成折线图 请教示例外码,最好能带注释的,还有就是数据并不确定能有多少个,我先做的事把数据写进EXCEL表格中,然后生成折线图,所以请教大神如何生成折线图 解决方案 http://zhidao.baidu.com/link?url=yUOoaVftMmbtTOa2CLBledLggSd-MarBEREtZmcMgVspNwP3g4jdjP6yvO7iCm2o6bhBXBm08wVfapTBlOXsiWMmNhxxXt6mgKaEjLwq42W

ole-C/C++中用OLE操作Excel的问题,特别慢怎么提高效率啊

问题描述 C/C++中用OLE操作Excel的问题,特别慢怎么提高效率啊 最近公司要求做一个小工具,就是两个Excel文档,父文档A和子文档B和进行匹配,如果一行数据A和B都有就在B中改该行的背景颜色,具体功能我都做出来了但是速度很慢啊!两个文档一个只有一百多行数据,另一个只有几十行.怎么还要好几分钟呢! 解决方案 要看你的代码怎么写的,感觉可能你调用的方式不对,每操作一行存盘一次了吧. 解决方案二: 这种东西根本不用大费周章用c++,用vba写点脚本也不至于这么慢. 解决方案三: OLE操作E

用OLE操作Excel(Wangda补充)

我也曾经在CSDN上写过BCB调用EXCEL的文章.思想和站长的<用OLE操作Excel(C++ Builder版)>如出一辙. 如果我们用2K的操作系统,可以发现如果只是用ExcelApp.PR("Quit")后,Excel线程还在,这样,如果应用程序不退出,被调用的EXCEL文件就无法在SHELL下用EXCEL打开.因此,我的BCB调用EXCEL是这样的在最后要加上一点工作,就是把所有的VARIANT变量都要设置为UNASSIGNED,我的一个小例子如下,新建立一个EX