小编Dar*_*ook的帖子

我正在寻找VBA脚本的一些帮助.我一直试图弄清楚如何使用mod函数.

这是我到目前为止所做的:

Function AddOddNumbersWithMod(nr)
    Dim i, sum
    sum = 0
    For i = (IF 1 MOD 2 = 0) to nr step 1
        sum = sum + i <-- (calculate all the odd numbers before nr)
    Next i
End Function

任何建议将不胜感激.

我被这个 VBA 代码困住了。任何帮助将不胜感激。我正在尝试将 2 个单词的第一个字母从小写更改为大写。另外，我应该如何在代码中考虑这两个词之间的空格？

我一直无法执行代码，因为我不断收到此编译错误：“参数不是可选的”。

Function Properword(Text)
Dim rText
rText = Len(rText)
If rText(Mid(1, 1)) = LCase(Str) Then
    rText = UCase(Str)
    If rText(Mid(6, 1)) = LCase(Str) Then
    rText = UCase
End If

结束函数

干杯!

我正在尝试在 MS Access 中编写一个表达式，该表达式在返回错误后"New Policy"在语句中返回一个文本字符串 。 当我将数据从 Access 导出到 Excel 时，它告诉我无法识别。 这个功能有替代方案吗？我的Access表达式如下：Iif()
Nz()

Nz(IIf([Policy Status]=[Input - WFAC Previous Day]![Policy Status 1],"Remains " & [Policy Status],[Input - WFAC Previous Day]![Policy Status 1] & " to " & [Policy Status]), "New Policy")

我正在尝试使用以下代码打印lambda(λ)字符:

depug.print chr(964)

我在这里查找了chr函数的lambda的特定值.不幸的是,我得到一个运行时错误5,其中包含无效值的信息.

我发现这似乎使用超过255的值.

现在我很好奇,如何打印那个lambda角色？分别是其他任何希腊人物吗？

我尝试在 Excel 电子表格中创建一个条件为非空白SumIfs的公式。