I need to write a macro that travels down a column and once it finds a certain value it copies the next 48 cells and pastes in another sheet. this repeats until an empty cell is reached.
Is there are a command to copy all 48 cells together (remember it has to be a relative reference)? If I knew the cells to copy I could just do for e.g
Range("D2:D49").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A2").Select
ActiveSheet.Paste
but I dont know the cells to copy until a certain condition is met
Is there are a command to copy all 48 cells together (remember it has to be a relative reference)? If I knew the cells to copy I could just do for e.g
Range("D2:D49").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A2").Select
ActiveSheet.Paste
but I dont know the cells to copy until a certain condition is met