CodeLink
http://yourwebsite.com/sample4
CodeContent
Sub SampleMacro2() MsgBox "This is a sample code for Category 4." End Sub