pat martin explained :
Hi Jacob,
I saw your post for getting the indent level on a particular cell, but I must
admit this wasn't enough information for me to create a macro that will
return the information I want.
I would like to get the indent level property from one column of cells say,
range("B1:B500"), and show then in another column ("A1:A500"). I am no VB
programmer, but I do have some rudimentary understanding of the syntax.
Anymore detail would be appreciated
Thanks,
Pat
In a standard module...
Option Explicit
Sub GetIndentLevels()
Dim c As Range
Application.ScreenUpdating = False
For Each c In Range("B1:B500")
With c.Offset(, -1)
.NumberFormat = "General": .Value = c.IndentLevel
End With 'c.Offset(, -1)
Next 'c
Application.ScreenUpdating = True
End Sub
--
Garry
Free usenet access at
http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc