Sub pdigsoh()
'
' pdigsoh Macro
' Macro recorded 2/3/05 by Prefered User
'

'
    Sheets("PDIGSOH").Select
    ActiveWorkbook.SaveAs FileName:="C:\Gse\Stereo Docs\PLASTIC_dhk.txt", _
        FileFormat:=xlText, CreateBackup:=False
    Sheets("PLASTIC_dhk").Select
End Sub
