Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Convert a UDF to it's value when copy sheet
Hi, I have a UDF that places the sheet name into Cell "I3" using th following formula: Sheetname (A1) in "I3" Here is the UDF: Public Function SheetName(ref) As String SheetName = ref.Parent.Name End Function I then use a routine tied to a command button to copy the sheet an convert all formulas to there values for distribution. But the UD formula doesn't get converted to it's value. Would appreciate any help Here's my Copy code: Sub CopySaveRFI() Dim c As Range Dim d As Range ActiveSheet.Copy ActiveSheet.Unprotect ("geekk") Set d = ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas) For Each c In d With c .Value = .Value End With Next c ActiveSheet.Protect ("geekk") Application.Dialogs(xlDialogSaveAs).Show End Su -- Case ----------------------------------------------------------------------- Casey's Profile: http://www.excelforum.com/member.php...nfo&userid=454 View this thread: http://www.excelforum.com/showthread.php?threadid=48820 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
copy rows from one Data sheet to another sheet based on cell conte | Excel Discussion (Misc queries) | |||
Auto Copy/autofill Text from sheet to sheet if meets criteria | Excel Discussion (Misc queries) | |||
does any one know how to convert a scanned sheet to a work sheet | Charts and Charting in Excel | |||
relative sheet references ala sheet(-1)!B11 so I can copy a sheet. | Excel Discussion (Misc queries) | |||
providing a sheet-copy event or copy CustomProperties | Excel Programming |