请教，关于这段代码，有空格怎么办？

Question

本帖最后由 lzxbl04 于 2010-01-19 11:16:51 编辑

Answer 1

你在使用Access的时候，将取出的数据用Trim函数去空格吧。
因为你的导入不是自己手工写的，是使用的自动的方法。

Answer 2

先用Trim将空格处理完后再导入

Answer 3

有两个方法：
①在导入之后，从 Access 取数据时处理。
②在导入之前，先对 Excel文档 进行处理。

Answer 4

他是叫你在取Access数据时再处理。否则你不可以用以下方式导入：
Set db = OpenDatabase(excelPath, True, False, "Excel 8.0;IMEX=1") 
sql = ("Select * into [;database=" & accessPath & "]." & accessTable & " from [" & sheet & "$]") 
db.Execute (sql) 

Answer 5

第②中最好了，就像3楼大哥说的，但我只找到在Excel中用VBA做的代码

Answer 6

可以在导入之后，对 Access 中的数据用 UPDATE 语句进行去除空格的更新。

Answer 7

为什么？难道就不能在导入之前加一段代码，该段代码的功能是：读Excel → 去空格 → 将改好的数据写入原来的Excel能不能这样实现只是小弟的无畏构想，呵呵，汗一个

Answer 8

预先去空格应该不如事后在数据库中update快

Answer 9

小弟自己写了一个，不知道行不行，假设要将第一列的数据去空格For n = 0 To rs.RecordCount
rs.Fields(0).Value = trim(rs.Fields(0).Value)
next n
rs.Update

Answer 10

帮忙改改这个UpdateFor n = 0 To rs.RecordCount 
rs.Fields(0).Value = trim(rs.Fields(0).Value) 
next n 
rs.Update 

Answer 11

For n = 0 To rs.RecordCount 
rs.Fields(0).Value = trim(rs.Fields(0).Value) 
rs.Update
rs.movenext
next n