Automatic deletion of formulae

[sunil.kini]

I want formulae in a cell to automatically delete itself if the worksheet is opened on or after acertain date.

 

[Smitty]

You can record a macro deleting the range in question, then use the Workbook_Open event to evaluate the date.

E.G. If Date >= #1/1/2011# then Delete

Just note that there are issues with deleting any information that someone else might have entered, but if it's just formulas you should be OK.

HTH,

 

[Ruddles]

Of course this will only work if macros are enabled, and they may not be. I'm not aware of any worksheet formula or function which will delete the contents of a worksheet cell.

 

[Datsmart]

This code will run each time your workbook is opened:

Sub Auto_Open()
    If Date >= #5/30/2011# Then
        Range("C2:D3").Clear
    End If
End Sub

It will clear the cells in Range C2:D3 if the current Date is on or after the listed Date.

 

[sunil.kini]

Thank You all

 

[hellebore08]

You can try this if you want your formula to be entered as the formula's answer only.

Sub notasformula()

Range("C1").Formula = "=A1+B1"
Range("C1").Value = Range("C1").Value
​

End Sub

I posted this so there's no need for you to delete your formulas everyday.

Hope this helps in some way.

cheers!

-e.rgabrieldoronila

 

[hellebore08]

Copy and Paste the entire cells as values upon opening

Sub Autpen()

Cells.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

End Sub

cheers!

-e.rgabrieldoronila