2017-04-09 107 views
2

我需要知道在VB代碼等價物:陣列的條件平均在Excel VB

'In Excel cell (for ex. xlSheet.Range("A1")) 
{=Average(If(A1:A10="Text",B1:X10))} ' <---Equivalence of this written all in VB code, not in Excel 

也就是說,計算一個Excel基質的平均(用於離B1至X10 Excel範圍)中,用標準,來自VB。

回答

0

這裏:

Evaluate("=AVERAGE(IF(A1:A10=""test"",B1:U10))") 

不要忘了把雙引號單引號的文本之後。

+0

完美!謝謝 !!! –

0

我想提出的問題,這樣的代碼:

Worksheets("Data1").Range("D2") = Application.WorksheetFunction.AverageIfs(Worksheets("Sheet1").Range("A2:A11, "E2<>0", B2:B11)) 

其他應是:

假設在A1你寫了這個公式,所以在VBA代碼,你可以使用這樣的:

=IF(WEEKDAY(A1,2)>5,"NO WEEKDAY","") 

Range("b2").Formula = "=A1" 

請根據需要更改單元格地址。