I have this almost working like I need, but there is something missing. I am copying the active "master" sheet, to the end of the workbook, and renaming it based on certain cell values. The code is copying the sheet just like I want, but it's copying the cell formulas also, and I need the cell values. I've tried the xlPasteSpecial Paste:=PasteValues and I've tried Paste:=PasteFormats and Paste_=PasteAll but none of these do what I'm trying to accomplish. Much needed help. My code is as follows:
Code
Dim strName As String, strSht As String
strName = "DMR" & " " & Range("S1").Value
strSht = ActiveSheet.Name
Application.ScreenUpdating = False
Sheets.Add After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = strName
Sheets(strSht).Range("A1:Y89").Copy
Sheets(strName).Range("A1").PasteSpecial Paste:=xlPasteAll
Can anyone help me with this dilemma please and tia...