access-vba

    0热度

    1回答

    验证是否存在特定值然后在其他列中不应该为空

    我有两列，如果pricesource列有一个类似'Prior Value'的值，并且PO_DATE列有空值，那么我必须显示消息“It has Nulls” ，我尝试过这样的事情，但没有得到正确的结果。纠正我 Dim rst As Recordset Set rst = db.OpenRecordset("select pricesource from [Input Norm] where pri
    vba access-vba 2017-09-18

    1热度

    1回答

    从Excel文件导入数据，所以文件没有从其他用户锁定用户

    我有一个链接的数据库到我的Access前端。 此Excel电子表格更新频率非常高，每当用户打开前端时，它也会在另一个窗口中打开链接的Excel电子表格，从而防止其他人尝试使用该链接的电子表格。 我试图想出几个不同的解决方案，并没有占上风。 方法1： 利用VBA创建Excel的副本通过以下行每次打开表单时文件在本地目录。 Private Sub Form_Load() FileCopy
    excel vba ms-access access-vba 2017-09-19

    0热度

    2回答

    多重标准Dsum

    我开始拉我的头发了。 我期待做一个多标准的dsum，看看当前的用户和今天的日期。 试了很多的变化，但必须失去了一些东西很简单，所以任何帮助表示赞赏 StatusBox = DSum("[Task_time]", "[tbl_Data]", "[CDP] = '" & Environ("username") & "' and [Record_Date] = '" & Date & "'")
    ms-access access-vba ms-access-2010 2017-09-20

    -2热度

    1回答

    如何在每次有人登录我的数据库时进行临时查询？

    我想这样做，所以每次学生登录到这个数据库时，它会创建一个查询来显示他们的成绩，通过DLookup和QueryDef来匹配LoginTable中的FullName和StudentGrades表中的FullName（我的想法很少关于如何使用，所以我可能完全错误）。如果你知道如何解决这个问题，请解释QueryDef，或者知道一个更简单的方法来做到这一点，请帮助我，谢谢。 为登录按钮VBA代码： Priv
    mysql vba ms-access access-vba 2017-09-21

    0热度

    2回答

    VBA：需要默认控制值，如果只有1个可能的结果或显示列表如果超过可能的结果

    我想写一点代码，在VBA，这将限制在选择列表中的可能值，如果某些标准如果只有一个可能的值，则将控件中的值默认为该可能的值，如果没有可能的值，则返回空列表。 更具体地说，在一个表单中，我有一个EventDate和ProtocolID。该协议有一个BeginImplementationDate和EndImplmentationDate。如果EventDate属于多于1个协议的BeginImplemen
    ms-access access-vba 2017-09-24

    0热度

    1回答

    从访问表单传递变量到访问表单

    我有一个父窗体，我点击一个按钮，启动第二个窗体进一步用户输入，一旦这些值被输入，然后我需要返回值的父窗体。我如何从第二种形式返回值到第一种形式？ 这是我当前的代码： 'Form 1 - Main Form called frmFirstSet Private Sub cmdDoStep1_Click() 'Declare Variables Dim OrderNumber A
    vba ms-access access-vba ms-access-2013 2017-09-25

    0热度

    1回答

    金额栏的访问VBA更新允许查询

    我试图从Excel导入数据，使用此代码访问后更新表中的所有行： enter code here DoCmd.RunSQL "UPDATE ([tbl1] INNER JOIN [2] ON " _ & "[tbl1].[Nr]= [tbl2].[Nr]) " _ & "INNER JOIN [tblExcelImport] " _ & "ON [t
    access-vba 2017-09-25

    0热度

    2回答

    使用VBA检查查询是否存在

    我在VBA中有一个过程，该过程根据用户在窗体中的下拉列表（报表名称和分组标准）中选择的内容来运行报表。另外，我有一个可以将用户选择转移到Excel的按钮。 我想要测试是否存在查询过程的一部分低于： If Not IsNull(Me.cmbGroup.Value) Or Me.cmbGroup.Value = "" Then strSQL = "SELECT * FROM qryCros
    vba ms-access access-vba 2017-09-25

    0热度

    1回答

    对vba SQL查询运行IF，ELSE stement

    我想在使用VBA的Excel和Access之间的连接运行的SQL查询上运行下面的IF，ELSE语句。任何想法为什么这不起作用？ Dim myValue As String myValue = "CS-SS-22" Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.ACE.OLEDB.12.0; " & _ "Data Sou
    excel-vba if-statement access-vba 2017-09-25

    0热度

    1回答

    3265：在此集合中找不到项目

    我试图在上面的代码中执行更新语句，但是当执行DoCmd.RunSQL SQL3时，它给出的错误为3265：在此集合中找不到项目。来源：DAO.QueryDefs。 如果有人建议我在这里丢失什么，这将是非常好的。 SQL4 = "SELECT id from tblLastID" Set temprsGenerateBilling = CurrentDb().OpenRecordset(SQL4)
    access-vba 2017-09-26
最新问题