BTW, I was asked how I put the code so nicely formatted on my blog. Here are the steps:

 

Update: ok. This was just too obvious. I've created a short word macro that does this for you.

simply paste the following code in a new macro module in word that belongs to the Normal.dot template.

Then assign it a keyboard shortcut using right click on toolbars-customize-keyboard-macros and you're done:

 

Sub FormatCodeForBlog()

    Selection.PasteAndFormat(wdPasteDefault)

    ActiveDocument.SaveAs(FileName:="temp.htm", FileFormat:=wdFormatFilteredHTML, _

          LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _

        :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _

        SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _

        False)

    ActiveWindow.View.Type = wdWebView

    ActiveWindow.Close()

    RecentFiles(1).Open()

    Selection.WholeStory()

    Selection.Copy()

End Sub