CodeLinkhttp://yourwebsite.com/sample6
CodeContentSub SampleMacro6() MsgBox "This is a sample code for Category 6." End Sub