OK
Option Explicit
Sub getallSAS()
Dim i As Long
Dim dlr As Long
Dim cr As Double
Dim slr As Long
Sheets("all up").Select
Application.ScreenUpdating = False
ActiveSheet.UsedRange.Offset(1).Clear
Columns.ColumnWidth = 2
Rows.RowHeight = 4
On Error Resume Next
For i = 2 To Sheets.Count
With Sheets(i
Good Morning Don,
Thanks a lot this stuff worked for me, but minute update is required in
this macro can we get the source tab name inserted in a column in the
summary sheet.
Regards,
Lucky S
On Mon, Oct 29, 2012 at 7:52 PM, Don Guillett wrote:
> Should do it in .xlsM workbook.
> Sub getallSA
Should do it in .xlsM workbook.
Sub getallSAS()
Dim i As Long
Dim cr As Double
Application.ScreenUpdating = False
ActiveSheet.UsedRange.Offset(1).Clear
On Error Resume Next
For i = 2 To Sheets.Count
With Sheets(i)
cr = Application.Match("contact", .Columns(1), 0)
.UsedRange.Offset(cr).Copy Cells(Ro
Exactly my point is the same but all sheets come from different circle
offices, i just need to check it manually and forward the same to boss.
Regards,
Lucky
On Mon, Oct 29, 2012 at 6:34 PM, Don Guillett wrote:
> Why not make your life easier and use ONE sheet for all wtih an extra
> column fo
Why not make your life easier and use ONE sheet for all wtih an extra
column for the name and then use filter to see the individuals as
desired
On Monday, October 29, 2012 6:22:14 AM UTC-5, Pooja S wrote:
>
>
> Hi Team,
>
> Attached is the sheet where in i need some formula to get the below