Excel / VB code

[Dharmesh Thakkar]

Dear Sirs,

I am using below code in my work. Kindly please help me some one and code in below code "so that while saving file below code also run (I mean either keyboard short key or on saving file )

Sub Macro1()
'
' Macro1 Macro
'
' Keyboard Shortcut: Ctrl+Shift+L
'
Sheets("Sheet2").Select
Range("F4:N4").Select
Selection.Copy
ActiveSheet.Previous.Select
Range("C2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("C1").Select
ActiveSheet.Next.Select
Application.CutCopyMode = False
Range("F1").Select
ActiveSheet.Previous.Select
End Sub

 

[Joe4]

If you want it to run before saving, just call the Macro in the BeforeSave event procedure.
Here is some information on the BeforeSave event procedure:
http://www.andrewsexceltips.net/menu_vba_before_save.htm

That code would simply look like:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Call Macro1
End Sub