从Access格式化Excel文本字段
我在Excel电子表格中有一个字符串,如“Saturday,11月28日,2015 11:59:59 PM GMT-5”,并希望在使用VBA将其导入Access之前删除星期几和时区。我试过: ExcelWorksheet.Cells(1+计数器,nIdCol)=左((ExcelWorksheet.Cells(1+计数器,nIdCol)),查找(“GMT”,ExcelWorksheet.Cells(1+计数器,nIdCol)-1”)” 但发现“查找”不是一个访问函数从Access格式化Excel文本字段,excel,ms-access,vba,Excel,Ms Access,Vba,我在Excel电子表格中有一个字符串,如“Saturday,11月28日,2015 11:59:59 PM GMT-5”,并希望在使用VBA将其导入Access之前删除星期几和时区。我试过: ExcelWorksheet.Cells(1+计数器,nIdCol)=左((ExcelWorksheet.Cells(1+计数器,nIdCol)),查找(“GMT”,ExcelWorksheet.Cells(1+计数器,nIdCol)-1”)” 但发现“查找”不是一个访问函数 有什么想法吗?如果您想在Exc
有什么想法吗?如果您想在Excel中执行此操作,在使用VBA导入Access之前,您可以使用此公式对其进行修剪。注意:我假设您的每个字符串末尾都有“GMT”表示时区,并且在一周的某一天之后都有一个
,
如果2015年11月28日星期六11:59:59 PM GMT-5
在A1中,则在B1中使用此公式:
=TRIM(MID(A1,SEARCH(“,”,A1)+1,SEARCH(“GMT”,A1)-SEARCH(“,”,A1)-2))
尝试使用Instr()函数。将Find(“GMT”)替换为
有关Instr()函数的详细信息:
Instr(string:=ExcelWorksheet.Cells(1 + counter, nIdCol).Value, substring:="GMT") - 1