CODEWITHSUNDEEP
vbams-wordrange
markwest
markwest

Reputation: 255

How do I pass a Range to a Sub in Word VBA?

I know this sounds simple, but seemingly it is not.

If I write this in Word VBA, it always says "incompatible types" - why? And how do I make it work?

Sub GetRange()
   Dim r As Range
   Set r = ActiveDocument.Paragraphs(5).Range

   ProcessRange (r)
End Sub

Sub ProcessRange(r As Range)
    Debug.Print "This generates an error (incompatible types)- why?"
End Sub

Upvotes: 8

Views: 5026

Answers (3)

Daniel Rikowski
Daniel Rikowski

Reputation: 72534

It is not allowed to call a Sub with parenthesis, except if you are using the Call statement.

Hence you have to use either:

Call ProcessRange(r)

Or:

ProcessRange r

The reason for that is that in VBA (and VBS, VB6, too) the parenthesis can have a whole lot of different meanings.

In your case the range object will be evaluated before passing the result to ProcessRange. In this case it leads to a string being passed to the sub, because the default property of Range is Text.

See this article for an overview: http://blogs.msdn.com/ericlippert/archive/2003/09/15/52996.aspx

Upvotes: 8

Alex K.
Alex K.

Reputation: 175926

Process Range is a sub so don't invoke it with parentheses. (The error occurs because (r) causes r to be evaluated which returns its default property value which isn't of type range so mismatches what ProcessRange expects.

Use either;

ProcessRange r

or

call ProcessRange(r)

Upvotes: 4

C.Evenhuis
C.Evenhuis

Reputation: 26446

Using parenthesis visual basic assumes you're calling a function.

ProcessRange r

does the trick

Upvotes: 3

Related Questions