Tag: ms access

SQL循环与python和pyodbc: 我想创build一个查询循环，从一个实例到下一个实例进行交互。获取正确的数据后，我会做一些计算，并将具有特定关系的新信息写回数据库。 Example Set up Firt loop = [Aggregation Level](1, 2, 3) Second loop = Product(A, B, C) Time = (2001,2002,2003) 1. First loop Aggregation level "1", Product "A", Fetch all years (2001, 2002, 2003) Output = [ (2001,'10 pc','20 €') (2002,'8 pc','18 €') (2003,'82 pc','5000 €')] 2. Second loop Aggregation level "1", Product "B", […]

从密码保护的站点上的access.accdb文件进行Excel查询: 因此，我可以使用POST请求和MSXML2.ServerHTTP60对象，在Excel VBA中提供Intranet密码等，从我们公司的SharePoint站点下载.accdb文件。凉！有了这个下载的文件，我可以使用这样的代码运行查询： Dim connXXX As ADODB.Connection Dim aQuery As String Dim p As String Dim res As Object Dim connStr As String p = ThisWorkbook.Path & "\testBASE1.accdb" connStr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & p aQuery = "SELECT Header1 FROM Table1 WHERE ID = 4" Set connXXX = New ADODB.Connection connXXX.Open connStr Set res = […]

查询来识别对一组数据的更改？: 我有两个报告。一个是三个星期前产生的，另一个是前几天。这些报告共享相同的字段（姓氏，名字，SSN等），但数据明显不同。我们编辑了特定的字段。客户的SSN可能已被编辑以反映数据input错误。他们的地址信息可能已经更新。我们还没有安装审计表作为我们数据库的一部分，所以我们需要确定另一种方法来确定报告之间的变化。有几个明显的问题。 1）当我们将数据导出到Excel中时，logging标识不被保留。一个客户可能有多个logging来说明不同的地址，所以他们的SSN不会是唯一的。 2）我们不仅需要识别这些变化。我们需要对它们进行分类。如果对SSN进行了更改，请与地址更改分开报告。所以，如果我将这两个文件导入到数据库中，是否有一个查询可以解决这个问题？我和我的团队已经有一段时间集思广益了，我们什么都没有想到。没有唯一的loggingID，我们打算连接哪个字段？如果您希望我对问题的任何部分都更加具体，请告诉我，我将尽我所能来帮助您。这些报告位于从MS Access 2013中运行的查询中导出的Excel文件中。谢谢。

平面文件分析标准化: 我有一个包含家庭效率项目数据的表格。它包括项目数据，测量数据（如空调，绝缘）和测量属性数据（如数量，品牌名称，型号）。表中的每一行都是一个单独的度量属性，这意味着所有较less的离散数据（项目和度量）在多行中重复。我需要分析数据来回答这样的问题：最常见的措施是什么？一项措施的平均成本是多less？当我使用Excel 2010数据透视表时，我无法通过独特的项目和度量来分析，因为单个项目/度量被拆分为多个行，当我在数据透视表中求和时，它将会进行双/三重计数（或更多，取决于数量度量属性）。我的问题：为了通过项目和措施进行分析，是否需要规范化表格并导入数据库，如Access？还是我没有足够的创造力来安排数据透视表？

链接的Excel数据透视表不显示Access中计算字段的数据: 我有一个Excel文件中的数据透视表，链接到MS Access数据库中的查询。我在Access查询中添加了一个计算的字段，作为数据透视表的filter。但是，在链接的Excel数据透视表中，筛选器显示“All”或“”作为仅用于此计算字段的条目。我已刷新，保存并closuresAccess和Excel文件。计算在Access中的字段： Year Check: IIf([Record Number] Like "8?16T*",2016,"") （用于确认添加了某些logging的年份。）我的编码/expressionbuild设可能是粗糙和繁琐的，但我只是想要在2016年或空白。它在Access中执行，但在Excel数据透视表中，filter下拉菜单中没有“2016”或“空白”选项。

从Excel导入特定的单元格到MS Access: 嘿stackoverflow社区，我试图从Excel表导入一个特定的单元格到MS访问。我已经在Access中创build了一个代码，它将excel中的特定字段放在访问表中。 Const fName As String = "C:\Users\…\" & varP_ID & ".xlsb" DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, "ImportData", _ fName, False, "Project Details!H12:H12" 问题是，Excel文件是非常dynamic和变化的。正因为如此，我在excel中logging了一个macros查找表中的特定字段。 Dim Field As String Cells.Find(What:="goal", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchFormat:=False).Activate Selection.End(xlDown).Select Field = Selection.Text 我把我要导入的单元格放在variables“Field”中。现在我不知道，如何把这两个代码结合起来。我如何获得访问variables“字段”？我必须在访问代码，我从Excel中导入一个特定的单元格，这是在每个Excel表格在不同的地方？

将Excel文件导入Access数据库时找不到可安装的ISAM: 我目前正在试图让下面的代码工作： Dim s As Long: s = ActiveWorkbook.Worksheets(1).Cells(Rows.Count, "A").End(xlUp).Row Dim acc As Object Set acc = CreateObject("Access.Application") acc.Visible = True acc.OpenCurrentDatabase Application.ActiveWorkbook.Path & "\Database.accdb" acc.CurrentDb.Execute "DELETE FROM Blad1;", 128 ' dbFailOnError = 128 acc.DoCmd.TransferSpreadsheet _ TransferType:=acImport, _ SpreadSheetType:=acspreadsheettypeexcel12xml, _ TableName:="Blad1", _ Filename:=Application.ActiveWorkbook.FullName, _ HasFieldNames:=True, _ Range:="Sheet1$A1:N" & s acc.CloseCurrentDatabase acc.Quit Set acc = Nothing 我看到行acc.CurrentDb.Execute […]

MS Access VBA出口表格结果，以在哪里条件优秀: 我有一个有很多字段的表格，然后是一个仅占用这些字段的表格。我在表格上有一个searchbutton，您可以select某些logging。有没有在VBA的方式从窗体中导出结果，但包括表中的所有字段。这是我从我发现的一些代码的尝试： Private Sub Command49_Click() Dim strWhere As String Dim strFile As String Const strcStub = "SELECT * FROM tblMaster " & vbCrLf Const strcTail = "ORDER BY ID;" Const strcExportQuery = "Query1" 'Name of the query for exports. 'Keyword If Nz(Me.tKW, "") <> "" Then strWhere = strWhere & "[iavmtitle] Like '*" […]

将项目添加到具有确定的VBA项目的数组中: 这个东西很难解释，但更容易看到。我试图编写一个dynamic的使用从一个quertytable访问到Excel中。这样，用户可以select他们想要查询的文件，表格，属性和datefilter。这就是Excel将如何pipe理查询（可以改变，但可以处理）：这是我在录制macros时的代码， With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array(Array( _ "ODBC;DSN=MS Access Database;DBQ=Z:\Informes de actividad\BBDD\2017\BBDD_ADIF_2017.accdb;DefaultDir=Z:\Informes de actividad\BBDD\201" _ ), Array("7;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;")), _ Destination:=Range("$A$1")).QueryTable .CommandText = Array( _ "SELECT PREVISIONES.Centro, PREVISIONES.`Skill Nombre`, PREVISIONES.Fecha, PREVISIONES.Tramo, PREVISIONES.`Prevision Recibidas Cliente`, PREVISIONES.`Prevision Atento`, PREVISIONES.`Prevision Recibidas`, PREVISI" _ , _ "ONES.`Prevision Atendidas`, PREVISIONES.`Prevision TMO`, PREVISIONES.`Prevision de Ocupacion s/Requeridos`, PREVISIONES.`Prevision de Ocupacion s/Programados`" […]

Excel VBA运行Accessmacros—链接表问题: 我有一个Access查询，根据用户定义的参数创build一个数据表。数据表链接到Excel，并与Access共享连接。我发现一些VBA代码从Excel运行Accessmacros，基本上重新执行查询并更新Access数据表。我遇到的问题是，我无法使用共享连接运行Excel VBA代码，因为它显示一个错误，表示无法删除访问中的数据，因此无法完成查询。 Excel VBA仅在共享连接（链接表）被删除时才起作用。如何使用VBA从Excel运行Accessmacros，以便更新访问表，然后刷新Excel中链接的共享连接表并显示新数据？谢谢！