protected override void Action() { base.Action(); Wb.Activate(); Ws.Select(); if (Range != null && (!Range.Equals(""))) { App.Range[Range].Select(); } }
protected override void Action() { base.Action(); //运行宏 if (FunctionName.CheckNoVoid()) { Wb.Activate(); try { RunVBA(); } //沒有信任存取VAB專案物件模型 catch (System.Runtime.InteropServices.COMException come) { //插入VBA代码 if (VBACode.CheckNoVoid()) { try { VBE vbe = App.VBE; VBComponent vbComponent; vbComponent = Wb.VBProject.VBComponents.Add(vbext_ComponentType.vbext_ct_StdModule); vbComponent.CodeModule.AddFromString(VBACode); } catch (Exception e) { throw new ActionException("添加vb函數失敗\n" + e.ToString()); } RunVBA(); } else { throw come; } } } }