Send Table/Range of Cells As Part of Body through Outlook(HTML) using VBA

Hi Guys,

I have been searching this forum and google for hours over 3 days to have this done, and yes, I have checked on Ronde Bruin's site and I cant figure it out. All I want is to include 5 dynamic tables that I have in excel as part of a body of an email in outlook, exactly as how they look like in excel. I have already figured out everything else like sending the email in "on behalf", sending it to multiple recipients, having the subject to be time specific, having a hyperlink as part of the body with signature, and I'm now stuck with just the tables that is the main purpose of the email.

The file contains 5 sheets. 4 tables would come from "On today" sheet which is arranged vertically separated by an empty row after each table, and the remaining table would come from a different sheet labelled as "individual". All tables are 7 cells wide, and would grow indefinitely down the table.

The table would look something like the sample below. The underlined word is a hyperlink which I already know how to do.

Please check on the data below.

Date	1	2	3	4	5	6
1/1	a	b	c	d	e	f
1/2	g	h	i	j	k	l
1/3	m	n	o	p	q	r

Date	1	2	3	4	5	6
2/1	a	b	c	d	e	f
2/2	g	h	i	j	k	l
2/3	m	n	o	p	q	r

Additionally, here's part of the code that I used. I am hoping that your solution would pick up from here since this is more understandable to me. Hoping that I have posted all the information needed. And thanks in advance

Dim olApp As Outlook.Application
Dim olEmail As Outlook.MailItem

Set olApp = New Outlook.Application

Set olEmail = olApp.CreateItem(olMailItem)

With olEmail

.SentOnBehalfOfName = "name"

.BodyFormat = olFormatHTML

.Display

.HTMLBody = "Body" & .HTMLBody

.To = "To"

.Subject = "Subject"

End With