VBA 매크로 엑셀 현재시트 다른이름으로저장 방법

VBA 매크로 엑셀 현재시트 다른이름으로저장 방법

​Sub Save_PDF()Dim T As String, strPath As String On Error GoTo ETstrPath = ThisWorkbook.Path & "\"T = Range("X1").ValueActiveSheet.ExportAsFixedFormat xlTypePDF, strPath & T & ".PDF", xlQualityStandard, TrueET:End Sub