vba 相关问题

Visual Basic for Applications(VBA)是一种用于编写宏的事件驱动的面向对象编程语言,用于整个Office套件以及其他应用程序。 VBA不等同于VB.NET或VBS;如果您在Visual Studio中工作,请使用[vb.net]。如果您的问题专门针对编程任何MS Office应用程序,请使用相应的标记:[excel],[ms-access],[ms-word],[outlook]或[microsoft-project]。


为相邻列值创建多个时间戳

我可以在C列中为B列的值获取一个时间戳。Private Sub Worksheet_Change(ByVal Target As Range) 'Update 20140722 Dim WorkRng As Range Dim Rng As Range Dim xOffsetColumn As Integer ...。

回答 1 投票 0

Excel VBA 7.1错误'430':在设置X=新工作表时。

我收到这个错误 运行时错误'430'。类不支持自动化或不支持预期的接口。在这行代码中 设置GetSheetByName = New Worksheet,我有...。

回答 1 投票 0

查找和替换替代方法?而不是 "REPLACE",只是简单地添加文本到现有的单元格中?

我需要对一个有超过40000行的产品列表进行排序,其中一些项目有一个相关联的尺寸,但无论尺寸大小,sku都是一样的。但是,有一个...

回答 1 投票 0

复制& 粘贴到下一个空单元格。

我创建了一个宏按钮来复制一个单元格并在另一个工作表中粘贴值,但它只是替换了另一个工作表中同一单元格中的值。我需要它计算列并继续粘贴......。

回答 1 投票 0

在迭代选择一组形状时,如何将当前选择和新创建的形状进行分组?

我是一个完全的VBA新手,下面是我所拥有的: Sub Align_Capability_Level() Set myDocument = ActiveWindow.View.Slide For Each sh In ActiveWindow.Selection.ShapeRange sh.Name = "bigBox"...。

回答 1 投票 0

将水平范围转换为数组并打印

我不能打印水平范围。这是令人惊讶的,因为我的代码可以完美地打印垂直范围。我有什么不明白的地方吗?Sub hello() Dim i As Long Dim enumTitles As Variant ...

回答 2 投票 0

如何在VBA HTTP API中使用-x进行POST?

我有一堆对STRIPE的API调用,这些都很好用。一般来说,我都是使用cURL版本,然后计算出我需要做什么。我刚刚遇到需要DELETE一个订阅:cur ...

回答 2 投票 0

VBA自动更新用户表单文本框

我试图用C2的值更新用户表单TextBox2 "需要的单元格数"。用户在TextBox1中输入单元格的数量,它就会更新单元格值A2,但我不能让它......

回答 1 投票 0

Ms Access中的关键词搜索组合框

我想要一个组合框,可以从多个字段进行查询搜索,并返回产品ID。这个组合框的功能是,有三个字段产品ID,名称和条形码。现在用户...

回答 1 投票 0

如何查找pivotTable中的最后一行?

我试图找到一个名为pivotTable1的pivotTable中的最后一行 Dim pt As PivotTable Dim lastRow As Long Set pt = Sheet1.PivotTables(1) lastRow = Sheet1.pt.TableRange2.Cells(1).row + pt...。

回答 1 投票 0

如何在多个工作簿中使用查找功能?

我在Excel中使用VBA进行应用。我试图获取工作簿中特定数据的单元格引用,以建立基于单元格引用的do while循环。我不明白为什么 ...

回答 1 投票 1

比较两个数组,并将不一样的值反馈给对方。

我在excel vba中有两个数组。Array1 = Array("123", "456", "789", "101112", "131415") Array2 = Array("789", "101112") 现在我想把第一个数组从Array2中显示的值中切出来。

回答 1 投票 0

需要对象 错误:如果range.value="x"

我试图在if语句中使用从一个范围中获得的单元格值,但我得到了这个错误。运行时错误'424'。需要一个对象 这就是我的代码所要做的。设置 rng = ...

回答 1 投票 0

2 VBA宏和日期格式化的问题。

我看了其他帖子,但找不到与我的问题足够相似的内容。任何帮助将被感激。我有一组日期,每天都会来,日期是按以下 ...

回答 1 投票 0

四舍五入的结果出乎意料

我在我的VBA代码中使用了worksheetfunction.roundup函数,但它似乎在吐出一个虚假的答案。下面是一个重现问题的示例代码:Debug.Print WorksheetFunction...。

回答 1 投票 2

在vbYes vbNo msgbox之后使用输入框,并继续前进。

我有一个vbYesvbNo的MsgBox部分进入我的数据库,但无论是哪个答案,我都想继续进一步输入框提示。然而,它给我以下错误。Block if without End ...

回答 2 投票 0

需要对象 错误:如果range.value="x"

我试图在if语句中使用从一个范围中获得的单元格值,但我得到了这个错误。运行时错误'424'。需要一个对象 这就是我的代码所要做的。设置 rng = ...

回答 1 投票 0

VBA在一列的单元格中插入一个公式,当满足多个IF AND条件时,计算公式。

我被写一个VBA代码卡住了,这将使我能够在第V列中插入以下公式(从V2开始到最后一行,因为它是一个动态范围)如果在其他列中满足3个AND条件,...

回答 1 投票 1

如何在宏中适应列宽?

我写了一个宏,将表格从excel复制到word中。在excel中,所有的列都有不同的宽度。在Word中,我想把我的表格放在一页上--Word中的页边距是1.5厘米,从左到右。数...

回答 2 投票 0

一次性隐藏多行,其中一行的单元格与另一单元格相匹配。

用例。对于列A(RangeK5:K700)中B2单元格中包含特定文本(本例中的 "第1周")的每个单元格,表中包含该特定文本的行将被隐藏。我有代码...

回答 1 投票 0