数值字段溢出的解决.doc_第1页
数值字段溢出的解决.doc_第2页
数值字段溢出的解决.doc_第3页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

数值字段溢出的解决EXCEL文件是目前采用通用表格编辑的常用软件，具有操作方便简易，便于计算和统计的特点，是办公一族常用的计算统计工具。作为数据库的接口之一，EXCEL文件也是用于对数据进行前期处理的常用工具，便于各岗位和程序间的文件交换和传递。ACCESS也是微软办公工具中的简单数据库之一，具有数据应用灵活，配置简单，编程易上手的特点。而ACCESS与EXCEL软件的配合应用就显得比较普遍了。我在办公工作中经常需要从ACCESS中导入与其它岗位配合工作形成的EXCEL文件，奇怪的是经常会出现数值字段溢出的情况，检查了半天也没发现程序有什么漏洞。开始一直认为是数据量大造成的，因为每次降低导入数据的数量，都会顺利导入，于是准备分段导入大片的连续数据，但研究后发现这种编程不是我这种菜鸟能够实现的，而且从程序中也找不到实现的方法，只好针对数值字段溢出的问题开展针对性的研究。在一次试验中，在EXCEL中删除了前10行的数据，居然就成就了后面百余行数据的顺利导入，让我困惑不解，而且无论怎么处理，只要这10行数据填入内容，后面就无法顺利导入了。我在网上查阅了大量资料，发现这个问题还是来自于EXCEL数值字段的约定方式带来的问题，在通过DoCmd.TransferSpreadsheet导入时，会把EXCEL前8行数据认为是判断每个字段数据的性质的一个定义，当为空时，被认为是文本，于是数据的导入就能够比较顺利。而解决这个问题也没什么好的办法，微软的在线帮助中给出了一段代码，编制成一个宏，先对EXCEL的数据进行处理，而处理过后，就能顺利导入了。这段代码是：Sub Addspace() Dim cell As Object For Each cell In Selection cell.Value = & cell.Value cell.Value = Right(cell.Value, Len(cell.Value) - 1) NextEnd Sub意思就是在每个选定的数据前加一个空格，然后取形成的数据右边的部分，长度减1，这样又把那个空格去掉了。我实际操作了一下，还是有问题，当处理文本数据时没什么，当数据为数字时，就乱套了，经常会莫名其妙地减短数据长度，尤其是数量和日期这类数据，一次处理下来简直面目全非，数据的完整性和可靠性根本无从提起。但这段话有的时候是能够进行正常操作的，这让我非常奇怪，几个轮次测试下来，总算发现了问题：在执行这个宏之前，需要对每个单元格进行文本格式约定。为了一次性搞定，简化操作步骤，我重新编辑了这段话：Sub Addspace() Selection.NumberFormatLocal = Dim cell As Object For Each cell In Selection cell.Value = & cell.Value cell.Value = Right(ce
人人文库> 全部分类> 生活休闲 > 科普知识

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论