global macro to add text

[cuba]

My poor brain.... I have not found answer to this after searching for
some time.

I have this macro:

Sub foo()
Dim rng
Set rng = Range(Start:=0, End:=0)
rng.Text = "Foobar"
End Sub

And when in a global (startup) DOT it does not work. I have failed to
find the way to tell it to refer to the active document. What am I
missing?

 

[cuba]

I do the *obvious*:

Set rng = ActiveDocument.Range(Start:=0, End:=0)