Grothgar101
New Member
- Joined
- Feb 8, 2018
- Messages
- 3
Hi All;
I have a range of data, in this case columns K to AJ. I have an unspecified number of rows (which is fine, I can use vba to delineate the final row number) and I want to find the first 0 (from Column K) and then do some things once I find that 0.
Now, in the past, I've done some things with finding numbers in just one column, such as the below.
But, I really can't figure out a way to get my search to do something on one row, find the 0 and then do things (using Offset etc), and then pop to the next row.
Thanks
I have a range of data, in this case columns K to AJ. I have an unspecified number of rows (which is fine, I can use vba to delineate the final row number) and I want to find the first 0 (from Column K) and then do some things once I find that 0.
Now, in the past, I've done some things with finding numbers in just one column, such as the below.
Code:
For i = 4 To LR
With Range("I" & i)
If .Value <> "" Then
.Copy Destination:=Sheets("Summary").Range("B" & Rows.Count).End(xlUp).Offset(1)
.Offset(5, -4).Copy Destination:=Sheets("Summary").Range("F" & Rows.Count).End(xlUp).Offset(1)
.Offset(0, -3).Copy Destination:=Sheets("Summary").Range("O" & Rows.Count).End(xlUp).Offset(1)
.Offset(0, -5).Copy Destination:=Sheets("Summary").Range("P" & Rows.Count).End(xlUp).Offset(1)
.Offset(1, -5).Copy Destination:=Sheets("Summary").Range("Q" & Rows.Count).End(xlUp).Offset(1)
.Offset(1, -3).Copy Destination:=Sheets("Summary").Range("R" & Rows.Count).End(xlUp).Offset(1)
.Offset(0, -2).Copy Destination:=Sheets("Summary").Range("S" & Rows.Count).End(xlUp).Offset(1)
But, I really can't figure out a way to get my search to do something on one row, find the 0 and then do things (using Offset etc), and then pop to the next row.
Thanks