なんかVC++で役に立つＶＢマクロ無い？
↓こんな天才的なやつ

Sub ZeroMem()
Dim objTextSelection As TextSelection
objTextSelection = CType(DTE.ActiveDocument.Selection(), EnvDTE.TextSelection)
Dim str As String
str = objTextSelection.Text
If (str = "") Then
Exit Sub
End If
objTextSelection.Text = "ZeroMemory(" + str + ",sizeof(" + str + "));"
End Sub