Under Tools Select Macros then Select Macro Explorer.
Right Click Macro Explorer Window Heading Macros select New Macro Project

Add this:
Sub AddStringClass()
DTE.UndoContext.Open("Add String Class")
DTE.ActiveDocument.Selection.Text = "public string YourClass(string strText , int intValue)"
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.Text = "{"
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.Text = "}"
            DTE.ActiveDocument.Selection.NewLine()
            DTE.ActiveDocument.Selection.NewLine()
DTE.UndoContext.Close()
End Sub

Now Thats Cool


____________________________
Life is but a merry go round
around and around :-)

Visit us today:
http://www.welford-costelloe.com