Something like

Application.ActiveSheet

>Since I'll probaby forget what I did, I'll record it here :
>
>To replace a special character in all Excel cells :
>
>

>Sub repLF()
>For Each cl In Worksheets("201006 excel").Cells.SpecialCells(xlCellTypeConstants, 23)
>    cl.Replace What:=Chr(13), Replacement:="---", SearchOrder:=xlByColumns
>Next cl
>End Sub
>

>
>If anyone knows how to tell the Worksheets() "whatever is the current worksheet please let me know.
>
>I'm pretty comfortable with VS macro syntax but Excel is new to me.
>
>Now at least I can load the csvs into Excel, massage them, and export a new csv that is more fox-friendly.
>