When I tried to run the macro, it said it was too big. I actually spent the afternoon recording a macro where I went through and did this individually with each row (100 times). I have created a recorded macro that will take each cell from the 1st row and place it in the proper place on the “report spreadsheet” and then print the spreadsheet. I will need to do this for each row of data – thus, I will need to do this 100x. I am able to do this with my current level of knowledge.
This spreadsheet is designed to look like a report. I would like to take data from each row – one row at a time and copy into another spreadsheet. I have a spreadsheet that contains 100 rows. Do you have a code for the following scenario? Unfortunately, it does not cover what I am trying to do. MsgBox "Your Pivot Table is now updated." Pivot_Sheet.PivotTables(PivotName).RefreshTable
PivotCaches.Create(SourceType:=xlDatabase, SourceData:=NewRange) 'Change Pivot Table Data Source Range Address NewRange = Data_Sheet.Name & "!" & DataRange.Address(ReferenceStyle:=xlR1C1) Set DataRange = Data_Sheet.Range(StartPoint, Cells(DownCell, LastCol)) LastCol = StartPoint.End(xlToRight).Column Set Pivot_Sheet = ThisWorkbook.Worksheets("Pivot3") Set Data_Sheet = ThisWorkbook.Worksheets("PivotTableData3")
0 kommentar(er)
