Tag: 函数

函数单独工作但不在一起，返回0值: 我最近在这里得到了第一个函数的帮助，但是我为难我的代码不工作.. 我试图使用ReportTimeByOP函数来查找位于“sFolder”，以“sName”开头，并具有与ReadTextFile函数的“value38”结果相匹配的“sOPID”的最新文件。无论出于什么原因，我都能够独立完成这两个function，但是我试图将它们合并为一个无缝操作已经失败了。我目前拥有的是： Function ReadTextFile(fpath) Dim fline As String Dim fnumb As Long Dim i As Long Dim Wanted As String fnumb = FreeFile Open fpath For Input As #fnumb i = 1 Do While Not EOF(fnumb) Line Input #fnumb, fline If i = 2 Then Wanted = Split(fline, vbTab)(38) Exit Do End If […]

使用vba更改Excel单元格中的部分文本字体: 嗨，我想创build一个函数来计算毫欧（mOhms）我的function是 Function mOhms(Current, Voltage) mOhms = Format((Voltage / Current) * 1000, "00.00 m") & Chr(87) End Function 结果是 40.00 mW（如果单元格值分别为24和1）如果我将单元格字体样式更改为符号m，则如何获得W（Ω）欧姆符号将更改为微（μ）符号我曾尝试付钱 With ActiveCell.Characters(Start:=Len(ActiveCell) – 1, Length:=1).Font .FontStyle = "Symbol" End With 这导致“循环参考错误” 需要一些帮助来解决这个问题

Excel公式将包含星期和天数的文本转换为date: 假设1周= 5天，我希望所有事情都在几天内完成。所以我有以下数据（也要忽略>和<符号）： 1w 3d > 1w 4d > 1w 3.25d < 2w 3.25d > 1w 0.75d < 4.25d 0d 想要答案看起来像： 8, Calculated like so –> ((1 week * 5) + 3 days) 9 8.25 13.25 5.75 4.25 0 提前谢谢你的帮助！

VLOOKUP MATCH返回多个值: ColumnA (All customers) ColumnB (E-mail) ColumnC (Specific customers) CustNO MailAddress CustNO 1 test@test.com 2 2 test2@test2.com 1 test3@test3.com 1 我正在使用以下函数来返回ColumnB的值，当ColumnA的值在ColumnC行中匹配时： =VLOOKUP(C2;A2:A520;MATCH(B1;A1:C1)) 问题是，ColumnC可以包含ColumnA的多个值，如上例所示。上面的函数只返回ColumnB的值，只有ColumnA和ColumnC的第一个匹配。任何想法如何我可以返回多个返回值的所有值，如上例所示，ColumnC包含具有CustNO 1的多个行。

使用VBA将函数结果数组输出到工作表: 场景：我有一个函数可以对组件的权重进行上限处理。问题：当我尝试将结果输出数组输出到Excel工作表时，我不断收到值错误（在Excel函数应用的单元格中）我已经试过了：我尝试在这个Excel VBA函数的答案打印到工作簿的数组但我仍然得到同样的错误问题：我该如何正确做这个程序？事实上，我正在使用一个function有问题的这个操作？代码的相关部分：（暗淡部分和其他基本操作被删除，以保持简洁的问题） Function Capping(ISIN As Range, Sector As Range, Weights As Range, W1 As Double, W2 As Double) As Variant le = UBound(ArISIN) ReDim Preserve ArCap(le, 8, 1) For c = 1 To le ArCap(c, 1, 1) = ArISIN(c, 1) ArCap(c, 2, 1) = ArSector(c, 1) ArCap(c, 3, 1) […]

IF函数，Excel – 如果列A1：A10设置为“Pass”，如何将值设置为True？: 我试图设置一个单元格（J2）来说如果单元格G2：G41 都具有"Pass"值，则表示Completed ，否则显示Bugs如果其中任何一个单元格有"Fail" 。我现在得到的公式是： =IF(G2:G41="Pass", "Completed", "Bugs") 但是当单元格G41被设置为"Fail"时，它一直说Completed 。我该如何解决？

如果工作表编号/名称是variables/变体，请参考公式中的下一个或上一个工作表: 如果工作表编号/名称是variables/变体，我如何引用公式中的下一张或上一张工作表。我已经看到了与vba做到这一点，有没有办法用公式或函数做到这一点

重新初始化“ThisWorkbook.Path”: 首先，感谢那些给我提出使用“ThisWorkbook.Path”的人的build议。它像一个魅力工作。但是，我的代码遍历七（7）个工作簿，当使用“ThisWorkbook.Path”时，我无法重新初始化“This.Workbook”。让我详细说一下。这是macros驻留的工作簿： Workbooks("Financial_Aggregator_v3.xls").Activate 这是代码添加选项卡并执行小计的第一个工作簿。基本上，ThisWorkbook.Path在这里工作： Workbooks("Chapter_7-10_Mechanical.xls").Activate 做完“机械”我需要做的事情之后，我有下面的代码片段，它从来没有变成真实的： Workbooks("Financial_Aggregator_v3.xls").Activate If FileThere(ThisWorkbook.Path & Application.PathSeparator & "Chapter_7-90_ECS_1_LLC.xls") Then 适用于“机械”工作表的function代码是： Function FileThere(FileName As String) As Boolean FileThere = (Dir(FileName) > "") End Function 仅供参考，我试图将所有不同的工作簿分解成不同的Sub（），但是这不起作用。我也三重检查了工作簿的名称。提前致谢。

在相同的值出现时如何计算不同值的数量？: 我想知道如何在一列中计算不同值的数量，并使用相同的值。我的问题是，有时我有一列变数，但也有一些是相同的。我对总数并不感兴趣，但是对不同数字的计数。例如： 1,7,2,1,8,8,12,4,8,9,3,5,1,9 答案应该是： 1,1,1,2,3,4,5,7,8,8,8,9,9,12 结果是： 1,2,3,4,5,7,8,9,12 = count = 9 我怎样才能在Excel中做到这一点？