I'm trying to write a multi-layered document so that a given step hides the relevant text.

E.g.

1.Step 1
2.Step 2
___Step 2a
___Step 2b
______Step 2bi
___Step c
3.Step 3

So if I were to select step 2, I could hide all the sub-steps (step2a, 2b, 2bi, etc).

1.Step 1
2.Step 2
3.Step 3

I've got the following code (after recording and trying to edit the macro), but it doesn't work

Selection.MoveDown Unit:=wdParagraph, Count:=1
Selection.Paragraphs(1).SelectNumber
Selection.Expand wdLine
With Selection.Font
.Hidden = True
End With

I'm a word VBA n00b

Thanks