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:
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...