excel对象操作(100分)

  • 主题发起人 主题发起人 snowolf
  • 开始时间 开始时间
S

snowolf

Unregistered / Unconfirmed
GUEST, unregistred user!
在程序中实现将oracel中的某一个表的数据导出到excel中,将excel中相应的列设置为文本或数值格式,我将'0101'导入到excel后发现内容变为'101'了,所以要求能对excel相应列进行属性设置操作
 
1:用ole實現,這個delphibbs上解決這個問題的貼子多了,你查詢以下,
2:直接寫excel的biff格式,我在導出漢字的時候出了問題,不知道哪位兄弟可以幫忙?
3:使用可以讀寫excel的控件.參考:http://www5.skycn.com/soft/29751.html
 
設置為文本就可以了,設置方法:
ExcelWorkSheet1.Range("F7").NumberFormatLocal = '@'
 
var ExcelSheet:Variant;
ExcelSheet:=ExcelApplication1.Workbooks[1];
ExcelSheet.ActiveSheet.Columns[4].NumberFormatLocal := '@';
 
http://www5.skycn.com/soft/29751.html
试一下这个程序,可很好解决你的问题
QQ:292044357
 
我也遇到这样的问题
NumberFormatLocal := '@'根本不管用
 
如果你只是显示呢,实在不行的话可以在字符前加一个不能显示的字符:内码(1010等等)
 
问题暂时解决
 
后退
顶部