Hello,
I have a file of data with sales information. A test is run over the data. Adjacent to the test I have an Address formula that gives me a result of a tab name and a range. It does this on any row that fails the test. This range in column DL is telling me where I need to go in the data and cut that range out of the data. The range in DK is telling me where I need to paste that cut data too. I need code that will loop through and skip over the blanks (data that passed the test) and perform the action of cut and paste on the ranges specified in each row of data that failed the test. I am having a hard time getting the code to use the value in the cell as the range. Any help would be appreciated.
this code below goes through and cuts the data in cell DL and pastes it to DK. That isn't exactly how I want this to work. I want it to use the range in the cell as the location to go cut and use the range in the adjacent cell as the range to go paste to.
Sub amarting575aazz()
Dim rcell As Range
For Each rcell In Range("DL9:DL" & ActiveSheet.UsedRange.Rows.Count + 1)
If rcell.Value <> "" Then rcell.Value.Cut rcell.Value.Offset(, -1)
Next rcell
End Sub
Bookmarks