Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How do I assign "Apple" to a cell reference in this evaluate code?
Sub Cnt() correctly returns 16.
Sub Cnt1() either Msgbox line returns 0 Option Explicit Sub Cnt() MsgBox Evaluate("SUMIF(D2:D7,""Apple"",E2:E7)") End Sub Sub Cnt1() Dim i As Variant i = Range("F1").Value 'MsgBox Evaluate("SUMIF(D2:D7,""i"",E2:E7)") MsgBox Evaluate("SUMIF(D2:D7,i,E2:E7)") End Sub Thanks, Regards, Howard |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How do I assign "Apple" to a cell reference in this evaluatecode?
|
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How do I assign "Apple" to a cell reference in this evaluate code?
On Wednesday, November 28, 2012 2:52:23 AM UTC-8, plinius wrote:
Il 28/11/2012 09:31, ha scritto: Sub Cnt() correctly returns 16. Sub Cnt1() either Msgbox line returns 0 Option Explicit Sub Cnt() MsgBox Evaluate("SUMIF(D2:D7,""Apple"",E2:E7)") End Sub Sub Cnt1() Dim i As Variant i = Range("F1").Value 'MsgBox Evaluate("SUMIF(D2:D7,""i"",E2:E7)") MsgBox Evaluate("SUMIF(D2:D7,i,E2:E7)") End Sub Thanks, Regards, Howard You can use directly F1, or avoid "Evaluate" Sub Cnt1() MsgBox Evaluate("SUMIF(D2:D7,F1,E2:E7)") End Sub Sub Cnt1() Dim i As Variant i = Range("F1").Value MsgBox Application.SumIf([D2:D7], i, [E2:E7]) End Sub Hi, E. Spot On!! Thanks plinius. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
VBA Code to Use "Name" in a cell as a reference | Excel Programming | |||
Alternatives To: FileSearch with TextOrProperty (Problem FindingPhrase Such As "An apple a day") | Excel Programming | |||
Alternatives To: FileSearch with TextOrProperty (Problem FindingPhrase Such As "An apple a day") | Excel Programming | |||
"Indirect" reference to a cell in a code: how to do it? | Excel Programming | |||
Excel VBA - go to worksheet "name" based on a cell reference ="Name" | Excel Programming |