Attach Hyperlinked Documents to email

[ScriptHam]

Hi

I have a spreadsheet with a list of hyperlinks to documents.
I have a checkbox next to each hyperlink to select the relevant ones.
I would like to attach the documents selected to an email.
Probably I would click on a command button to do this.
I can then complete the email manually and send it.

Is this possible?
Could you give me some assistance with the VBA please.

Many thanks
Scriptham

[GreenDR]

try this:
[VBA]
Sub Example()
Dim oOutlook As Outlook.Application
Dim oEmailItem As MailItem

On Error Resume Next
Set oOutlook = GetObject(, "Outlook.Application")
If oOutlook Is Nothing Then Set oOutlook = CreateObject("Outlook.Application")

Set oEmailItem = oOutlook.CreateItem(olMailItem)

With oEmailItem
.Attachments.Add Range("A1").Hyperlinks(1).Address
.Display
End With

Set oEmailItem = Nothing
Set oOutlook = Nothing

End Sub
[/VBA]

Replace the range address per your requirement