Regular expression och radbrytsproblem

Jag sökte på forumet men kunde inte hitta. Jag har också försökt läsa mig till detta men det har varit väldigt krångliga långa listor med villkor.

Det är så här. Jag har en text-sträng som innehåller radbryt. Det kan se ut likt nedan:

" text <citat>text
text

text</citat>"

Det jag vill är att skapa citat i denna sträng men jag får det inte att fungera riktigt. Koden är enligt nedan:

Set objRegExp = New regexp
objRegExp.Global = True
objRegExp.IgnoreCase = True
objRegExp.Pattern = "(</citat>.*?</citat>)"
msgText = objRegExp.Replace(msgText,"<table border=1><tr><td>$1</td></tr></table>")

Jag får dock text-strängar som är en enda lång rad att fungera korrekt med denna kod men direkt när det blir radbryt så vill den inte köra ersättningen. Så jag antar att jag har missat något villkor i pattern. Vilket kan det vara? Tacksam för svar...