当前位置 > 首页 > Asp.net

delphi中操作Excel用分列方法将数字转换为文本格式

2009-4-25 16:05:00来源:Asp.net

Excel中有一列数据是数字和文本方式混合排列的,在用ADO导入数据时就会出现部分数据不能导入的问题

解决这个问题 首先想到的是常用的数字转换为文本格式的方法 WorkSheet.Columns[1].NumberFormatLocal:='@';

几行代码一敲,测试发现没效果,就马上开始 baidu,google 铺天盖地的搜索。。。

没怎么搜索就找到了excel 中有用分列方法将整列数据文本格式化的方法:数据->分列->列数据格式->文本

录制下的宏代码如下:

[代码]

接下来将VBA宏代码翻译成delphi代码:

[代码]

一编译才发现 Array(1,2) 语法错误,于是将其改成delphi 中的数组格式 Array[0..1] of Integer=(1,2) ,

编译还是报错,发现是因为是Delphi调用OLE自动化控制器操纵Excel,该方法只能出现OleVariant类型的参数,马上找资料看有没有OleVariant类型的数组,一下就找到了马上改了代码换上去:  

[代码]

满以为这下问题应该解决了吧,编译通过,测试发现点都么反应,郁闷了。。。

到底是哪点的原因呢?开始排查问题中。。。

第一个可能的原因,excel 宏写错了?反复测试,都能正常运行,效果明显。

第二个可能的原因,delphi OLE操纵Excel 失效?测试了其他Ole代码,都能正常运行,没有问题。

现在就剩下一个比较确定的问题了,WorkSheet.Selection.TextToColumns 这个方法的问题。

搜索引擎中输入"delphi TextToColumns" 搜出来的结果寥寥可数,遇到这个问题的很少,提的问题大多都没人回答,

许多人甚至不知所云,千辛万苦找到MSDN中的帮助中有 C# 调用 excel 这个方法的示例,但是关键地方就是数组参数

他用空值代替了:

[代码]

反复的看帮助中对 FieldInfo 的描述:

FieldInfo
类型:System..::.Object

一个数组,包含各个数据列的分析信息。解释取决于 DataType 的值。当对数据进行分隔时,此参数是一个由两元素数组组成的数组,每个两元素数组都指定特定列的转换选项。第一个元素是列号(从 1 开始),第二个元素是指定如何分析列的 XlColumnDataType 常数之一。

可以是下列 XlColumnDataType 值之一:

只有当安装并选择了台语支持时,才能使用


  • 【自然框架】 之 资源角色——列表过滤方案(思路篇)

    2009-7-21 11:17:00

    名词解释 1、资源角色,我的理解就是资源过滤方案 + 角色。就是把资源过滤方案和角色结合在一起的东东。 2、资源:这里的资源指的是关系数据库里的记录。 3、资源过滤:就是按照一定的条件提取数据

  • Visual Studio 2005 Service Pack 1 for Vista is out

    2007-3-8

    http://www.microsoft.com/downloads/details.aspx?FamilyId=90E2942D-3AD1-4873-A2EE-4ACC0AACE5B6&d

  • 使用cocos2d开发iphone游戏入门概念

    2010-1-26 11:20:00

    阅读: 332 评论: 0 作者: AlexLiu 发表于 2010-01-25 23:30 原文链接 简介: Cocos2D-iPhone 是一个开源框架,利用它

  • ASP.NET视频教程-ASP.NET Web应用开发详解 - 51CTO.COM

    2011-11-28 1:04:00

    Read More......( read more )

  • Customizing the Converter for Json.NET

    2010-8-26 23:45:00

    Many recently days, I thought about Json.net library that implemented by James . It is really a

  • AgileEAS.NET平台开发实例-药店系统-报表开发(上)

    2011-4-6 8:46:00

    开篇 前面我们讲述了药店系统的开发流程,并且也讲述了如何开发一个基础模块,下面我们来看看,如何开发一个报表, 因为我们在药店系统中最常用的功能之一就是打印功 能了,AgileEAS.N

  • 我写的找重复数和过桥问题.

    2009-7-24 0:48:00

    昨天看到莫同志的两个算法题.自己写了俩程序跟帖回过去.没有人理睬我.于是今天就斗胆发首页,等拍砖. 第一个找重复数的题目,看题意我就想到了递归.于是下面的代码... [代码]应该符合题意吧. 第

  • PowerDesigner教程系列(三)概念数据模型

    2007-4-9 16:59:00

    目标: 本文主要介绍属性的标准检查约束、如何定义属性的附加检查。 一、定义属性的标准检查约束 标准检查约束是一组确保属性有效的表达式。在实体属性的特性窗口,打开如图所示的检查选项卡。 在这个

  • 逃脱Asp.Net MVC框架/枷锁,使用Razor视图引擎

    2012-3-12 7:39:00

    此文应该算Razor引擎浅析的续篇,或者说浅析是此文的前传。 为什么要这么做? 1. Asp.Net MVC 其实也不是太好 2. 我有自己的敏捷Web框架, 仍然想用Razor引

  • 冒号课堂§2.4:并发范式

    2009-3-29 23:20:00

    摘要: 并发范式 ——合作与竞争( 并发式编程简谈 ) ? 有谁愿意驾驶一辆启动后不能刹车、不能倒车、不能变速、油尽方停的汽车呢? ? 并发式编程以进程为导向、以任务为中心将系统模块化