-
13 votesanswersviews
VBA从Excel中的电子表格中的列表框中获取值
我在Excel工作簿的Sheet1上有一个名为ListBox1的列表框 . 每次用户选择列表中的一个项目时,我都需要将其名称复制到名为strLB的变量中 . 所以,如果我有Value1,Value2,Value3,Value4并且用户选择了Value1和Value3,我需要我的strLB作为Value1,Value3 . 很简单 . 我尝试用事后做: For i = 1 To ActiveShee... -
1 votesanswersviews
如何将span id值转换为excel VBA?
好的,这是我的整个代码: Private Sub CommandButton1_Click() Dim appIE As Object Set appIE = CreateObject("internetexplorer.application") With appIE .Navigate "http://finance.yahoo.com/q/ks?s=... -
2 votesanswersviews
从类VBA中提取 Span 值
经过大量搜索后,我正在努力使用VBA从下面的HTML中删除数据 . 具体来说,我试图从下面的HTML代码中的每个class =“_ Xnb _QJ”中提取值“DATA ONE”和“DATA THREE”: <div class="results"> <div class="_s2 _wPc"> <div class=... -
0 votesanswersviews
VBA从AutoFilter获取值
假设我拥有超过100,000行的非常大的数据集 . 在A列中,我想找到每个唯一的数字 . 我知道这可以使用.Find功能和集合/数组完成,但这些似乎需要花费很多时间 - 尤其是100,000行 . 但是,在自动过滤A列后,当我按下向下箭头时,它只显示唯一变量 . 是否可以通过这种方式从选择中简单地提取这些值? 'pseudocode filter.Count Dim X As Long For x... -
3 votesanswersviews
使用VBA获取没有类名的span值
我坚持这个, VBA代码: Set html = IE.document Set elements = html.getElementsByClassName("dropdown dropdown-toggle editable-field-title-wrapper") Dim count As Long Dim erow As Long count = 0 For Ea... -
2 votesanswersviews
目录,VBA,
我有一个word文档,其中包含内容表和内容表中每个项目的几个段落 . 下面是一个示例:内容项目项目编号项目详细信息页面编号1.帐户详细信息.... 1 1.1帐户历史记录.... 1 1.2当前项目正在进行中.... 2 2.利益相关者.... 3 3时间表等...... 4 这些 Headers 中的每一个都有一个关于页码的段落 . 我需要为利益相关者提供这些段落 . 我能够进入目录,但不是单个... -
95 votesanswersviews
在Excel中循环遍历范围的每一行
这是我确定有一个内置功能的东西之一(我过去可能已经被告知过了),但我正在摸不着头脑记住它 . 如何使用Excel VBA循环遍历多列范围的每一行?我一直在搜索的所有教程似乎只提到在一维范围内工作...... -
2 votesanswersviews
Excel 2010 VBA-循环如果然后语句
VBA新手但很难学习 . 我最近为一位正在工作的女士用IF Then Else写了一个宏 . 不幸的是,她并不像计算机那样精通并且不想在列表中找到宏,所以我想我会使用命令按钮用户表单并调整代码以循环遍历单元格而不是从活动单元格变为活动单元格细胞 . 可悲的是,我在For循环中遇到了If Then Else的问题 . 这是原始的非循环编码宏 Sub InvoicesTotalDue() Dim m... -
7 votesanswersviews
Excel VBA循环遍历多个工作表
VBA初学者在这里,我对我正在研究的程序有一点问题 . 我需要从第一个工作表中复制B列中最后一个单元格中的数据,然后将其粘贴到另一个工作表xws中的A列中,并对包含数据的其他五个工作表重复此操作 . 这是代码,它不应该按照它应该的方式工作: Sub exercise() Dim ws As Worksheet Dim rng As Range 'Finding last ... -
0 votesanswersviews
如何使用Excel VBA自动化动态更改的网页?
自从两周以来我一直在尝试自动化网页,但是在第3页后我无法继续进行 . 首先我'm logging into login page by giving credentials and then I would click a link from 2nd page. Until this point I'很好;但在那之后我又需要点击第3页的另一个链接,我无法,甚至我无法读取该特定页面的正确 inner... -
1 votesanswersviews
通过VBA Excel在站点中更改数据
我正在尝试通过以下代码更改网站中的值,但如何通过代码单击“提交”按钮? 另外如果我的.Navigate值应该从A1 - > A2 - >继续移动而不是静态值?(如何使用'For'循环代替.Navigate)? Sub FillForm() Dim IE As Object Set IE = CreateObject("InternetExplorer.Applicatio... -
2 votesanswersviews
运行时错误2471:表达式作为查询参数生成错误
我在Access 2010中有一个引用查询的子 . 它们应该通过三列并找到最低的一列 . 当我运行它时,我收到一个错误:“您作为查询参数输入的表达式产生了此错误:'Projects.ProjectID' 子: Private Sub UpdatePriority_Click() Overall_Priority = DMin("MinvonGeoPri", "qryO... -
1 votesanswersviews
访问错误2427:您输入的表达式没有值
我有一个表单,并计算子表单中的记录数 . 有时子表单是空的,我想检查它,但它会抛出 Run-time error '2427': You entered an expression that has no value 很明显为什么会发生这种错误,但不太明显的是如何解决它 . 这是导致错误的代码 . MainTableComboBox.Value包含RecordID . DCount("... -
-1 votesanswersviews
更改参数并使用VBA运行SELECT访问查询
我有几(3)个SELECT查询链接到excel文件,需要定期更新(每周) . 我正在尝试使用VBA创建一个访问模块,它可以做两件事: 更新一些要选择的参数,我将其定义为可以手动更新的变量:CurrentWeek,RetailWeek,CurrentYear和Current Date 更新后,它将运行查询,以便我可以刷新excel文件中的数据 . 我尝试了几件事,但到目前为止还没有成功,... -
0 votesanswersviews
Outlook vba .sendOnBehalfOf属性?
我有一个额外的 From 帐户,我使用 .sendOnBehalfOf 属性使用 vba 发送电子邮件 . 有什么方法可以访问该邮箱的收件箱吗?我可以使用它来发送电子邮件,但我如何访问邮箱本身? -
0 votesanswersviews
运行时错误'1004':SaveAs对象'_Workbook的方法失败
我正在使用以下代码来保存更新的工作簿 . Private Sub cmdSaveUpdatedWB_Click() On Error GoTo Err_cmdSaveUpdatedWB_Click gwbTarget.Activate <<<<<<<<<<<<<<<<<<&l... -
10 votesanswersviews
Excel-VBA:从表单控件中获取值
嵌入工作表 sheet1 我有一个名为 combobox_test 的表单控件组合框,它已选择值 x 除此之外,我还嵌入了一个按钮,当我按下它时,我希望它取值 combobox_test 并将其放在 something.Rows(y) 中 . 但我不能让它工作,我有点沮丧 . 也许你可以指出我正确的方向 Sub ButtonPressed_sample() Dim value As Str... -
0 votesanswersviews
具有相关DropDowns的多个“调用宏”
我有一个包含7个不同Form Control下拉列表的项目(不在excel用户表单中),每个下拉列表都绑定到一个宏并触发各种单元格以不同方式填充或计算,其中3个下拉列表依赖于另一个下拉列表 . 工作表的设计是为了从头到尾按顺序选择下拉列表以使最终结果有效,但我正在尝试构建一个“计算”按钮,该按钮将通过并验证所有内容是否正确计算出来 . 基本上我希望计算按钮作为保险,以防有人回去并在填写剩余的下拉列... -
1 votesanswersviews
关于Dir VBA的问题
我有一组文件,我想用文件名循环:2015年预算,2016年预算,2017年预算到2022年 . 我使用Dir循环使用它们 . Dim OpenWb as workbook path = Dir("C:\pathtofile\Budget 20??.xlsx") 'Using the ? Dir Wildcard filepath = "C:\pathtofile\&q... -
2 votesanswersviews
以编程方式从Excel下拉列表中选择
我想写一个宏,它将从下拉列表中选择一个特定值(在我的例子中,存储在单元格 A1 中)(在我的例子中,在单元格 D6 中) . 这是我到目前为止所拥有的: sr_par2 = Array ("TEXT", 'TEXT2", "TEXT3") sr = Range("A1").Value (...) Dim i As Inte... -
1 votesanswersviews
VBA和Aria HTML控件
我有一个看似简单却又加重的问题 . 我正在编写VBA代码来控制网页上的滑动条 . 这应该是简单的过程,如填充各种类型的复选框和输入框,但我遇到编码错误 . 滑块栏有一个我想设置的高值和低值(用Price表示) . 这是我的代码...... Function Master Dim Elem As Object ' Object used in For loop. Dim e As Obje... -
0 votesanswersviews
VBA对IF的困惑
可能是简单的故障,但我找不到错误 . 下面的代码说我的“其他”之一没有“如果” . 但我不知道为什么...... 请帮忙 :) 我是否错过了添加 end if 或其他一些问题? Sub In_knapp_Click() Dim i As Long Dim g As Long Dim a As Long Dim b As Long b = 3 For a = 1 To 7 Step 1 ... -
0 votesanswersviews
VBA改变ARIA-控制 Value
早上好, 我正在尝试使用VBA填写使用“Aria”的在线表单 . 该程序非常简单,适用于任何不使用Aria的表单,但是我很难将其调整到此站点 . HTML如下: <div class="selectwrapper"> <label class="has-float-label shadow" for "event-0-line-... -
0 votesanswersviews
Excel VBA,“打印”使用Shell将pdf保护为另一个pdf文件
我在outlook中的一个文件夹中搜索,找到所有带有已定义 Headers 的电子邮件,并通过Excel VBA将其附件下载到文件夹中 . 我现在需要通过Adobe Reader XI通过VBA将这些打印到新的PDF文件 - 因为它们受密码保护 - 能够转换为RFT(我使用VBA将PDF中的数据转换为RFT) . 不知何故,正确的RF布局只有在已经保存的pdf文件打印到辅助pdf- Saving... -
2 votesanswersviews
使用VBA访问Outlook中的文件夹
我正在使用以下内容将邮件移动到Outlook中的文件夹 . Dim chemin() as String chemin = Split(path, "/") Set myNameSpace = Application.GetNamespace("MAPI") Set myFolder = myNameSpace.Folders("LiveLink... -
5 votesanswersviews
外表 . 将文件夹添加到收藏夹组
我现在正在使用Outlook宏来将所选文件夹添加到Outlook的收藏夹组中 . 我试过用这种方法 Sub AddToFavorites() Dim olapp As Outlook.Application Dim objFolder As Outlook.MAPIFolder Set olapp = New Outlook.Application Set objFolder = ... -
7 votesanswersviews
迭代特定Outlook文件夹中的所有电子邮件项目
如何在Outlook VBA宏中迭代特定Outlook文件夹中的所有电子邮件项目(在这种情况下,该文件夹不属于我的个人inbux,而是共享邮箱收件箱的子文件夹 . 像这样的东西,但我从来没有做过Outlook宏... For each email item in mailboxX.inbox.mySubfolder.items // do this next item 我试过这个,但找不到收件箱... -
0 votesanswersviews
outlook vba跳转到收藏夹的实际文件夹
有没有办法(在VBA中) (1)从Outlook收藏夹窗格中的文件夹跳转到树窗格中的实际文件夹 (2)有没有办法确定“selected”文件夹是在树中还是在收藏夹窗格中? -
-1 votesanswersviews
循环以在选定的Outlook文件夹上设置监视
我在Outlook中的VBA中执行以下操作 . 将Outlook项目拖动到指定的文件夹后,我将此Outlook项目保存到我的计算机(即文件系统) . Private WithEvents Items As Outlook.Items Private WithEvents Items2 As Outlook.Items Private Sub Application_Startup() Dim... -
0 votesanswersviews
如何检查选择是否在Outlook搜索文件夹中
我使用此代码来获取Outlook中的选择: Dim conversations As Outlook.Selection Set conversations = Application.ActiveExplorer.Selection.GetSelection(Outlook.OlSelectionContents.olConversationHeaders) 我必须使用不同的方法来遍历对话,电...