array formulas and getformula UDF

G

Guest

I use the following code to create a UDF, getformula:

Function GetFormula(Cell As Range) As String
GetFormula = Cell.Formula
End Function


When I use that formula to return an array formula, the forumla returned
appears as a conventional formula.

Example: I have a formula, =SUM(A1:B5*D1:E5), which is entered as an array
formula. How come the UDF returns it without the brackets {}? Anyway to get
the UDF to properly recognize an array formula?

(And yes, I realize that SUMPRODUCT can be used in place of SUM as an array,
and can therefore obviate this question...)
 
B

Bob Phillips

I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 
G

Guest

Well, this is interesting.

I recorded a macro while entering the array formula I reference below, and
Excel returns the following code:

Sub arraytest()
'
' arraytest Macro
' Macro recorded 8/10/2006 by David Friedman
'

'
Selection.FormulaArray = "=SUM(R[-15]C[-1]:R[-11]C*R[-15]C[2]:R[-11]C[3])"
Application.Run Range("AUTOSAVE.XLA!mcs02.OnTime")
End Sub

Somewhere in there must lie the answer. "If selection is formula array,
then enter the formula with brackets, else return the normal formula" etc.
 
P

Pete_UK

What happens if you enter your own getformula( ) function with
CTRL-SHIFT-ENTER?

Pete

Dave said:
Well, this is interesting.

I recorded a macro while entering the array formula I reference below, and
Excel returns the following code:

Sub arraytest()
'
' arraytest Macro
' Macro recorded 8/10/2006 by David Friedman
'

'
Selection.FormulaArray = "=SUM(R[-15]C[-1]:R[-11]C*R[-15]C[2]:R[-11]C[3])"
Application.Run Range("AUTOSAVE.XLA!mcs02.OnTime")
End Sub

Somewhere in there must lie the answer. "If selection is formula array,
then enter the formula with brackets, else return the normal formula" etc.

Bob Phillips said:
I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 
G

Guest

Interesting suggestion, there Pete.

All it does is place brackets in the formula box. What appears in the cell
still doesn't have brackets.

Pete_UK said:
What happens if you enter your own getformula( ) function with
CTRL-SHIFT-ENTER?

Pete

Dave said:
Well, this is interesting.

I recorded a macro while entering the array formula I reference below, and
Excel returns the following code:

Sub arraytest()
'
' arraytest Macro
' Macro recorded 8/10/2006 by David Friedman
'

'
Selection.FormulaArray = "=SUM(R[-15]C[-1]:R[-11]C*R[-15]C[2]:R[-11]C[3])"
Application.Run Range("AUTOSAVE.XLA!mcs02.OnTime")
End Sub

Somewhere in there must lie the answer. "If selection is formula array,
then enter the formula with brackets, else return the normal formula" etc.

Bob Phillips said:
I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

I use the following code to create a UDF, getformula:

Function GetFormula(Cell As Range) As String
GetFormula = Cell.Formula
End Function


When I use that formula to return an array formula, the forumla returned
appears as a conventional formula.

Example: I have a formula, =SUM(A1:B5*D1:E5), which is entered as an array
formula. How come the UDF returns it without the brackets {}? Anyway to
get
the UDF to properly recognize an array formula?

(And yes, I realize that SUMPRODUCT can be used in place of SUM as an
array,
and can therefore obviate this question...)
 
B

Bob Phillips

That is just VBA speak for CSE, same issue.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

Dave F said:
Well, this is interesting.

I recorded a macro while entering the array formula I reference below, and
Excel returns the following code:

Sub arraytest()
'
' arraytest Macro
' Macro recorded 8/10/2006 by David Friedman
'

'
Selection.FormulaArray = "=SUM(R[-15]C[-1]:R[-11]C*R[-15]C[2]:R[-11]C[3])"
Application.Run Range("AUTOSAVE.XLA!mcs02.OnTime")
End Sub

Somewhere in there must lie the answer. "If selection is formula array,
then enter the formula with brackets, else return the normal formula" etc.

Bob Phillips said:
I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

to
get
 
G

Guest

To the OP, what if you first test for if cell hasarray and if it does, append
"{}" to either side of the formula? Something like (not tested.)
Function GetFormula(Cell As Range) As String
lb = "" ' left bracket might want to dim as string
rb = ""
if cell.hasarray then
lb = "{"
rb = "}"
end if
GetFormula = lb & Cell.Formula & rb
End Function
--
Kevin Vaughn


Bob Phillips said:
That is just VBA speak for CSE, same issue.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

Dave F said:
Well, this is interesting.

I recorded a macro while entering the array formula I reference below, and
Excel returns the following code:

Sub arraytest()
'
' arraytest Macro
' Macro recorded 8/10/2006 by David Friedman
'

'
Selection.FormulaArray = "=SUM(R[-15]C[-1]:R[-11]C*R[-15]C[2]:R[-11]C[3])"
Application.Run Range("AUTOSAVE.XLA!mcs02.OnTime")
End Sub

Somewhere in there must lie the answer. "If selection is formula array,
then enter the formula with brackets, else return the normal formula" etc.

Bob Phillips said:
I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

I use the following code to create a UDF, getformula:

Function GetFormula(Cell As Range) As String
GetFormula = Cell.Formula
End Function


When I use that formula to return an array formula, the forumla returned
appears as a conventional formula.

Example: I have a formula, =SUM(A1:B5*D1:E5), which is entered as an array
formula. How come the UDF returns it without the brackets {}? Anyway to
get
the UDF to properly recognize an array formula?

(And yes, I realize that SUMPRODUCT can be used in place of SUM as an
array,
and can therefore obviate this question...)
 
H

Harlan Grove

Bob Phillips wrote...
I don't think you can, the braces are internal to Excel, to tell it to array
process the formula. As you know, you don't type them, Excel adds them as a
visual cue. It must also store something at the same time to tell itself how
to process it on a recalc.
....

But the udf in question just returns text, and its Range arguments
would have a HasArray property.
....

If you want array formulas treated specially, add code to the udf.

Function GetFormula(Cell As Range) As String
GetFormula = Cell.Formula
If Cell.HasArray Then GetFormula = "{" & GetFormula & "}"
End Function
 
G

Guest

Harlan, thanks. YOu figured it out.

Harlan Grove said:
Bob Phillips wrote...
....

But the udf in question just returns text, and its Range arguments
would have a HasArray property.

....

If you want array formulas treated specially, add code to the udf.

Function GetFormula(Cell As Range) As String
GetFormula = Cell.Formula
If Cell.HasArray Then GetFormula = "{" & GetFormula & "}"
End Function
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top