code not working, possibly combine for better results?

[Russ Fuquay]

This is part of an earlier post but I may not have provided enough info. I'm still searching for the answer.

I have two codes I would like to combine for a single macro because I can't get the second code to run in Sheet 3. The first code is in the Sheet 3 View Code box.

Backgound: Cell O152 contains the formula "=A8" I asked the forum for a formula that would cause cell O152 to retain the first value returned. I'm dealing with dates and cell O152 represents the beginning date. O152 should not change although A8 changes. I will paste the code sent provided by Debraj Roy after the first two codes.

Here is the first code which works fine both with and without the second code. This code is in the Sheet 3 View Code box.

Please Login or Register  to view this content.

The second code I've copied here works perfectly by it's self. But when I try to run it with the first code, it is not effective (or is not running).
The second code is in a module created from Sheet 3.

Please Login or Register  to view this content.

Currently, the second code (placed in module 1) is not working on Sheet 3, but it does work on other sheets where I have it in the Sheet View Code box of the sheet.

Here is the solution provided by Debraj Roy. It produces a new working code from the 1st code, but it does not produce a retained value in cell O152.

Please Login or Register  to view this content.

When I look in the View Macros box I see no macros listed. Am I missing a step or something?

Thanks for the help everyone.

Russ

[coreytroy]

Try:

Please Login or Register  to view this content.

Also note a Work Sheet Event cannot be used in a Module.

[Russ Fuquay]

Thanks Corey Troy and Debraj Roy. Debraj's formula worked for the first part of the process, but not the second. Corey's formula reversed the outcome of the first formula, but worked for the second.

So I did a little experimenting and found a workable formula based on the ones provided by these two contributors. I've used a red font color to indicate the changes made.

Please Login or Register  to view this content.

Thanks. This is a big help to me. I greatly appreciate this forum and the contributions.