Help please

[pattyz]

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

[patel]

crosposting http://www.mrexcel.com/forum/excel-q...lp-please.html

[SamT]

@ Pattyz,

Please read the FAQ and use the "Thread Tools" button to mark this thread solved