Home |
Search |
Today's Posts |
#8
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
thanks.
That is of great help. "Mike H." wrote: The number of rows is not relevant. The macro should take that just fine. To expand the columns you'd need to modify the code ActiveCell.FormulaR1C1 = FString Range("E" & x).Select Selection.Copy Range("E" & x + 1).Select ActiveSheet.Paste Range("E" & x).Select Selection.Copy Range("F" & x).Select ActiveSheet.Paste Selection.Copy Range("F" & x + 1).Select ActiveSheet.Paste Selection.Copy Range("G" & x).Select ActiveSheet.Paste Selection.Copy Range("G" & x + 1).Select ActiveSheet.Paste 'you'd need to add code to continue out to H, I etc til you get to the Dec column... Let Cumulators = 0 Let Cumulator2 = Cumulator2 + 1 DataArray2(Cumulator2, 1) = x |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Pivot Table changing sum values using VB | Excel Programming | |||
Pivot Table changing itself? | Excel Discussion (Misc queries) | |||
Changing the Layout of a Pivot Table | Excel Discussion (Misc queries) | |||
Pivot Tables -changing datasource for exsting Pivot Table | Setting up and Configuration of Excel | |||
Changing the data of a Pivot Table | Excel Discussion (Misc queries) |