Tag: ms access

ODBC连接到平面文件

把数据库做成一个平面文件的最好方法是什么? 我有一个ODBC驱动程序,需要将数据拉出到一个文件文件。 Excel,Access? 开发办公室?

Excel VBA – 用于访问的SQL语句

我已经完全真正地尝试过每一个组合,并要求一个朋友为什么这个SQL语句的语法到访问数据库的问题的原因… strSQL = "INSERT INTO Usage (User, Tool, OpenDate, ProjectNum, UseNum)" _ & " VALUES ('" & Username & "','" & ToolName & "','" & myDate _ & "','" & ProjNum & "',1)" 这一行生成我在监视窗口中跟踪的这条语句: "INSERT INTO Usage (User, Tool, OpenDate, ProjectNum, UseNum) VALUES ('204073081','D:\Tools_Dev\Wind_Farm_Automation_Dev\Current\testWind.xlsm','2/17/2012','30',1)" 谢谢。

将数据从Excel导出到Access – 错误:参数不可选

我试图从EXCEL 2010导出数据到Access 2010与我的Excel文件上的VBA代码,当我按下button。 我只是想将数据从“水质”表导出到我的数据库的“水质”表(在Excel文件中,访问文件是其他表格和表格)。 我的实际代码是: Sub Button14_Click() ' Exports data from the active worksheet to a table in an Access database Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Dim r As Long Dim LastRow As Long ' Set cn = New ADODB.Connection 'cn.Open "Provider=Microsoft.ACE.OLEDB.12.0; " & _ "Data Source=C:\Documents and Settings\Administrador\Mis documentos\MonEAU\modelEAU Database V.2.accdb; […]

如何将2个查询导出到Excel中的单个工作表中

我正在使用TransferSpreadsheet将访问的查询导出到Excel,它工作正常。 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qryName", "test1.xls", True 现在我有另一个查询,我想要从这个查询中的数据添加到同一个工作表。 我怎样才能做到这一点?

如果在Excel – Ms Access DB中声明

任何人都可以build议下面的IF语句的语法, IIf ( Cur_Insert_Cost, Cur_Insert_Cost/Cur_Insert_Edges, Cur_Regrindable_Cost/(Cur_Regrinds_Possible+1) ) AS Cur_Cost_Edge_Regrind 上面的行是从Ms-Access DB的Excel报告 我不明白的条件部分…. !!! Cur_Insert_Cost,Cur_Insert_Edges,Cur_Regrindable_Cost等是列名

左()函数replace文本不工作

我想要一个由县名组成的字段只返回县名。 问题在于各县import“布朗县”(举例)。 我希望它只是“布朗”。 所以我的目标是摆脱文字末尾有“县”的县域的任何一部分。 因此,请让我知道这个更新查询有什么问题 – 它不断返回,并使我所有的县域空白由于某种原因。 CurrentDb.Execute "UPDATE [tblImport] SET [tblImport].County = Left([County],Len([County]-7)) " & _ "WHERE ((([tblImport].[County]) Like '*county*'));"

在Office 2013 64位上使用OLEDB连接

我知道有一些相关的线程。 但是,他们似乎都没有解决我的问题。 我正在把我确切的问题放在这里。 有人可以帮我弄这个吗? 环境 – Windows 7 64位,Office 2013 64位 自动化 – Excel中VBA中的macros,通过使用下面提到的驱动程序连接到.mdb文件,可以将一些数据导入 问题 – 运行时错误3706,找不到提供程序。 它可能没有正确安装 尝试1 – 我在线检查了错误代码,大多数线程指出语法错误和连接方式。 我试图实施的build议,但没有影响 尝试2 – 我发现这是因为它试图使用64位办公室的旧驱动程序。 因此,我然后尝试安装最stream行的build议 – http://www.microsoft.com/en-us/download/details.aspx?id=13255这也没有工作 代码 – database_path = Application.ActiveWorkbook.path & "\" & "mydb.mdb" Set cn = CreateObject("ADODB.Connection") With cn .Provider = "Microsoft.Jet.OLEDB.4.0" .ConnectionString = "Data Source=" & database_path End With cn.Open […]

VBA查询中有多个null

我使用MS Access作为后端,并插入在尝试处理空格的Excel中的值。 sSQL = "Insert into " & Cells(1, 1) & " VALUES ( '" & CStr(Cells(r, 53)) & "',' " & CStr(Cells(r, 54)) & "', '" & IIF(Isnull(Cells(r,55), "NULL",Cint(Cells(r,55)) & "',' " & CInt(Cells(r, 56)) & "',' " & CInt(Cells(r, 57)) & "',' " & CInt(Cells(r, 58)) & "','" & CInt(Cells(r, 59)) & "',' […]

我的VBA没有返回任何错误,但不会在MS-Excel中设置单元格的值

也许只是因为它仍然是早晨,但我不明白为什么我的程序不会按预期做。 我通常非常相似的代码来设置代码的其余部分的值,但这套不会工作。 public sub setValue(wrkBook as object, wrkSht as object) dim CurCell as object wrkSht = wrkbook.Sheets("TestSheet") Set curCell = wrkSht.Cells(4,1) CurCell.Value = "Test" end sub 它不会返回任何错误,它只是不会将单元格(4,1)的值设置为“test”。 我正在使用Acess内部的VBA

从Excel查询访问:variables参数

我一直在做深入的function区域仪表板在Excel中刷新最终用户命令的“全部刷新”button。 我遇到的唯一问题是在午夜过后刷新日常生产,从而将“date()”的访问后端查询转换为当天午夜的访问。 这一直是我想要正常工作的条件:根据现在的时间,我要今天或前一天的所有东西> =上午5点。 WHERE start_time >= (iif(timevalue(now()) between #00:00# and #4:59#,date()-1,date())) AND timevalue(start_time) >= #5:00#; 问题在于它以这样一个非常缓慢的速度返回。 我不认为我曾经等过它完成。 我不确定它是否计算在后台表中涉及的每个logging上的逻辑,这将解释locking。 我真的想避免dynamic构build任何逻辑,因为我只是使用Excel通过查询向导调用此Access查询。 我讨厌不得不求助于一个访问button,触发一个模块dynamic地build立查询,然后把焦点放在excel窗口并刷新。 在一个[Form]上创build一个对象将是很好的! 但只有当表单处于活动状态时才有用。即使这样,SQL也会拒绝表单对象中的任何子计算。 有什么想法吗?