Append a formula to a cell's current value

[bound4h]

I am trying to code a macro that will, in essence, divide all values in a non-contiguous range by 1000. BUT, the key is not to overwrite the formula.

Example: I have two ranges A1:C2 and T2:U:9 and all of the cells have a SUMIF() formula in them. Well, using a Combo Box with two choices (one for "in 000's" and one for "Original") I would like the user to be able to select "in 000's" and the macro APPEND "/1000" to the end of all of the formulas in the range. So that when the user then selects "Original" from the combo box it will take OFF the /1000 and the formula will stay in tact.

Is this possible?

[6StringJazzer]

You would use the following, where Range("A1") is a placeholder for whatever expression you use to identify the cell:

Please Login or Register  to view this content.