Email VBA User Form to one account.

[TH1993]

Hello, I am currently producing a spreadsheet which can be accessed my multiple users. I have included a button in which opens a VBA User form. I want the users to fill in the details and when they press send, the form comes to me in that form with a clear subject field and body field. Everyone using the company has a company computer so they can only access their own accounts without signing out.
I have been looking all through the internet but cannot seem to find the correct coding for my scenario.
Any help would be great!
Thanks
TH1993

 

[DeusXv]

I just found some code like this online

Private Sub CommandButton1_Click()
Me.Hide


 'Variable declaration
    Dim oApp As Object, _
    oMail As Object, _
    WB As Workbook, _
    FileName As String
     
     'Turn off screen updating
    Application.ScreenUpdating = False
     
     'Make a copy of the active sheet and save it to
     'a temporary file
    ActiveSheet.Copy
    Set WB = ActiveWorkbook
    FileName = "Temp.xls"
    On Error Resume Next
    Kill "C:\" & FileName
    On Error GoTo 0
    WB.SaveAs FileName:="C:\" & FileName
     
     'Create and show the outlook mail item
    Set oApp = CreateObject("Outlook.Application")
    Set oMail = oApp.CreateItem(0)
    With oMail
         .To = "YourEmailAddress@Whatever.com"
         'Uncomment the line below to hard code a subject
         '.Subject = "Look at my workbook!"
        .Attachments.Add WB.FullName
        .Display
    End With
     
     'Delete the temporary file
    WB.ChangeFileAccess Mode:=xlReadOnly
    Kill WB.FullName
    WB.Close SaveChanges:=False
     
     'Restore screen updating and release Outlook
    Application.ScreenUpdating = True
    Set oMail = Nothing
    Set oApp = Nothing


End Sub

Just add some code like this to a command button called "Submit Form" and when they have there details entered it should just send the sheet they just filled in to your email address