Yes, but I can't tell you how since I never use macros. Macros are stored in a container called Scripts and within that each macro is a Document. There should be another collection within Document that gets want you need.
I don't know why you need to do this but you may want to try the following:
Application.SaveAsText acMacro, D.Name, sExportLocation & "Macro_" & D.Name & ".txt"