So I am using this code to export as PDF to a certain location for a bunch of worksheets. Am I able to use this same sort of line, but to export as csv? How would I do so?

Sheets("Sheet1").Select
ActiveSheet.Range("A1:W645").ExportAsFixedFormat Type:=xlTypePDF, FileName:="s:\Communities\Sheet1.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False

Sheets("Sheet2").Select
ActiveSheet.Range("A1:W645").ExportAsFixedFormat Type:=xlTypePDF, FileName:="s:\Communities\Sheet2.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False

Sheets("Sheet3").Select
ActiveSheet.Range("A1:W645").ExportAsFixedFormat Type:=xlTypePDF, FileName:="s:\Communities\Sheet3.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False