Tag: ms access 2016

MS Access VBA修改Excel工作表而不写入驱动器

不知道这个修复是否可能,但值得一试。 我有我的Access数据库中的VBA模块导出一些查询结果到预先存在的Excel工作表。 我没有问题在我的C:驱动器中创build一个新工作表,并填充查询结果。 但我需要能够修改现有的Excel工作表。 该数据库将被同一公司的许多用户使用。 他们将下载一个带有数据库的zip文件和一些带有表格和图表的Excel表格。 这些表将由来自Access的查询结果填充。 主要的问题是,与我目前的代码,我得到运行时错误3011其中Access无法find查询tempQ1 。 这是我的代码:(抱歉,如果它是凌乱的) Sub QueryExport() Dim db As DAO.Database Dim tempQ1 As DAO.QueryDef Dim tempQ2 As DAO.QueryDef Dim totalFindingsQuery As String Dim breakdownFindingsQuery As String Dim query1Name As String Dim query2Name As String query1Name = "tempQ1" query2Name = "tempQ2" Set db = CurrentDb totalFindingsQuery = "<SQL QUERY>" breakdownFindingsQuery […]

保存导入/导出规范时出错

我是MS-Access的新手。 标题是当我尝试将Excel工作表导入到Access 2016中的新表时得到的错误。请注意单个空引号是错误消息的一部分。 我已经尝试重新安装,玩弄导入选项,从CSV导入,具有不同编码的CSV,在Excel中检查表中的错误或不一致。 我search和search没有运气。 帮助将不胜感激。 附录:我尝试导入的CSV是: CashAccountID,AccountDescription,BankName,BankAccountNumber 301,Primary Checking Account,MegaBank,9017765453 302,Money Market Account,Wells Gargle,3831157490 303,Payroll Account,MegaBank,9835320050

使用MS Access VBA将行插入.xlsx文件…如何避免损坏文件?

在MS Access中,我写了一小段代码将一行插入到.xlsx文件中。 两个文件都是本地的。 代码运行时没有错误,但每次运行时都会呈现.xlsx文件不可读。 这是一个步骤: (1)我有简单的.xlsx文件(几百行,十几列,一些格式化,没有特殊function或embedded的VBA)。 (2)我可以在Excel中打开并查看文件 – 但是在运行代码之前,我确保closures它。 (3)在MS Access中运行下面的代码。 (4)代码执行没有错误。 debug.print按预期执行并打印出单元格(1,1)的内容。 (5)我在MS Excel中重新打开.xlsx文件,但Excel现在无法打开它。 Excel本身打开,但是,没有打开的文件,保持完全空白。 没有错误。 (6)如果我使用Office365打开文件(通过networking前端),那么,它说以下错误: “我们不能打开这个工作簿,它只能显示某些指定的项目,但它们不在工作簿中。” 我可以很容易地恢复文件,但每次都会发生同样的行为(5次,我testing过 – 每个都有一些不同的.insert方法)。 在我的代码是否有这是造成这个? Public Function WriteHistoryToExcelFile() Dim lExcelObj As Excel.Application Dim lExcelWB As Excel.Workbook, lSheet As Excel.Worksheet Set lExcelObj = CreateObject("Excel.Application") Set lExcelWB = GetObject("C:\Users\XXX\OneDrive\AA-Store\Ziggy\Meta History.xlsx") Set lSheet = lExcelWB.Sheets(1) Debug.Print lSheet.Cells(1, 1) 'This works […]