标签: ms-access-2007

为了能够使用Access 2007 VBA脚本中的Excel对象和常量,我必须做出哪些声明？

Dim wb As Workbook

要么

Set objExcelApp = New Excel.Application

要么

.Borders(xlEdgeBottom)

谢谢

我在Microsoft Access中有一个表,我想在Access中使用select查询在列中显示行号,就像ROW_NUMBER()在SQL Server中使用函数一样.

在SQL Server中,我可以使用此查询:

SELECT ROW_NUMBER() OVER (ORDER BY tblUser.UserID) AS NoRow, * 
FROM tblUser

我在访问中使用相同的查询,但是我收到错误.

你能帮助我吗？

我正在阅读这个查询,我遇到了一条我不明白的线路

[FETT List]![FETT Search]

1. FETT List是一个表
2. FETT Search是FETT列表中的一列

有人可以解释感叹号的含义吗？

谢谢

我有一个数据库.在这里我有数百个表,宏和表格.没有我的问题是我必须找到所有查询,与特定表相关的宏.

我正在使用microsoft acess 2000.

但我甚至在Access 2007中尝试过objet依赖项,它显示了大量错误并自动关闭.

这有什么简单的方法来获得这个???

谢谢,Shanmugam

我正在使用Microsoft Access 2007在两个SQL Server之间移动和按摩一些数据.昨天一切正常,我能够运行查询,更新数据和删除数据.

今天我打开了Access数据库来完成数据迁移,当我尝试运行一些更新查询时,我现在收到以下消息:

禁用模式已阻止操作或事件.

这是什么想法？

如何检索多列列表框中所选行的指定列的值？

我通过使用SQL字符串设置RowSource属性来填充列表框.BoundColumn设置为值1.

我可以通过使用检索绑定列(所选行的)的值ListBox.Value.但我也想要另一列的价值.

我是MS Access的新手.任何人都可以告诉我如何在MS Access 2007中定义复合主键.

我正在使用Access 2007数据库创建个人库清单系统.在代码中,每当我引用.Text表单控件的属性时,无论是更改值,还是只是检查IF语句中的值,我都会收到提示Run-time error '2185': You can't reference a property or method for a control unless the control has the focus.

为什么是这样？

设置.Text它并不是一件大事,但是当我在IF语句中检查值时,我在检查多个条件时无法设置焦点.

我有一个MS Access应用程序,其中包含链接到SQL Server的所有表,因此在MS Access VBA代码或查询中我使用这些表非常简单,我通过名称访问它们,如[Customers].

我在SQL Server中有一个存储过程sp_CopyData,我需要从我的VBA代码调用它.如何在不创建与SQL Server的新连接的情况下执行此操作(我已经在某处!？因为我可以访问表)？

或者这不可能？感谢任何帮助.谢谢!

我有一个Access窗体的以下代码.当我打开和关闭表单时,似乎SendKeys是NumLock在打开和关闭它时弄乱了我的键.

出于完全正确的原因,我不想进入,我真的不想完全隐藏功能区(我希望下拉菜单仍然可访问)所以DoCmd.ShowToolbar命令不是我喜欢的方式.

有没有人有任何建议,我如何修改下面的代码,以完成我想要的SendKeys命令使用？

使用Access 2007这样的命令

CommandBars.ExecuteMso "MinimizeRibbon"

不适合我.

顺便说一句,数据库将被分发,因此解决方案必须包含在数据库中.

Private Sub Form_Close()

' Unhide navigation pane
    DoCmd.NavigateTo "acNavigationCategoryObjectType"
    DoCmd.Maximize

' Maximize the ribbon
RibbonState = (CommandBars("Ribbon").Controls(1).Height < 75)

Select Case RibbonState
    Case True
        SendKeys "^{F1}", True
    Case False
        'Do nothing, already maximized
End Select
End Sub

Private Sub Form_Load()
' Hide navigation pane
    DoCmd.NavigateTo "acNavigationCategoryObjectType"
    DoCmd.Minimize
Debug.Print Application.CommandBars.Item("Ribbon").Height
' Minimize ribbon
RibbonState = (CommandBars("Ribbon").Controls(1).Height < 100)

Select Case RibbonState
    Case True
        'Do …