VBA code required to replace cell content of a cell based on the value in another cell

I'm new to VBA so require some help
I've two columns, say A and B with data filled in from rows 1 to 50. The data are in percentage
I need a code which will overwrite any % in column A, when % in column B is 100% for all the 50 rows

Thanks in advance

Please confirm 100% is stored as text or Percentage?

Please Login or Register  to view this content.

My understanding...Could be wrong

Please Login or Register  to view this content.

The reason why you received 2 codes giving 2 different results is due to your explanation not being clear enough...

I need a code which will overwrite any % in column A, when % in column B is 100%

Above is open to interpretation...

Now this tells us exactly what you wanted...

replace the % in column A with 0%

Please Login or Register  to view this content.

Replace above red snippet with

Please Login or Register  to view this content.

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however the thread title does not really convey what your request is about. Tell us what you are trying to do, not how you think it should be done.

Please take a moment to amend your thread title. Make sure that the title properly explains your request. Your title should be explicit and not be generic (this includes function names used without an indication of what you are trying to achieve).

Please see Forum Rule #1 about proper thread titles and adjust accordingly. To edit the thread title, open the original post to edit and then click on Go Advanced (bottom right) to access the area where you can edit your title.

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Hi,
the code is working fine in the tester file. When I'm copying the code in the file in which I'm tracking my project progress, by changing the columns and rows to fit in my sheet, it is not working. My data are in column D and E ranging from rows 12 to 800. When row E12 becomes 100%, D12 will become 0%. there are other data in other columns too....
I changed your code as follows, But in didn't work:

#[modified code]
Dim lr As Long: lr = Cells(Rows.Count, 4).End(xlUp).Row
Columns(1).Insert
With Range("D13:D" & lr): .NumberFormat = "0%": .Formula = "=IF(F1=100%,""0%"",E1)": .Value = .Value: End With
Columns(2).Delete
#

I suggest you read the Forum rules HERE
As per Fords post...Rule No 1 has not been fulfilled...Also, Now Rule No 2 has not been fulfilled...

Your post does not comply with Rule # 2
2. Programming code must be enclosed in code tags to improve readability. (A, Z)

Please Login or Register  to view this content.

So...Edit your post...Highlight the code and press the # button
We can only assist once you have complied to all...

Also...In future in order not to waste time on unecessary coding you should always explain in detail what you require and upload a sample file depicting your actual file setup...99% of the time users are not able to amend the supplied code for their purpose...This just proves this once AGAIN...

Edit your post...Highlight the code and press the # button

And upload your sample file depicting your actual file setup...

How does values in Col E become 100%...manual manipulation or code...

Then every time you manually input 100% the cell in D must become 0%
Type in 100 in E and see what happens to cell in D

Make use of this...In Sheet Module

Please Login or Register  to view this content.

Also Rule No 1 in Excel...Avoid MERGED CELLS