Hi, Paste this Code For Save Button.
Private Sub CommandButton1_Click() On Error Resume Next Dim wb As Workbook Dim acwb As Workbook Set acwb = ActiveWorkbook Set wb = Workbooks("Book2") If wb Is Nothing Then Set wb = Workbooks.Open(Filename:="D:\Book2.xls") End If acwb.Sheets(1).Range("C1:D1").Copy wb.Sheets("Sheet1").Range("A30").End(xlUp).Offset(1, 0) wb.Activate Application.CutCopyMode = False acwb.Activate End Sub From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Indrajit $nai Sent: Monday, May 30, 2011 3:12 PM To: excel-macros@googlegroups.com Subject: $$Excel-Macros$$ Requesting for a small help in vba coding.... Hi All, I need a small help in vba coding, I have attached two files; in save.xls it has a command button named "save", when I press this button it will copy data from d1:d1 and paste in the file Book2.xls in the range a1:b1 then a2:b2 onward. But somehow this macro is not working properly. It is working when I am saving the data in the same excel file i.e. save.xls, but it is not saving the data in the different excel file i.e. Book2.xls. Please vba gurus I need your help to solve this problem. Thanks in advance. -- Indrajit Disclaimer: This electronic message and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you are not the intended recipient you are hereby notified that any disclosure, copying, distribution or taking any action in reliance on the contents of this information is strictly prohibited and may be unlawful. -- ---------------------------------------------------------------------------- ------ Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel