For Workbook & Worksheet Activate & Select all data & Copy Select Data वर्कबुक और वर्कशीट सक्रिय के लिए और सभी डेटा का चयन करें & कॉपी करें डाटा
For Workbook & Worksheet Activate & Select all data & Copy Select Data वर्कबुक और वर्कशीट सक्रिय के लिए और सभी डेटा का चयन करें & कॉपी करें डाटा Sub Mastersheet_Update() Dim wb As Workbook Set wb = Workbooks("WorkbookName.xlsm") wb.Activate Worksheets("WorkSheetName").Activate Worksheets("WorkShetName").Range("a1").CurrentRegion.Select Worksheets("WorkShetName").Range("a1").CurrentRegion.Copy End Sub