Change the value of a cell based on another cell then delete it using a macro in an excel report

It is not usual but it is already happened that I need to find first a specific value in a column, once I found it, in another column, I need to change the value of the cell corresponding to this specific value then I need to delete this specific value. I don’t delete the row, just the cell so I needed a macro to do that each month.

macro excel macro excel

 

When I use the macro ?

To replace the value of a cell based of a value of another cell then to delete this another cell value.

 

How to create the macro ?

Read How to create, edit, hide and select a macro in an excel report

 

How to create the button to associate it with the macro ?

Read How to create a button and associated it to a macro in an excel report

 

How is the macro ?

Copy the code below and paste it into your macro. You will see my comments in green if exist so follow the help to adapt to your need.

Sub test()
' change 20 by the number of rows to check
For i = 2 To 20
' change B by the column letter of the word to search and change next month by what you want
' change A by the column letter where you want to have the new value and change in the futur by what you want
If Range("B" & i).Value = "next month" Then _
Range("A" & i).Value = "in the futur"
Next i
' put the same column letter of the word to search and the word you changed for next month
Range("B:B").Replace "next month", ""
End Sub

Interesting Management