Hi there,
currently I have this macro that just changes the background color of the cell I am investigating.
Instead of marking the cells that fill the if-statement, I want it, for each row that fulfill the if-statement, copy cell A and L into a new sheet.
So if L is > higher then input_box, then copy that value from cell L for that row along with the value from cell A for that row.
Current code
Sub Check_MaxMinOver()
Dim input_box As Integer
input_box = InputBox("What should maxmin be higher than?")
For Each cell In Range("L5:L" & Cells(Rows.Count, "L").End(xlUp).Row)
If cell.Value > input_box Then
cell.Select
With Selection.Interior
.ColorIndex = 7
End With
End If
Next
End Sub
Bookmarks