Tag: 函数

如何传递和循环，一个不确定的数组在VBA中的函数？: 我的function在一定范围内，比如无风险利率，并产生一系列贴现因子。问题似乎在循环中，有三个方面：（a）在一个数组上调用一个fn，（b）指定数组点，（c）使用循环i作为fn参数。是围绕每个数组使用循环的最好方法（点i），还是可以通过调用函数来填充整个数组？ Function CreateDiscArray(RFR_array As Range) Dim MyArray() As Variant MyArray = RFR_array Dim xDimRate As Integer xDimRate = UBound(MyArray, 1) Dim TempArray() As Variant For i = 1 To xDimRate Step 1 TempArray(i, 1) = DiscFact(MyArray(i), i) Next i CreateDiscArray() = TempArray() End Function 。 Function DiscFact(Rate, Tenor) If Tenor […]

VBA UBound函数: 我正在尝试在Visual Basic for Applications（VBA）中探索UBound应用程序。比方说，我有一个4乘2的数组…（A1：B4），我想要计算行数。我会认为我的代码是… Function test(list) As Double test = UBound(list) End Function 我的input是=test(A1:B4)但到目前为止我得到“#value！” 错误。我以为回报会是4。我究竟做错了什么？我知道如何使用row命令获取行数，但我只是想通过编码练习。

如何从当前函数VBA Excel获取单元格行: 下面是VBA函数，它使用从开始月份和结束月份生成的唯一一组月份来填充数组： Function get_months(matrix_height As Integer) As Variant Worksheets("Analysis").Activate Dim date_range As String Dim column As String Dim uniqueMonths As Collection Set uniqueMonths = New Collection Dim dateRange As range Dim months_array() As String 'array for months column = Chr(64 + 1) 'A date_range = column & "2:" & column & matrix_height Set dateRange = range(date_range) […]

Excel VBA：是否可以使用自定义方法创build自定义函数？: 我指的是，例如，你可以做什么： Range().Select 其中“范围（）”是function，“select”是方法。例如，如果我有一个函数，我想要三个代表三angular形的边长的双打，并以弧度或弧度吐出最大的angular度。 Public Function getAngle(a as Double, b as Double, c as Double) .degrees = 'some equation to determine degrees as a double .rads = 'some equation to determine radians as a string End Function 因此，你会得到以下结果： getAngle（3,4,5）.degrees：90.0 getAngle（3,4,5）.rads：“0.5π”

如何在vba编辑器中使用excel函数: 我想写这样的Excel函数。它是Dec2Bin函数的扩展 Public Function Dec2BinEx(x As Long) Dec2BinEx = dec2bin(x) + 10 End Function 但是在尝试使用它时出现错误。如何在Visual Basic编辑器中调用excel函数

如何连接数百个单元格的string？: 我正在尝试将来自各种单元格的句子合并到一个单元格中。例： A1 – “你好” A2 – “如何” A3 – “你” A4 – =合并（A1：A3）—->“你好吗” 我知道这个技巧： =A1 & " " & A2…..但是我有700个单元格组合成一个单元格，这种方法看起来很野蛮。如果有内置函数，那将是理想的。我不介意VBA的答案，只要答案是非常详细的从如何打开VBA开始，因为我不知道VBA。

需要拿出一个Excel 2010的等式: 我从一个电子表格中的.txt文件导入数据，其中实际数据的date是2011年7月12日，但是我只是把它作为7/12在.txt上。在Excel 2010中更改格式之后，我得到了7/12/2013，因为Excel显然不知道我在哪一年。所以，我想提出一个从2013年到2011年改变一年的方程式。请帮助我该怎么做。谢谢一堆！

用OR函数进行条件格式化: 所以，基本上我需要的是给单元格背景着色，如果他们匹配给定的string之一。在我的情况下，这将是列A包含值A1 = 1.08，A2 = 2.08（八月第二天等）。所以我想要做的就是改变所有周末的背景颜色，只要指定它就可以了：条件格式>新规则>使用公式来确定要格式化的单元格而我试图使用OR（）函数似乎没有工作（在我的价值观的范围内），如下所示：= OR（“1.08”;“2.08”;“9.08”;“10.08”.. ）。适用于我的是：条件格式>新规则>只格式包含>单元格值>等于> …的单元格（但在这种情况下，我将不得不做许多具有相同格式的规则，我进入，但为了不同的价值。请帮我一下

如何传入VLookup函数的Range参数？: 我在VBA下面有两个函数。 abb00工作正常，但abb11没有。我的问题是如何传递一个Rangevariables作为VLookup函数的参数？ Function abb00() 'demo func abb00 = Application.WorksheetFunction.VLookup("a", _ Worksheets("SheetCache").Range("A:B"), 2, False) End Function Function abb11() 'demo func rangeVar = Worksheets("SheetCache").Range("A:B") abb11 = Application.WorksheetFunction.VLookup("a", rangeVar, 2, False) End Function