Macro - Setting Outlook Tasks from excel

I have been trolling all over numerous forums to get some idea on a coding that will allow me to create an outlook task with reminders based on some of the cell values within the worksheet. I have been hitting dead ends and been pulling my hair out. If anyone could help that would be greatly appreciated.

The objective of the tasks consist of:

Subject = "Follow up on quotation" & range("G7").value & " " & range("B13").value
Start Date = range("G8").value
Due Date = range("G8").value plus 7 working days from start date
Status = "In Progress"
Priority = "High"
Reminder date: = Due date at 10:00am

Hopefully i can incorporate this into my 'Email' button macro but if it is too difficult then having it as a separate macro will be fine.

My coding for the PDF macro so far is:

 Sub PDF_email()
    Dim FileName As String
    Const PATH As String = "C:\My Documents\\Current Projects\"
    
    'Call the function with the correct arguments
    FileName = RDB_Create_PDF(ActiveSheet, PATH & Range("G7").Value & " " & Range("B13").Value & ".pdf", True, True)

   

    If FileName <> "" Then
        'Ok, you find the PDF where you saved it
        'You can call the mail macro here if you want
        RDB_Mail_PDF_Outlook FileName, "Duncan@larzep.com.au", "Larzep Quotation", _
                            "Thank you for your enquiry." _
                           & vbNewLine & vbNewLine & "Please find our quotation attached." _
                           & vbNewLine & vbNewLine & "If you have any questions please don't hesitate to contact me.", False
        
    Else
        MsgBox "Not possible to create the PDF, possible reasons:" & vbNewLine & _
               "Microsoft Add-in is not installed" & vbNewLine & _
               "You Canceled the GetSaveAsFilename dialog" & vbNewLine & _
               "The path to Save the file in arg 2 is not correct" & vbNewLine & _
               "You didn't want to overwrite the existing PDF if it exist"
    End If
End Sub