知识大全在SWT中使用OLE操纵Excel（四）

Posted 2022-07-19 知

篇首语：一身转战三千里，一剑曾百万师。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全在SWT中使用OLE操纵Excel（四）相关的知识，希望对你有一定的参考价值。

在SWT中使用OLE操纵Excel（四） 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　使单元格或列自动调整宽度

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

　　package jrkui example excel;

　　import eclipse swt SWT;

　　import eclipse swt layout FillLayout;

　　import eclipse swt ole win OLE;

　　import eclipse swt ole win OleAutomation;

　　import eclipse swt ole win OleClientSite;

　　import eclipse swt ole win OleFrame;

　　import eclipse swt ole win Variant;

　　import eclipse swt widgets Display;

　　import 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( );

　　shell setLayout(new FillLayout());

　　createExcelPart(shell);

　　shell open();

　　while(!shell isDisposed())

　　if(!display readAndDispatch())

　　display sleep();

　　display dispose();

　　privatestaticfinalintSHEET_ID = x e ;

　　privatestaticfinalintCELL_ID = x c ;

　　privatestaticfinalintCELL_VALUE_ID = x ;

　　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_IDnew Variant[]new Variant( )) getAutomation();

　　OleAutomation cellA = worksheet getProperty(CELL_IDnew Variant[]new Variant( A )) getAutomation();

　　cellA setProperty(CELL_VALUE_IDnew Variant( if you don t fit the width of the cell you couldn t see all ));

　　autoFitWidth(cellA );

　　// autoFitWidth(getColumnOfCell(cellA ));

　　publicstaticfinalintAUTO_FIT_RANGE = x ed;

　　/**

　　*自适应宽度

　　*@paramautomation

　　privatevoid autoFitWidth(OleAutomation automation)

　　//如果使用automation getProperty(AUTO_FIT_RANGE)也是同样的效果

　　automation invoke(AUTO_FIT_RANGE);

　　publicstaticfinalintCOLUMN_OF_CELL = x f ;

　　/**

　　*获得单元格所在的列

　　*@paramcell

　　*@return

　　private OleAutomation getColumnOfCell(OleAutomation cell)

　　return cell getProperty(COLUMN_OF_CELL) getAutomation();

　　运行效果（自动调整A 单元格的宽度）

　　运行效果（去掉createExcelPart（）方法中的autoFitWidth（getColumnOfCell（cellA ））的注释自动调整A 单元格所在列的列宽）

　　说明

　　调整列宽在本例中是通过autoFitWidth（OleAutomation automation）方法

　　在autoFitWidth（OleAutomation automation）中调用了OleAutomation的invoke（）方法参数是所代表ole对象的方法的id 意思是调用该方法用 automation getProperty（AUTO_FIT_RANGE）也是同样的效果

　　autoFitWidth（OleAutomation automation）的参数是一个Range对象可以是一个单元格也可以是一个单元格的区域在本例中示范了两种效果（单元格列）

cha138/Article/program/Java/hx/201311/25849

知识大全 在SWT中使用OLE操纵Excel（四）

知识大全在SWT中使用OLE操纵Excel（四）