Send mail til flere modtagere.

Hvordan er det lige..

Har følgende script:
--------
Private Sub CommandButton1_Click()

    Dim Filnavn As String
    Dim Recip(3) As String

    Recip(1) = "12345@etellerandet.com"
    Recip(2) = "54321@andetelleret.dk"

    Filnavn = "Rapport nr. 2004-uge " & Format(Range("E1").Value, "00#")
    CommandButton1.Visible = False

    MsgBox "Nu sendes filen"
    On Error GoTo errormsg:
    ActiveWorkbook.SendMail Recipients:="Recipients:=Recip()", Subject:=Filnavn
      MsgBox "Rapporten er modtaget i postsystemet"

    ActiveWorkbook.Saved = True

'Mappen lukkes
    ActiveWorkbook.Close
    Exit Sub

errormsg:
    MsgBox Err.Number & " " & Err.Description
End Sub
------
i linien:
ActiveWorkbook.SendMail Recipients:="Recipients:=Recip()", Subject:=Filnavn
kniber det (for mig) at sætte det rigtigt op.
Anyone?