在VBA Sub中使用函数

文章/答案/技术大牛

发布

2回答

vba、excel

我试图在我的Sub中运行一个函数，但是在x = NINOFunction()行上得到了一个编译错误，并且不确定如何让它工作。Sub CheckNINO() Dim Usdrws As Long, x As BooleanRange(NINumber).Copy Destination:=Worksheets("Validation").Cells(2, x)

浏览 4提问于2018-01-10得票数 1

回答已采纳

1回答

VBA 7.1向后兼容性

c#、vba、excel

我正在使用VBA 7.1和excel 2016开发一些VBA代码，这是一个较大的企业应用程序的一部分(主要不是在excel中)。这些宏是从C#应用程序运行的，用于以电子表格的形式导出数据。

浏览 2提问于2017-11-27得票数 0

2回答

在vba中从sub调用函数

excel、vba、function

我编写了这个函数，它应该将用户定义的单元格从选定的范围内取出来，并将其值乘以用户定义的数字。输出应该是一个数组，其中包含一个已更改的单元格。 End IfEnd Function Macro1(Range("A1:AX3").Select, 2, 2, 0.5, 1) = Result End Sub

浏览 0提问于2019-07-15得票数 0

回答已采纳

3回答

VBA中的Excel工作表函数月

excel

我有一个MMM格式的月份名称，例如Mar，我想将其转换为VBA格式的数字。在Excel中，您可以使用公式=Month("Mar"&1)得出3 但是，以下代码在VBA中不起作用：Application.WorksheetFunction.Month("Mar" & 1) 我知道这在VBA中有效，但我很好奇为什么上面的快捷方式不起作用？：Month("01/" &

浏览 13提问于2020-03-29得票数 0

回答已采纳

1回答

在Sub过程中使用函数VBA

vba、excel、function

我不认为我在寻找正确的术语，因为我认为这个答案必须在某个地方，但我对函数还不熟悉，并试图弄清楚如何让它发挥作用：Public Function findLastRow(col As String) As Long 'making the macro available to all Sublast

浏览 0提问于2018-07-18得票数 1

回答已采纳

1回答

在editBox中使用PowerPoint的VBA填充文本

vba、plugins、ms-office、powerpoint、ribbon

我是新的VBA电源点插件开发，我已经成功地添加了editBox在PowerPoint带状使用CustomUI编辑器。后来，我在通过VBA代码动态地向editBox添加文本时遇到了困难。我看到了一些解决方案，如下面提到的流程：但在我的情况下这是不可能的。有人能帮助/指导我使用</em

浏览 3提问于2020-02-25得票数 0

2回答

VBA编译错误:语法错误

vba

我正在尝试编写一个简单的函数，其中基于我传递的参数，我需要返回一个字符串值。我得到了错误编译错误:语法错误。

浏览 0提问于2018-05-15得票数 0

回答已采纳

1回答

拖动到Visio-VBA屏幕上的形状的输出ID

vba、shapes、visio

我有以下代码： Dim NoIO As String Dim i As Integer'Target shape id selected' End IfEnd Sub

浏览 0提问于2018-06-30得票数 0

回答已采纳

1回答

子例程不会编译

vba、ms-access

我在使用Access VBA，而且我一直 Dim GarbageLanguages As New Collection GarbageLanguages.Add "VBA"PrintCollectionCount (GarbageLanguages) &

浏览 0提问于2018-02-15得票数 6

回答已采纳

4回答

VBA执行存储在单元格中的代码-这是可能的吗？

excel、vba

例如:在Range("A1")中，我有text -> debug.print("Test")。我需要一些方法来执行这从VBA代码。有可能吗？

浏览 0提问于2017-09-06得票数 1

6回答

在Outlook中运行VBA脚本时，“未定义子或函数”

vba、outlook

作为创建VBA脚本的第一步，将当前选定的图像调整为100% x 100%，我尝试在中再现这个示例。宏非常简单： MsgBox ("Hello world")VBA脚本只是在"Project1“中创建的，默认情况下，按下Alt+F11就会打开它。但是，在试图运行VBA脚本时，我一直会得到"Sub或函数</em

浏览 2提问于2014-05-18得票数 13

回答已采纳

1回答

将参数从VB6 exe程序传递给VBA

vba、vb6

我有一个VB6 EXE程序，可以从VBA内部传递的字符串中获得一个子字符串。如何在VBA中捕获提取的值(我对VBA函数不感兴趣)Private Sub Main()End Sub Extract = Mid(StrKey,

浏览 5提问于2020-03-06得票数 0

2回答

级联在Excel中不起作用

excel、vba

Excel 16.0Windows 10联想Z70-80 Intel(R) Core i7-5500U CPU @ 2.40 Ghz，2401 Mhz，2核，4逻辑我对此进行了梳理，发现问题是串联函数我同时安装了a

浏览 0提问于2017-12-01得票数 2

1回答

保存后执行例程

vba、visio

保存文档后，我需要在Visio中执行函数。VBA for Visio具有以下保存后执行的函数 'Function CodeEnd Sub 但是，此函数不会在保存完成后执行，而是在保存之前执行。我可以通过Visio文件和Microsoft Office上载中心的日期来验证这一点，在VBA</e

浏览 0提问于2020-10-21得票数 0

1回答

使用Application.Run运行基本VBA函数

excel、vba

我希望使用VBA.RGB()命令来运行集成的VBA函数，比如Application.Run()。此方法存储在C：\程序文件(X86)\公共文件\Microsoft\VBA\VBA7.1\VBE7.DLL中。根据这篇Microsoft文章，使用Application.run：运行DLL中存储的方法应该是可行的。End Sub</e

浏览 5提问于2020-02-05得票数 0

5回答

在Sub过程中调用VBA函数

vba、function、ms-access、office-2003

我知道这对某些人来说是一个简单的问题，但我从来没有真正使用过功能模块，因为我不知道它们是什么。 Call "pptCreator"我知道这很糟糕，但我不知道如何将其带入程序中。

浏览 2提问于2009-07-02得票数 19

回答已采纳

4回答

调用不同过程VBA* Excel的退出过程*

vba、excel、error-handling、procedure

即，如果错误检查过程是主要程序是以及主叫错误检查。当发现错误时，我希望子errorCheck停止main。我尝试过使用exit sub，但这只退出了errorCheck子，而不是main。如果能帮上忙就好了

浏览 8提问于2015-07-28得票数 2

回答已采纳

1回答

如何修正Visual代码，使其运行和调试简单的基本脚本(.bas文件)？

visual-studio-code、vbscript、vscode-debugger、basic

背景主要是，我需要能够将我想要测试的代码复制并粘贴到一个简单的.bas文件中，然后使用代码着色、代码运行和调试器运行并测试VSC中的代码。Intellisense也会有所帮助。MsgBox testString En

浏览 2提问于2022-05-27得票数 1

回答已采纳

1回答

从自定义VBA函数写入Excel工作表(而不是子函数)

vba、excel、excel-2010、user-defined-functions

我非常感谢您的帮助，帮助我将数据从自定义的VBA函数写入excel工作表。我已经能够从自定义的VBA子程序编写，但在执行VBA函数时得到了一个错误。在示例代码中，“Sub写2”和“SubWrit3”工作得很好。但是“函数测试2()”生成“值”！在其单元格中，write3不被执行。Sub write2(r As Integer, c As Integer, d As Double) Dim a

浏览 1提问于2013-12-25得票数 0

1回答

无法从Excel工作表单元格调用VBA函数

excel、vba

在尝试使用excel工作表单元格中的自定义VBA函数时，我得到了一个错误：“您键入的公式包含错误”Public Function R1C1_value(RowIndex As Integer, ColIndex As Integer, Optional WorkSheetName AsActiveWorkbook.Worksheets(WorkSheetName) End If

浏览 2提问于2014-09-06得票数 1

回答已采纳

点击加载更多