Define % amount in macro?

Hi folks,

I'm using the following macro (see code below) to turn a value in column i to zero, if some particular text is found in column C.

The macro also adds another number (defined in the macro) to column D.

I'd like to tweak it so that instead of setting the amount to zero in i, it instead calculates a percentage of the value in column F.

I've attached an example xlsm sheet which has the problem set up for just one row, but obviously it needs to work on all rows and all sheets in the workbook (starting at row 9 in each sheet).

It's ok if i just set the percentage in the macro, i don't need a pop-up box like the text search in the macro.

Thanks, hopefully, in advance!

The code:

----------------------------------------------------

Please Login or Register  to view this content.

----------------------------

example.xlsm

I'm not sure if I ubderstood you well, but how about instead of your one line with writing 0 to cell.Offset(, 6) using two lines:

Please Login or Register  to view this content.

one line calculates what is the percentage of columnF value in a given constant value (200 in the example above)
and second line making sure calculated value is dilplayed in percent format.