vba相关内容
我需要在不使用签名板的情况下从Access数据库实现电子签名。我没有需要签名的实际文档-只是Access表单上的一个字段。我们目前使用的是托帕兹签名簿,但我们需要摆脱它。 提前谢谢你, 卡伦 推荐答案 可以。有几个.Net API可以访问DocuSign。 您可以使用它们创建DocuSign信封。您还需要实现一些功能来检索签名的信封。有两个选项: 调用DocuSign以获取
..
我一直在尝试创建公式,以便从Col"A"中提供的数据中获取所需的字符串。不知何故,我设法创建了一些公式,但这些公式效率不高且工作正常,它们必须是动态的,因此我不会逐个编辑公式(就像我在所附工作表中所做的那样)。 数据(&Q;A&Q;) 我需要的数据结果 这是我的试用 任何帮助我们都将不胜感激。我创建的所有公式都可以在附页中找到,如果可以通过VBA创建,那么请。 She
..
我正在尝试使用this answer,但将其设置在函数位于另一个xlam工作簿中的位置。 示例: 从远程工作簿执行此操作: Sub Test() FuncName = "#MyFunctionkClick()" MyVal = "TestVal" Range("A1").Value = MyVal Range("A1").Formula = "=HYPERLINK
..
我制作了一个宏,让用户使用下拉列表(例如,1,2,3),每次选择一个值时,都会在带有下拉列表(例如,2-1-3)的单元格中显示格式化的概览。我这样做是为了两个不同的下拉列表。当我今天早上打开它时,宏不再工作了,继续显示当前选定的值,但忘记了旧值。它有时似乎管用,有时不管用。有人能告诉我我哪里出错了吗? Option Explicit Private Sub Worksheet_Change(
..
我需要使用VBA从下拉菜单中选择特定选项。我如何才能做到这一点? https://clinicaltrials.gov/ct2/results?cond=&term=Medpace&cntry=&state=&city=&dist= 链接到我们尝试从其中拉出的网页 我尝试的 IE.document.getElementsByName(“down_count”).click代码 Fu
..
我目前正在将大量的MS Word表单转移到数据库系统中。 我目前的做法是: 打开单个Word文档 转到高级选项以更改保存设置,以便只将表单数据保存为分隔文本文件 保存并在弹出的提示窗口中单击确定 使用cmd合并所有txt文件 导入EXCEL并在那里处理 希望在这些阶段结束时,我将获得一个整理得很好的EXCEL信息文件,可以传输到数据库系统中。 我的问题是,既然我有很
..
全部。 我使用了How to securely store Connection String details in VBA 中介绍的DLL方法 此代码在Windows 10 64位和MS Office 64位上运行得非常好。但我无法在64位Windows 8.1 Pro和MS Office上使用相同的文件副本。 使用 将生成的DLL转换为主机环境 C:WindowsMicro
..
我使用此宏将文档中的所有形状转换为图像: Dim i As Integer, oShp As Shape For i = ActiveDocument.Shapes.Count To 1 Step -1 Set oShp = ActiveDocument.Shapes(i) oShp.Select Selection.Cut Selection.PasteS
..
我在Sheet1中有一个数据查找表,其中列A和列B中的所有名称都将是唯一的,因此任何一个A中的名称都不会存在于B中,反之亦然。但是,某些名称可以包含特殊字符,如连字符或破折号,如O‘Neil或Jamie-Lee 我在Sheet2中有另一个数据表,其中我需要使用列D中的文本字符串在Sheet1中(在A列或B列中)查找匹配的名称,如果在Sheet2列E中找到匹配项,则将Sheet1上的行的分值赋
..
我有此代码,当我单击列表框中的项目时,我将使用该代码来搜索范围。我从未循环过列表框,我想知道如何在不单击列表框中的每一项的情况下添加循环来执行所需的操作。以下是我使用的代码: Sub FindListValue() Dim FirstAddress As String Dim rSearch As Range 'range to search Dim c As Range With S
..
我要将单元格中的某些值从一个选项卡复制到另一个选项卡。 Sheets("Equities").Select Range("B5").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Selecti
..
我有一个Excel散点图,它有趋势线和R2值。 如何将趋势线的R平方值返回给变量? 我想: x = ActiveChart.SeriesCollection(1).Trendlines(1).Datalabel.Value 但这不起作用。 我知道我们可以用RSQ和LINEST直接计算,但是当截取零值时,图表和用LINEST计算的结果不一样。并且我想记录图表中的值。
..
我的文件夹中有3个文件和一个主模板。 我想: 循环这些文件,然后将内容复制到主文件。 每个完整文件都将粘贴到主文件中的新工作表。 新工作表的名称将与文件的名称相同。 下面的代码无法正常工作,缺少函数2和3。 Sub AllFiles() Application.EnableCancelKey = xlDisabled Dim folderPath As String D
..
我目前正在处理一个数据集,该数据集格式化为带有标题的表格。我需要做的是循环访问特定列中的所有单元格并更改内容。通过对MSDN的研究,我得出以下FOR循环 for i = 1 to NumRows Cells(i,23).Value = "PHEV" next i 因此,这会将列23中的所有单元格更改为“PHEV”。但是,我不会构建我自己正在使用的表,因此我不能保证我感兴趣的列将是
..
我正在将数据从Access表导入Excel。我拥有的导入代码在拉入数据方面起作用,但是当Access表中的列是从另一个表中查找的值时,我对拉入的数据有问题。例如,我将EmployeeID存储在一个单独的表中,该表在我正在提取的表中进行查找。提取提取数据,但它只提取Employee表中分配给Employee表中的Employee的自动编号,而不是员工姓名。员工姓名存储在EMPLOYEE表的第三列中,
..
我已经创建了一个表单来获取所有字段标题名称,但是我无法选择多个字段。附件是供您参考的。 以下是用于从主表获取标题的代码: Private Sub Form_Load() 'Call GetColumnNameFromIndex 'Call List4_Click Dim rst As New ADODB.Recordset rst.Open "SELECT * FROM Master_
..
我搜索了很多,但大多数结果都是与EXCEL相关的。所以我找不到任何关于我答案的线索。 我正在尝试由MS Access2010执行此操作: 我有几个头在第一行的CSV文件。所有字段均以分隔,且均为字符串(双引号中有多个)。 我不知道每个CSV文件中有多少列。 我要在第一行(标题)和第二行之间插入新行。 如何找出CSV文件有多少列? 如何在第二行追加新文本行? 推荐答案
..
我正在使用一个函数从Access数据库中复制一堆图片,并将它们存储到磁盘上。但是,此函数使用Office剪贴板,并且剪贴板在大约150个记录后填满,导致程序崩溃。下面是我清除剪贴板的方法 Private Declare Function apiOpenClipboard Lib "user32" Alias "OpenClipboard" (ByVal hwnd As Long) As Lo
..
我一直在尝试在Access应用程序中使用MERGE语句。当我使用以下代码时(为可读性简化): dim strSqlMerge as string strSqlMerge = "MERGE TargeTable AS T USING SourceTable as S " & _ " ON T.PrimaryKeyColumn = S.PrimaryKeyColumn " & _ " WHEN
..
我在MS Access窗体对象中有以下代码。 Private Sub UpdatePMText(sLang As String) 'Used to pass both Mandate and Language Info to called Sub that will execute the queries Dim iMandate As Integer 'Check if there is
..