I would like to write a custom method for the Range object that returns a
Range object representing all child rows of the called row. I looked in the
Object Browser, and I don't think such a method exists, but if somoeone knows
differently, please tell me!

The routine may be called like this:

Dim rng as range
set rng = Rows(1).ChildRows.Select

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

Thanks,
Matthew Pfluger

Correction, I should have said CUSTOM RANGE PROPERTY, not method.

"Matthew Pfluger" wrote:

I would like to write a custom method for the Range object that returns a
Range object representing all child rows of the called row. I looked in the
Object Browser, and I don't think such a method exists, but if somoeone knows
differently, please tell me!

The routine may be called like this:

Dim rng as range
set rng = Rows(1).ChildRows.Select

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

Thanks,
Matthew Pfluger

Hi Matthew,

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

You have to write your own class module indeed.

Regards,

Jan Karel Pieterse
Excel MVP
http://www.jkp-ads.com
Member of:
Professional Office Developer Association
www.proofficedev.com

Hi,

I am in the cell that has a formula, then,
Sub Macro1()
Selection.ShowPrecedents
Range(ActiveCell.Address).Precedents.Select
z = Selection.Address
MsgBox z
End Sub

Hope this helps.
David

"Matthew Pfluger" wrote:

Correction, I should have said CUSTOM RANGE PROPERTY, not method.

"Matthew Pfluger" wrote:

I would like to write a custom method for the Range object that returns a
Range object representing all child rows of the called row. I looked in the
Object Browser, and I don't think such a method exists, but if somoeone knows
differently, please tell me!

The routine may be called like this:

Dim rng as range
set rng = Rows(1).ChildRows.Select

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

Thanks,
Matthew Pfluger

David,

I appreciate that, but I was referring to the Outline property. I apologize
for not making that clear. Excel provides the handy ability to group rows,
but they don't expose a lot of methods or properties for using this
functionality.

Thanks,
Matthew Pfluger

"David" wrote:

Hi,

I am in the cell that has a formula, then,
Sub Macro1()
Selection.ShowPrecedents
Range(ActiveCell.Address).Precedents.Select
z = Selection.Address
MsgBox z
End Sub

Hope this helps.
David

"Matthew Pfluger" wrote:

Correction, I should have said CUSTOM RANGE PROPERTY, not method.

"Matthew Pfluger" wrote:

I would like to write a custom method for the Range object that returns a
Range object representing all child rows of the called row. I looked in the
Object Browser, and I don't think such a method exists, but if somoeone knows
differently, please tell me!

The routine may be called like this:

Dim rng as range
set rng = Rows(1).ChildRows.Select

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

Thanks,
Matthew Pfluger

Hi,

These are simple SubTotals or part of a pivot table? If it is SubTotals, I
think you can still use what was already provided, but if it is a pivot
table, then not.

David

"Matthew Pfluger" wrote:

David,

I appreciate that, but I was referring to the Outline property. I apologize
for not making that clear. Excel provides the handy ability to group rows,
but they don't expose a lot of methods or properties for using this
functionality.

Thanks,
Matthew Pfluger

"David" wrote:

Hi,

I am in the cell that has a formula, then,
Sub Macro1()
Selection.ShowPrecedents
Range(ActiveCell.Address).Precedents.Select
z = Selection.Address
MsgBox z
End Sub

Hope this helps.
David

"Matthew Pfluger" wrote:

Correction, I should have said CUSTOM RANGE PROPERTY, not method.

"Matthew Pfluger" wrote:

I would like to write a custom method for the Range object that returns a
Range object representing all child rows of the called row. I looked in the
Object Browser, and I don't think such a method exists, but if somoeone knows
differently, please tell me!

The routine may be called like this:

Dim rng as range
set rng = Rows(1).ChildRows.Select

Is it possible to write a custom method for an existing object, or do I have
to write a similar class module (i.e. CRange) and then write the method?

Thanks,
Matthew Pfluger