Tag: ms access

连接到Access数据库的Excel文件正在打开链接表源文件: 我有一个Access数据库'后端'有两个链接到Excel文件'Src1'和'Src2'的链接表。我有一个查询连接数据库中的普通表和两个链接表。我有一个表中的另一个excel文件“报告”连接到数据库中的查询。除了一个奇怪的问题，一切正常。有时打开“报告”文件时，会自动打开“Src1”和“Src2”。为什么/这怎么可能发生？

当我刷新Access连接时，Excel将打开数据源: 我有3个Excel文件（A，B和C）。文件A和B是Access数据库中的链接表。在文件CI中，使用来自Access的一些查询作为外部数据源。问题是，当有人打开文件A（或B）进行编辑，并且正在刷新文件C时，Excel以只读模式打开文件A（或B）。文件A（或B）未被编辑时，问题不显示。任何想法，我怎么可以pipe理这个问题（我不希望Excel打开文件A或B时，我刷新文件C）

向Access表中添加一行时，生成一个序列号（每个组）: 我有一个MS Access（.accdb）表，数据如下所示： Location Number ——– —— ABC 1 DEF 1 DEF 2 GHI 1 ABC 2 ABC 3 每次我将数据附加到表格中，我都希望该数字对于位置是唯一的。我通过MS Excel VBA访问这个表 – 我想创build一个新的logging（我指定了代码中的位置），并创build了一个唯一的序列号。有没有办法来设置表，所以这是自动发生的logging添加？我应该写一些描述的查询，并确定每个位置的下一个数字，然后在创buildlogging时同时指定位置和数量？我正在写下如下表格： Set rst = New ADODB.Recordset rst.CursorLocation = adUseServer rst.Open Source:="Articles", _ ActiveConnection:=cnn, _ CursorType:=adOpenDynamic, _ LockType:=adLockOptimistic, _ Options:=adCmdTable rst.AddNew rst("Location") = fLabel.Location 'fLabel is an object contained within […]

使用Microsoft AccessclosuresExcel工作簿: 我从Microsoft Access查询中导出了两个Excel工作簿，但Excel电子表格保持打开状态。我如何closures它们？我已经看遍了互联网的答案和我发现的代码说： Dim objXLApp As Excel.Application 这是行不通的。我得到以下错误： "Compile Error: User-defined type not defined" 和“Excel.Application”不是从下拉列表中选项。

在excel中访问插入已打开的查询下面现有的数据: 好吧，我有一个Excel文件的数据。此数据来自已从Access数据库手动复制的查询。既然这个每天都要做，我们想自动完成。在Access数据库中已经有了VBA代码，可以打开查询并将其写入右侧表格的Excel文件中。但是，它为我插入一个静态范围，所以它实际上只是覆盖我说的范围： Dim rst As DAO.Recordset Dim ApXL As Object Dim xlWBk As Object Dim xlWSh As Object Set rst = CurrentDb.OpenRecordset("Query name") Set ApXL = CreateObject("Excel.Application") ApXL.Application.ScreenUpdating = False ApXL.Visible = True Set xlWBk = ApXL.Workbooks.Open("C:\blabla.xlsm", True, False) Set xlWSh = xlWBk.Worksheets(1) xlWSh.Activate xlWSh.range("A1341").CopyFromRecordset rst xlWBk.Save xlWBk.Close False ApXL.Quit rst.Close Set […]

从Excel发送范围到Access: 我正尝试从Excel发送一个范围到访问表。 Excel范围有20列，Access表有20个字段，我用这个代码的顺序很好 adoConn.Execute "INSERT INTO OPT SELECT * FROM Range2Export" Range2Export被定义为20列的范围。 OPT是我的Access表我得到这个错误： The Microsoft Access Database Engine cannot find the input table or query 'Range2Export'. 我用这个帮助http://support.microsoft.com/kb/257819但没有帮助我。如果有人能帮忙谢谢

有时MS Access运行速度很快，其他时间很慢: 我一直在构build一个数据库应用程序（Excel中的前端，Access中的后端），它存储了由我的团队中的build模者（包括我）构build的财务模型的现金stream量。数据库最终会相当大（1M +logging不会让我感到意外），但是我已经用大约75个交易（约50个客户端）的约2500个现金stream预填充它。因为在我的公司有两个子组，所以实际上我创build了两个单独的后端，由于不同的请求function（不幸），现在正在分支。但是，这样做让我有机会比较在各种报表中显示的永久表格的“临时”表（或存储的查询）的运行时间。这些查询涉及一系列连接。其他所有相同的情况下，一个数据库需要大约1秒钟，另一个大约10秒，尽pipe类似的logging数量。前者也是在10秒前运转，但最后我对前者的桌子结构作了一些改变，在更新了后者的基础上使其与后者相符合。加载时间的减less令我感到困惑，因为除了在这里和那里添加几个字段，我什么也没有做。从Excel中的VBA中调用临时表查询，但只是为了确保它不是Excel / DAO中的某些东西，我从Access中的VBA运行相同的查询并获得相似的加载时间。有没有人有什么想法是怎么回事？我不希望现在较慢的数据库在100,000条logging中无法使用，但看起来可能是这样。更快的那个，同时应该没问题。我正在努力让我们在MySQL或SQL Server上，但同时这件事情将不得不承担的负担。谢谢

Access / Excel VBA：获取上周对应的两个date: 我想我可以做一个循环，但由于我与MS Access一起使用这个问题，我想知道是否有一个快速的方法来做到这一点。现在是2014年4月3日。我希望能够返回与前一周相同的星期日和星期六的date。例如上周三月二十三日（星期天）到三月二十九日（星期六）。

通过Access 2013 VBA编辑后，无法打开Excel 2013文件: 我正在一个Access数据库中，我有一个button，单击时，复制一个文件（模板excel文件），然后打开新副本，设置一些单元格的值，然后保存并closures它。另一个button完全相同的事情，但后来调用另一个子打印新文件。我遇到的问题是，我无法设法在Excel中打开这些编辑的文件。他们通过访问VBA代码打印没有任何问题，这意味着它会被编辑，保存，然后打印。但是，当我双击这些文件之一，Excel启动，但文件根本不打开。没有桌子。如果我已经在Excel中打开了一个文件，并右键单击其中一个文件并select打印，则先前的Excel表单将被打印。这里是Acess VBA子版本，它复制模板，然后继续编辑副本： Private Sub SaveXLFile(FileNameFull As String) 'FileNameFull: Complete path for file to be saved, including extension. Dim ExcelApp As Excel.Application Dim ExcelBook As Excel.Workbook Dim ExcelSheet As Excel.Worksheet Dim fso As Object 'copy template Set fso = VBA.CreateObject("Scripting.FileSystemObject") fso.CopyFile ThePath & "Arbetsorder – Blankett.xlsx", FileNameFull […]

在ms访问中插入结果集中的excel文件数据: 我有一个方法来检查员工的出勤情况。雇员的名字，姓氏，职位是从数据库中检索的。日常出勤方法工作正常。现在，我也有一种方法，从每日出勤方式创build每月出勤报告。它也检索数据库中的数据。在查询中，我使用了一个数据透视表。它不起作用。错误表示它在from子句中有错误。但是当我在ms访问中testing这个查询时，它完美的工作。大家可以帮助我吗？这是我的代码。 private void attendanceView() throws ClassNotFoundException{ String query ="TRANSFORM COUNT(attendance.present)SELECT employees.ID,employees.firstName,employees.lastName,employees.position,employees.rate FROM employees LEFT JOIN attendance ON employees.ID = attendance.empID GROUP BY employees.ID,employees.firstName,employees.lastName,employees.position,employees.rate PIVOT attendance.dateAttended"; Object[][] result = connectToDB(query); monthlyAttendanceTable.setModel(new javax.swing.table.DefaultTableModel( result, new String [] {"Employee ID","First Name","Last Name", "Position", "Rate","",""} ) { Class[] types […]