private void ThisWorkbook_Startup(object sender, System.EventArgs e)
{
string sCode = "Sub VBAMacro()\r\n" + "MsgBox \"Test\"\r\n" + "End Sub";
VBComponent oModule;
oModule = Globals.ThisWorkbook.VBProject.VBComponents.Add(vbext_ComponentType.vbext_ct_StdModule);
oModule.CodeModule.AddFromString(sCode);
}
不过这样写VBA并不实用,纯属像偶这样闲的蛋疼的人玩玩而已。