Question

我有一个字符串＆＃34;星期六，2015年11月28日晚上11:59:59 GMT-5＆＃34;在Excel电子表格中，并希望在使用VBA将其导入Access之前删除星期几和时区。我试过了：

ExcelWorksheet.Cells（1 + counter，nIdCol）= left（（ExcelWorksheet.Cells（1 + counter，nIdCol）），Find（＆＃34; GMT＆＃34;，ExcelWorksheet.Cells（1 + counter，nIdCol） - 1））＆＃34;

但发现＆＃34;发现＆＃34;不是Access功能。

有什么想法吗？

Answer 1

如果要在Excel中执行此操作，在使用VBA导入Access之前，可以使用此公式对其进行修剪。注意：我假设您的每个字符串都有＆＃34; GMT＆＃34;最后表示时区，并且在一周之后将有,。

如果Saturday, November 28, 2015 11:59:59 PM GMT-5在A1中，请在B1中使用此公式：

=TRIM(MID(A1,SEARCH(", ",A1)+1,SEARCH("GMT",A1)-SEARCH(", ",A1)-2))

Answer 2

尝试使用Instr（）函数。将查找（“GMT”）替换为

Instr(string:=ExcelWorksheet.Cells(1 + counter, nIdCol).Value, substring:="GMT") - 1

有关Instr（）函数的更多信息：http://www.techonthenet.com/excel/formulas/instr.php

从Access格式化Excel文本字段

2 个答案: