EMP REG").Select
>> Range("B2:O200").Select
>> Selection.Copy
>> Sheets(ShtName).Select
>> Application.Run "Compare.XLS!Module2.Import_fromregister"
>> End If
>> Next M
>>
esh K R
To: excel-macros@googlegroups.com
Sent: Mon, February 14, 2011 9:29:32 AM
Subject: Re: $$Excel-Macros$$ reduce the size of code
Hi Paul,
Thank you very much for your quick replies .Due to my lack of
knowledge in vba I can't understand the code well .So I am attaching a
project what I
ion.Run "Compare.XLS!Module2.Import_fromregister"
End If
Next M
End Sub
Paul
From: Rajesh Kainikkara
To: MS EXCEL AND VBA MACROS
Sent: Sun, February 13, 2011 11:17:50 AM
Subject: $$Excel-Macros$$ reduce the size of code
Hi
I have a
Hi
I have a workbook which contain 15 sheets ,sheet1 is the data of
January, sheet2 is February and so on, the last 3 sheet have some data
for comparison.I am using a macro code to copy the data like this
Sub Update_sheet_April()
If Sheets("APRIL").Range("b5") = 0 Then
Application.ScreenUp