I am using the code below to copy data from a sheet named Unix and paste it into a sheet named Demonstration. Currently it is copying the data between
EO27:HT95. I need to be able to use this macro when rows are added or deleted, therefore
I would like it to be able to search the file and begin copying the data when it finds the term "CRS" in column A and continuing copying all rows until it reaches the term "Other" in column A.
Please Please help. I have tried so many different codes and tried asking this so many times. Any help would be greatly appreciated.
Thank you!
![]()
Sub PullData1() ' ' PullData1 Macro ' Use to pull data FinalRow = 74 For i = 6 To FinalRow Cells(i, 4).Select Sheets("Demonstration").Select ActiveCell.FormulaR1C1 = "=Unix!R[21]C[141]" ActiveCell.Select Selection.AutoFill Destination:=ActiveCell.Range("A1:CF1"), Type:= _ xlFillDefault ActiveCell.Range("A1:CF1").Select ActiveCell.Offset(3, 82).Range("A1").Select Next i End Sub











LinkBack URL
About LinkBacks
Register To Reply
Bookmarks