pattyz
08-26-2013, 11:14 PM
Hi all,
I need help with a macro which exports one particular sheet of many such
When I use this macro to exports all sheets
Sub exportshee()
Dim ws As Worksheet
Dim sPath As String, sPathsep As String
Dim wb As Workbook, FullName As String
Set wb = ThisWorkbook
sPath = wb.Path & "\"
FullName = Range("C5")
FullName = sPath & FullName & ".xls"
With ActiveWorkbook
.SaveAs FullName
.Close False
End With
End Sub
does anyone know how to do it?
Thanks a lot
I need help with a macro which exports one particular sheet of many such
When I use this macro to exports all sheets
Sub exportshee()
Dim ws As Worksheet
Dim sPath As String, sPathsep As String
Dim wb As Workbook, FullName As String
Set wb = ThisWorkbook
sPath = wb.Path & "\"
FullName = Range("C5")
FullName = sPath & FullName & ".xls"
With ActiveWorkbook
.SaveAs FullName
.Close False
End With
End Sub
does anyone know how to do it?
Thanks a lot