Tag: ms access 2010

MS Access 2010 SQLselect计算列问题

我有一个相当广泛的联合查询计算列,我试图通过一个单独的SELECT INTO查询“粘贴值”到表中。 执行查询时出现下面的错误。 有没有办法解决这个问题,而不使用VBA? “SELECT INTO语句中不允许计算列”。 对于上下文:通常情况下,我可以通过Excel中的PowerPivot链接到联合查询,但由于某种原因PowerPivot不能识别联合查询。 如果我导出联合查询,然后导入为表,PowerPivot可以识别它。

vba让用户从ms访问工作表中select一个范围

下面的子RangeSelectionPrompt让用户select一个单元格范围。 下面的代码仅适用于此代码在Excel文件上。 我想知道在MSAccess中执行此代码。 我想捕捉用户select的范围并进行数据操作。 是可能的还是我抽烟了很多。 从Access我知道如何午餐的Excel,检测有多lessWBK打开,浏览工作簿,….表格Excel我知道如何创build一个加载项,连接到数据库,并在用户select后传输数据,但这不是我想要的。 Sub RangeSelectionPrompt() Dim rng As Range Set rng = Application.InputBox("Select a range", "Obtain Range Object", Type:=8) MsgBox "The cells selected were " & rng.Address End Sub

Excel不将数据传输到Access数据库

我在Access 2010中有一个存储项目信息的表格。 为此目的,主要的栏目是LocationID , Priority1和Priority2 (它们有合适的名字,但是为了概括…) 我也有一个Excel 2010的电子表格,这些信息被导出到Access中。 它通过Excel和Access中的LocationID列运行,并为所有匹配的字段着色。 然后,它检查Priority1和Priority2列,看是否有任何行已经被填充,并且颜色不是。 这部分工作正常。 接下来应该做的是将Excel中两个Priority列的值复制到Access表中。 这没有发生,我不知道为什么。 整个代码相当长,所以这里只是关于传输值的部分。 我可以添加任何其他可能有用的代码。 If (Not (IsNull(path))) Then Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & path & ";" Set rs = New ADODB.Recordset rs.Open "BCIImport", cn, adOpenKeyset, adLockOptimistic, adCmdTable On Error Resume Next Do While Len(Range("B" & r).Formula) > 0 With […]

类函数中的错误91

使用Access 2010,我收集信息并将其放在Excel电子表格上。 当我运行下面的代码,我越来越 运行时错误“91”: 对象variables或未设置块 在我的class上在这一行Set Cci = ChartColorItems(ColorID) Public Function GetRGB(ByRef ColorID As String) As Integer “ChartColors”类: Option Compare Database Option Explicit Private pChartColorItems As Collection Public Property Get ChartColorItems() As Collection Set ChartColorItems = pChartColorItems End Property Public Property Set ChartColorItems(ByRef lChartColorItem As Collection) Set pChartColorItems = lChartColorItem End Property Public Function GetRGB(ByRef […]

将Excel中的特定列转移到Access Table中的特定列

我正在尝试从Excel文档中的特定列转移到我的Access数据库中的特定列。 例如,我的Excel表格可能包含以下内容: Date Last First Gender Month School Grade 10/1 Rode Danny Male Sept. Ro ISD 10 10/2 Dode Manny Male Sept. Ro ISD 11 而我的学生表我的数据库可能包含字段: Type Source Phone Email Last First School Major School Grade 我只想输出标有“Last,First,School,Grade”的excel列,并把它们放在我学生表的各自专栏中。 我已经通过访问查看了VisualBasic中的DoCmd.TransferSpreadSheet,但我不确定这是一个解决scheme,还是有其他方法。 任何帮助,将不胜感激,因为它会饶恕我太多的时间! 谢谢!

MS Access 2010:“无法打开更多的数据库”。

虽然挣扎与一个单一的遗留MS Access应用程序,我面临这个奇怪的错误: Cannot open any more databases. 该应用程序广泛使用UNION SQL语句。 所以这似乎导致访问达到2048张开放表的限制。 除了摆脱这些工会之外,还有其他的机会吗?