Tag: 函数

调用VBA Excel中的子函数时,“Object Required”

在我的Excel的VBA程序; 我有一个名为“ParamCheck”的函数,它会得到四个“double”variables,检查它们并将消息返回为“string”。 Function ParamCheck(airSpeed As Double, FCUvalue As Double, _ altitude As Double, terrainElevation As Double) As String If airSpeed < MIN_CONTROL_SPEED Then 'check if airspeed is less than 119 ft/min or not ParamCheck = "Airspeed is less than minimum control speed" ElseIf FCUvalue > FCU_VALUE_LIMIT Then 'check if FCU value if greater than 10 […]

EXCEL中有哪些function是与数字分开的文本?

我的意思是,例如,在A1:123b中,最好把123给B,把“b”给C列。 任何function呢?

用于按行连接的VBA用户定义的函数

我有一些关于特定“服务”(例如鸟类调查)是否已经针对特定站点执行的数据,每个服务是“是”还是“否”。 例如 列A包含站点名称,比如A,B,C,D和E,A1中标题为“站点名称”,A2中包含“A”等。 B栏包含B1中的“鸟类调查”,然后是B2-B6的“是”或“否”。 C,D和E栏中的其他服务同上,分别说“蝙蝠调查”,“LVI”和“土地注册处”。 在FI想要连接包含“是”的每一行的服务名称。 EG可以说B2,C2,D2和E2的值是“是”,“是”,“否”和“是”,我想要F2包含鸟类调查,蝙蝠调查。 据我所知,在Excel中没有本地函数可以做到这一点,所以我一直在尝试在VBA中创build一个用户定义的函数。 我已经尝试了两种方法 一个基于将两个范围(列名和“是/否”的行)input到UDF中,然后将它们组合成一个数组来应用某种查找标准 另一个是从一个是/否范围返回列字母,然后根据列字母从列名select。 我还没有得到任何工作。 请注意,最后我需要创build一个适用于不同数量的服务的UDF,它们不会像本例中那样被预先定义。 有什么build议么? 提前谢谢了。

从stringVBA或函数的开头删除零

我有一个关于从string开头删除零的问题。 我用过 =trim(left(substitute(A1,"0"," "),3)) 在string= '0060'手机我想要结果等于60 。 但是这个function给我6。 不是所有的logging都以双零开始。 可以有一个,两个或三个零。

VBA故障functionInstrRev = Instr

我一直在试图从文件结构中find扩展名,为此我使用InstrRev(filename,“。”)而不是返回4,它返回30,就像Instr一样。 任何人都知道一个奇怪的错误,会导致Excel发出相同的结果2相反的function? 亲切的问候,丹尼尔

如何确定VBA中的夏令时?

什么函数会让我们知道VBA中的date是否在DST中?

自定义查找function

我正在尝试创build一个函数,在search整个活动工作表后,将返回包含特定string的单元格的总数。 很像在“查找和replace”中find的“x单元格”。 我到目前为止: Function FINDIST(stringToFind) Dim counter As Integer: counter = 0 For Each Cell In ActiveSheet.UsedRange.Cells If InStr (Cell, stringToFind) > 0 Then counter = counter + 1 End If Next End Function

使用vba中的接口对不同types的types使用相同的函数

function“AddWeight”可以增加每个宠物的体重。 我知道我的所有动物(Inherit)都具有basicInfotypes(“data”),所以我确信“AddWeight”函数可以正确处理它。 当然,VBA不会让我这样做,我试图在function标题上声明对象或变体..他们没有任何工作为我。 有没有人有创意? 我不想为每个动物编写这个函数,我也不觉得调用这样的函数是优雅的: Call addWeight(Max_Cat.data) 有人有另一个想法吗? 提前致谢 Type basicInfo name As string weight as integer height as integer End Type Type cat data As basicInfo mustacheType As String End Type Type dog data As basicInfo bark_volume as integer End Type Dim Max_Cat as cat Dim Buddy_Dog as dog . . some code . […]

在MS EXCEL中交替混合数据

我有一个包含10.000行的csv文件。 2.000行的值为“EXPL_1”。 3.000行的值为“EXPL_2”。 2.500行的值为“EXPL_3”。 1.500行的值为“EXPL_4”。 2.000行的值为“EXPL_5”。 我正在寻找一个function,将交替混合(重新sorting)的值,并将继续混合,直到完成。 所以最终的结果会是这样的: EXPL_1, EXPL_2, EXPL_3, EXPL_4, EXPL_5, EXPL_1, EXPL_2, EXPL_3, EXPL_4, EXPL_5, ………. (x times repeat) EXPL_1, EXPL_2, EXPL_3, EXPL_5, (*EXPL_4 values finished but continue to alternately mix the rest) *值是按名称sorting的(第一个是EXPL_1,第二个是EXPL_2等)*也许将来会出现更多的值。 *我知道列表中有多less个值。

在excel中使用if语句来计算单元格范围的最小值的函数

我正在尝试计算一系列单元格的最小值。 细胞D3:D153含有干的或湿的,细胞C3:C153含有0-10的数字。 我想计算干细胞≤5的最小值 =MIN(IF(AND(D3:D153="Dry", C3:C153<=5)), C3:C153) 我认为上述将工作,但我最终与function错误。 我还有其他一些列,如G3:G153,其中包含干或湿,F3:F153包含一个从0到10的数字。如果我想把它包含在原始函数中,我将如何去结合它?