Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]() Sub killMeNow() dim intRow as integer dim cell intRow=0 activesheet.cells.specialcells(xlCellTypeFormulas) .activate for each cell in selection sheets("NewSheet").range("A1").offset(intRow,0).va lue=" ' " & cell.formula introw=introw+1 next end sub "Dean" wrote: What is the quickest way to delete all the data but save the formulas? |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Excel Range Value issue (Excel 97 Vs Excel 2003) | Excel Discussion (Misc queries) | |||
Importing xml Data into Excel 2002 | Excel Discussion (Misc queries) | |||
how do I enable "import text file" excel 2002? | Excel Discussion (Misc queries) | |||
Excel 2003 back to Excel 2002 | Excel Discussion (Misc queries) | |||
Macro in Excel 2002 to save a workbook to a FTP location | Excel Discussion (Misc queries) |