Tag: ms access

将数据从excel导入到存在的访问数据库中，如果数据存在则replace数据，否则将创build新行: 这里是Excel文件：我创build了一个数据库名称“Activities_open_projects_19_OCT_17_BL_Fin_AA”。表名是“活动开放项目（BL Fi）”，它的“活动ID”列是唯一的，不允许非重复的值，我成功导入了一个excel文件，但现在我想导入相同types的文件，需要replace数据if数据存在，否则新行将根据“活动ID”创build。请分享一个链接或帮助如何解决它。这里是访问文件：

StrSQL插入到VBA中引发错误: 我试图插入一些新的logging到访问数据库。这是我的代码， ' OPEN ACCESS APPLICATION Set objAccess = CreateObject("Access.Application") objAccess.OpenCurrentDatabase DatabasePath ' OPEN INTERNAL DATABASE Set db = objAccess.CurrentDb BuName = Ws.Sheets("Config").Range("T1").Value RepName = Ws.Sheets("Config").Range("T2").Value NumberofUniqueSheets = Ws.Sheets("Config").Range("T3").Value For i = 1 To NumberofUniqueSheets CmpValue = Ws.Sheets("Config").Range("U1").Value ShtNamedec = Split(CmpValue, "$")(0) HeadRow = Split(CmpValue, "$")(1) AddInfo = Split(CmpValue, "$")(2) DateInfo = Split(CmpValue, "$")(3) ' […]

MS访问表规范化: 我有两张Excel表，其中一张表包含一个组织的全部员工详细信息，包括代码，姓名，职位，另一张表包含一名员工所学的书籍。第二个表包括员工代码，该员工研究的书籍的名称和名称。一名员工可能学习了不止一本书，一本书可以被很多员工阅读。现在，我想知道如何得到一个结果表，其中保存了表1中的员工详细信息以及他们在表2中研究的适当书籍。最后，该表应该只包含员工代码，名称，名称，book1的名称，book2的名称的列。并且在该结果表中，我应该能够写出查询并导出表格内容。提前致谢！！

在已打开的Access实例上通过Excel VBA运行Access查询: 我有一个电子表格与列出的访问查询名称。我想通过Excel VBA在Access中运行这些查询，但不想打开一个新的Access实例，我想要处理已经打开的实例（和数据库）。我现在的代码只用于创build新的实例： Sub RunQueries() Dim appAccess As Object Set appAccess = CreateObject("Access.Application") appAccess.Visible = True appAccess.OpenCurrentDatabase "D:\Access\tysql.accdb", False Dim QueryName As String For i = 2 To Queries.Count + 1 QueryName = Cells(i, 1).Value appAccess.DoCmd.OpenQuery QueryName Next i End Sub 我将不胜感激任何build议。

MS Access 03 – 从Excel电子表格规范化数据: 我有一个关于打破某些东西的方法的问题。我得到这个Excel电子表格，为我提供了需要做一个报告的数据。它非常简单而直接，但是有一个特定的部分给了我一些悲伤。在Excel电子表格中，列中列出了“参与方”。它通常是由逗号分隔的大约12个人的名字，而且括号后面还有orgID：乔·史密斯（DIV32），约翰·迪（DIV12），罗杰·安德鲁斯（DIV14，DIV67，DIV01）等我需要把它们分解成单独的列，这样一旦我把它们导入访问，它们将成为单独的字段。我知道如何在Excel中“文本到列”，但是当jon doe （DIV13，DIV54等）有一个以上的分割时，这会搞砸了。不知道如何做到这一点访问，但很想知道。任何人都得到了一个Excel的公式，或访问的方法呢？

从访问excel缓慢导出: 我必须从访问数据库中生成大约800个excel文件。对于他们的前10-15它工作很好，几秒/ Excel文件，但它不断需要更长的时间，在第150届Excel文件需要10分钟。这是我的代码：它正在访问表中的每个nrliste（约800个） Dim lista = From ls In Liste _ Where ls!Concatenare = nrliste(i) _ Select ls Dim table = lista.CopyToDataTable Dim DataArr(table.Rows.Count, 30) For x = 0 To table.Rows.Count – 1 For y = 0 To 30 DataArr(x, y) = table.Rows(x).Item(y) Next Next Dim filetocopy As String Dim newcopy As String […]

Excel或Access: 我想要做的是在Access中创build一个表格，并且不得不一次一次地剪切和粘贴，然后按等级上升，这个问题就是如果我有一个这样的列表 Cpl第四名 MSGG 8级，但是Cpl级别更高第一名是第十一名等。是的，第一个LT通常会先走，但是如何使它显示出来 1st Lt MSGT 下士还有其他的等级有没有一个模块，我可以使用这个或将有人不得不编程的东西在电子表格或访问的视觉基础知识。这是数据库格式，但如果我必须导出它，并在excell中做，我也可以做到这一点。

如何在MS ACCESS中插入像Excel函数一样的新行: 我需要find一种方法来使MS Access中的网格，并通过代码VBA插入新的行，只是如何Excel的行为。

MS Access自动链接Excel电子表格: 我有一个目录结构，我正在pipe理系统的需求，每个组件都有自己的目录。每个组件的要求存储在一个有多个工作表的Excel工作簿（工作表是静态的）。我目前正在使用访问作为中央位置查看这些表中的信息，并对其进行查询。我讨厌每次将新的组件文档添加到目录时手动链接新的Excel文件。有没有办法，当我每次开始访问它将search存储的Excel文件的目录树，并自动链接他们访问，如果他们没有链接，并更新我的保存查询，包括新的文件。我以为我可以保存在一个表中的子目录名称和所有在另一个表引用另一个表的子目录中的文件名，所以它search文件系统，它比较名称与表。如果有人能指出我正确的方向，这是否可能呢？

将Excel中的表格和非表格数据混合到Access中: 我的访问编程有点生疏，我从来没有用Excel文件工作。我需要将Excel电子表格中的数据导入到Access 2007中。这些电子表格有一个固定的（可预测的）格式，但它包含一个“标题区域”，我需要读取特定单元格中的单个数据项，然后是大量的表格数据（到目前为止我看到的一个样本中〜500行）。我将把所有这些处理成一组与电子表格的平面布局非常不同的表格。我知道如何在表格数据上打开一个ADOlogging集，它应该适合我的目的。我还想到，我可以引用Excel对象模型，并通过自动化打开工作表以获取“标题区”数据项。我的问题是这样的：因为我必须（我认为）使用自动化方法的“标题区域”，我最好只是把它打开在这种模式下移动到表格数据（单元格/范围导航），或closures该模式并转到ADO？我怀疑是后者，而且我会对此感到更舒服 – 但是我不想因为它比较熟悉就做错事。编辑看来我不清楚，我需要build立这种能力到“应用程序”，作为一个用户可以重复下来的行。我敢肯定，我可以信任电子表格的格式（尽pipe如果事实certificate这是错误的，我会包含错误陷阱来优雅的失败）。这些电子表格是硬件的“官方devise文档”，我的应用程序需要处理引入新的和/或更新的文档，以跟踪表格数据中所描述的事物，而Excel平台不允许这样做。