ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 165|回复: 0

[转帖] vsto里插入公式

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-2-15 15:04 | 显示全部楼层 |阅读模式
        private void button53_Click(object sender, RibbonControlEventArgs e)
        {

            Word.Document doc = Globals.ThisAddIn.Application.ActiveDocument;

            object oMissing = System.Reflection.Missing.Value;
            Word.Application oWord = word;
            Microsoft.Office.Interop.Word.Document oDoc;
            Word.Range rng = null;
            oWord.Visible = true;

            oDoc = oWord.Documents.Add(ref oMissing, ref oMissing,
              ref oMissing, ref oMissing);
           rng = writep(oDoc, "The equation is as follows:", 16, true);
            object oCollapseEnd = Word.WdCollapseDirection.wdCollapseEnd;
            rng.Collapse(ref oCollapseEnd);
            rng.Text = "\\sqrt{a^2+b^3}";
            rng.OMaths.Add(rng);
            Word.OMathFunction E = rng.OMaths[1].Functions.Add(rng,
              Word.WdOMathFunctionType.wdOMathFunctionBox);

        }

        private Word.Range writep(Word.Document oDoc, string text, int font, bool bold)
        {
            Word.Paragraph oPara1 = oDoc.Content.Paragraphs.Add();
            Word.Range rng = oPara1.Range;
            //rng.Font.Size = font;
            //rng.Text = text;
            //rng.Font.Name = "Arial";
            //oPara1.ReadingOrder = Word.WdReadingOrder.wdReadingOrderRtl;
            //int q = 0;
            //if (bold)
            //    q = 1;
            //rng.Font.Bold = q;
            //rng.InsertParagraphAfter();

            return rng;
        }

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-28 06:38 , Processed in 0.028080 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表