CodeLinkhttp://yourwebsite.com/sample1
CodeContentSub SampleMacro1() MsgBox "This is a sample code for Category 1." End Sub