Home |
Search |
Today's Posts |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Got there in the end
Sub mv( v1 = "Sale y = ss = Worksheets.Coun For s = 1 To s y = y + x = For z = 1 To (Sheets(s).UsedRange.SpecialCells(xlLastCell).Row If Sheets(s).Cells(z, 6) = v1 Then x = x + Sheets(s).Cells(z, 4 Sheets("test").Cells(y, 1).Value = Sheets(s).Nam Sheets("test").Cells(y, 2).Value = Next Next End Su Thanks |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Pivot Totals: Group totals different from Grand totals | Excel Discussion (Misc queries) | |||
how to enter totals and sub totals from receipts into excel. | New Users to Excel | |||
Summing Weekly Totals into Monthly Totals | Excel Worksheet Functions | |||
How do I sum YTD totals based on monthly totals | Excel Discussion (Misc queries) | |||
Comparing/matching totals in a column to totals in a row | Excel Worksheet Functions |