Email worksheet as TXT or as CSV

[Jacob Hilderbrand]

What is Groupwise? They really need to use Outlook.

This code will export the sheet, save it, then delete it. I just made the path c:\ but that can be changed to any valid path.

 
Option Explicit
 
Sub Export()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Sheets("TimeSheet").Copy
ActiveWorkbook.SaveAs Filename:="C:\Time Sheet.txt", FileFormat:=xlText
ActiveWorkbook.Close
'Code here for emailing the file.
Kill "C:\Time Sheet.txt"
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub