Sub SampleMacro2()
    MsgBox "This is a sample code for Category 2."
End Sub