attaching active worksheet to vb form

S

stevehorton

Hi guys/gals

currently my code uses a user form in vb and you can click to get th
attachment you want, is there anyway that this can be modified t
attach the current worksheet? (the sheet would have been saved befor
hand and is active)


Private Sub CommandButton3_Click()


' setting and attaching the work book
Dim MyPath As String
Dim SaveDriveDir As String
Dim saveasname As String

SaveDriveDir = CurDir
MyPath = "c:\COMMON
ChDrive MyPath
ChDir MyPath

Attachment1 = GetAttach
attach.Text = Attachment1


ChDrive SaveDriveDir
ChDir SaveDriveDir


End Su
 
Top