精华内容
下载资源
问答
  • 2022-02-09 02:10:47

    1. 学习目的

    学习NLP的入门编程word2vec
    

    2. 使用平台

    Google Colab

    3. 参考资料

    2022年B站up主的Tensorflow教程!

    4. 学习步骤

    1. 先观看上述资料的Tensorflow视频的第六十一讲
    2. 点击该Colab分享链接(需要科学上网)
    3. 需要用到Kaggle的API下载数据集,没有的话,请先注册Kaggle
    4. 就酱,接下来就看Colab里的内容就好了。
    更多相关内容
  • #同时修改好几个word文档,转换特定的内容 import re import docx doc1=docx.Document('example.docx') spam=['后勤','技术','行政'] for j in spam:  doc2=docx.Document()  for i in range(0,len(doc1....
  • 1. 添加引用COM里面的 Microsoft Word 12.0 Object. Library 引用(12.0表示Word 2007版本) 2. 导命名空间 using Word =Microsoft.Office.Interop.Word; using System.IO; using System.Reflection; 3. 把引用中...

    建立一个自己的类

      //word 类,
        /* 
    1. 添加引用COM里面的 Microsoft Word 12.0 Object. Library 引用(12.0表示Word 2007版本)

    2. 导命名空间

    using Word =Microsoft.Office.Interop.Word;
    using System.IO;
    using System.Reflection;

    3. 把引用中的Microsoft.Office.Interop.Word的“属性”中的嵌入互操作设为False
    4. 注意最好不要安装wps。否则可能报错误;
    5. 如果报80070005 错误 
        1)..在”开始”->”运行”中输入dcomcnfg.exe启动”组件服务” 
        2).依次双击”组件服务”->”计算机”->”我的电脑”->”DCOM配置” 
        3).在”DCOM配置”中找到”Microsoft word 应用程序”,在它上面点击右键,然后点击”属性”,弹出”Microsoft word 应用程序属性”对话框 
        4).点击”标识”标签,选择”交互式用户” 
        5).点击”安全”标签,在”启动和激活权限”上点击”自定义”,然后点击对应的”编辑”按钮,在弹出的”安全性”对话框中填加一个”NETWORK SERVICE”用户(注意要选择本计算机名或亦可添加其他需求的用户比如Everone用户等),并给它赋予”本地启动”和”本地激活”权限 
        6).依然是”安全”标签,在”访问权限”上点击”自定义”,然后点击”编辑”,在弹出的”安全性”对话框中也填加一个”NETWORK SERVICE”用户(或亦可添加其他需求的用户比如Everone用户等),然后赋予”本地访问”权限. 
        7).之后重复第1步操作。 
        3.有些服务器是64位版本的,因此打开DCOMCNFG之后,找不到项“Microsoft Excel 应用程序”,因为DCOMcnfg是32配置,在64位系统下能完全被支持,打开32位的DCOMCNFG的方式: 
        1).运行:mmc -32 
        2).打开“文件”-“添加或删除管理单元”-选择组件服务-点击添加-确定。 
        3).可以在DCOM组件中找到Microsoft Excel Application了。 
        4).之后重复第2步,第1步。
         
         最后,如果还有问题,看看是否任务管理器有残留,或者安装其他的办公软件,如wps等也会有影响;
    */
        public class YFCWord
        {
            public void testword()
            {
                object path;                              //文件路径变量
                string strContent;                        //文本内容变量
                Word.Application wordApp;                   //Word应用程序变量 
                Word.Document wordDoc;                  //Word文档变量
                
                path = Environment.CurrentDirectory + "\\测试文件.doc";
                wordApp = new Word.ApplicationClass(); //初始化 

                wordApp.Visible = true;//使文档可见

                //如果已存在,则删除
                if (File.Exists((string)path))
                {
                    File.Delete((string)path);
                }
                
                //由于使用的是COM库,因此有许多变量需要用Missing.Value代替
                Object Nothing = Missing.Value;
                wordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
                
                #region 页面设置、页眉图片和文字设置,最后跳出页眉设置

                //页面设置
                wordDoc.PageSetup.PaperSize = Word.WdPaperSize.wdPaperA4;//设置纸张样式为A4纸
                wordDoc.PageSetup.Orientation = Word.WdOrientation.wdOrientPortrait;//排列方式为垂直方向
                wordDoc.PageSetup.TopMargin = 57.0f;
                wordDoc.PageSetup.BottomMargin = 57.0f;
                wordDoc.PageSetup.LeftMargin = 57.0f;
                wordDoc.PageSetup.RightMargin = 57.0f;
                wordDoc.PageSetup.HeaderDistance = 30.0f;//页眉位置

                Thread.Sleep(10);;            
                //设置页眉
                //wordApp.ActiveWindow.View.Type = Word.WdViewType.wdNormalView;//普通视图(即页面视图)样式
                wordApp.ActiveWindow.View.SeekView = Word.WdSeekView.wdSeekPrimaryHeader;//进入页眉设置,其中页眉边距在页面设置中已完成
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;//页眉中的文字右对齐

                Thread.Sleep(10);;
                //插入页眉图片(测试结果图片未插入成功)
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
                string headerfile = Environment.CurrentDirectory + @"\华智电气.png";
                Word.InlineShape shape1 = wordApp.ActiveWindow.ActivePane.Selection.InlineShapes.AddPicture(headerfile, ref Nothing, ref Nothing, ref Nothing);
                shape1.Height = 15;//强行设置貌似无效,图片没有按设置的缩放——图片的比例并没有改变。
                shape1.Width = 60;
                wordApp.ActiveWindow.ActivePane.Selection.InsertAfter("                                                                         测试记录");//在页眉的图片后面追加几个字
               
                //去掉页眉的横线
                wordApp.ActiveWindow.ActivePane.Selection.ParagraphFormat.Borders[Word.WdBorderType.wdBorderBottom].LineStyle = Word.WdLineStyle.wdLineStyleNone;
                wordApp.ActiveWindow.ActivePane.Selection.Borders[Word.WdBorderType.wdBorderBottom].Visible = false;
                wordApp.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekMainDocument;//退出页眉设置
                #endregion

                Thread.Sleep(10);;
                #region 页码设置并添加页码
                //为当前页添加页码
                Word.PageNumbers pns = wordApp.Selection.Sections[1].Headers[Word.WdHeaderFooterIndex.wdHeaderFooterEvenPages].PageNumbers;//获取当前页的号码
                pns.NumberStyle = Word.WdPageNumberStyle.wdPageNumberStyleNumberInDash;//设置页码的风格,是Dash形还是圆形的
                pns.HeadingLevelForChapter = 0;
                pns.IncludeChapterNumber = false;
                pns.RestartNumberingAtSection = false;
                pns.StartingNumber = 0; //开始页页码?
                object pagenmbetal = Word.WdPageNumberAlignment.wdAlignPageNumberCenter;//将号码设置在中间
                object first = true;
                wordApp.Selection.Sections[1].Footers[Word.WdHeaderFooterIndex.wdHeaderFooterEvenPages].PageNumbers.Add(ref pagenmbetal, ref first);

                #endregion

                Thread.Sleep(10);;
                #region 行间距与缩进、文本字体、字号、加粗、斜体、颜色、下划线、下划线颜色设置

                wordApp.Selection.ParagraphFormat.LineSpacing = 16f;//设置文档的行间距
                wordApp.Selection.ParagraphFormat.FirstLineIndent = 30;//首行缩进的长度

                //写入普通文本
                strContent = "我是普通文本\n  wordApp.Selection.ParagraphFormat.LineSpacing = 16f;//设置文档的行间距\nwordApp.Selection.ParagraphFormat.FirstLineIndent = 30;//首行缩进的长度\n";
                wordDoc.Paragraphs.Last.Range.Text = strContent;

                Thread.Sleep(10);;
                wordDoc.Paragraphs.Last.Range.Text = "我再加一行试试,这里不加'\\n'";
                //直接添加段,不是覆盖( += )
                wordDoc.Paragraphs.Last.Range.Text += "不会覆盖的,";

                Thread.Sleep(10);;
                //添加在此段的文字后面,不是新段落
                wordDoc.Paragraphs.Last.Range.InsertAfter("这是后面的内容\n wordDoc.Paragraphs.Last.Range.InsertAfter\n");

                Thread.Sleep(10);;
                //将文档的前4个字替换成"哥是替换文字",并将其颜色设为红色
                object start = 0;
                object end = 4;
                Word.Range rang = wordDoc.Range(ref start, ref end);
                rang.Font.Color = Word.WdColor.wdColorRed;
                rang.Text = "这是替换文字";
                wordDoc.Range(ref start, ref end);
                Thread.Sleep(10);;
                //写入黑体文本
                object unite = Word.WdUnits.wdStory;
                wordApp.Selection.EndKey(ref unite, ref Nothing);//将光标移到文本末尾
                wordApp.Selection.ParagraphFormat.FirstLineIndent = 0;//取消首行缩进的长度
                strContent = "取消首行缩进,这是黑体文本\n";
                wordDoc.Paragraphs.Last.Range.Font.Name = "黑体";
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入加粗文本
                strContent = "这是粗体文本\n"; //
                wordApp.Selection.EndKey(ref unite, ref Nothing);//这一句不加,有时候好像也不出问题,不过还是加了安全
                wordDoc.Paragraphs.Last.Range.Font.Bold = 1;
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入15号字体文本
                strContent = "我这个文本的字号是15号,而且是宋体\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Size = 15;
                wordDoc.Paragraphs.Last.Range.Font.Name = "宋体";
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入斜体文本
                strContent = "我是斜体字文本\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Italic = 1;
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入蓝色文本
                strContent = "我是蓝色的文本\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Color = Word.WdColor.wdColorBlue;
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入下划线文本
                strContent = "我是下划线文本\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Underline = Word.WdUnderline.wdUnderlineThick;
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //写入红色下画线文本
                strContent = "我是点线下划线,并且下划线是红色的\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Underline = Word.WdUnderline.wdUnderlineDottedHeavy;
                wordDoc.Paragraphs.Last.Range.Font.UnderlineColor = Word.WdColor.wdColorRed;
                wordDoc.Paragraphs.Last.Range.Text = strContent;
                Thread.Sleep(10);;
                //取消下划线,并且将字号调整为12号
                strContent = "我不要下划线了,并且设置字号为12号,黑色不要斜体\n";
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordDoc.Paragraphs.Last.Range.Font.Size = 12;
                wordDoc.Paragraphs.Last.Range.Font.Underline = Word.WdUnderline.wdUnderlineNone;
                wordDoc.Paragraphs.Last.Range.Font.Color = Word.WdColor.wdColorBlack;
                wordDoc.Paragraphs.Last.Range.Font.Italic = 0;
                wordDoc.Paragraphs.Last.Range.Text = strContent;


                #endregion
                Thread.Sleep(10);;
                #region 插入图片、居中显示,设置图片的绝对尺寸和缩放尺寸,并给图片添加标题

                wordApp.Selection.EndKey(ref unite, ref Nothing); //将光标移动到文档末尾
                //图片文件的路径
                string filename = Environment.CurrentDirectory + "\\3.jpg";
                //要向Word文档中插入图片的位置
                Object range = wordDoc.Paragraphs.Last.Range;
                //定义该插入的图片是否为外部链接
                Object linkToFile = false;               //默认,这里貌似设置为bool类型更清晰一些
                //定义要插入的图片是否随Word文档一起保存
                Object saveWithDocument = true;              //默认
                //使用InlineShapes.AddPicture方法(【即“嵌入型”】)插入图片
                wordDoc.InlineShapes.AddPicture(filename, ref linkToFile, ref saveWithDocument, ref range);
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;//居中显示图片

                //设置图片宽高的绝对大小

                //wordDoc.InlineShapes[1].Width = 200;
                //wordDoc.InlineShapes[1].Height = 150;
                //按比例缩放大小

                wordDoc.InlineShapes[1].ScaleWidth = 20;//缩小到20% ?
                wordDoc.InlineShapes[1].ScaleHeight = 20;

                //在图下方居中添加图片标题

                wordDoc.Content.InsertAfter("\n");//这一句与下一句的顺序不能颠倒,原因还没搞透
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
                wordApp.Selection.Font.Size = 10;//字体大小
                wordApp.Selection.TypeText("图1 测试图片\n");

                #endregion
                Thread.Sleep(10);;

                #region 添加第一个表格   填充数据、设置表格行列宽高、合并单元格、添加表头斜线、给单元格添加图片
                wordDoc.Content.InsertAfter("\n");//这一句与下一句的顺序不能颠倒,原因还没搞透
                wordApp.Selection.EndKey(ref unite, ref Nothing); //将光标移动到文档末尾
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft;
                //object WdLine2 = Word.WdUnits.wdLine;//换一行;  
                //wordApp.Selection.MoveDown(ref WdLine2, 6, ref Nothing);//向下跨15行输入表格,这样表格就在文字下方了,不过这是非主流的方法
                Thread.Sleep(10);;

                //设置表格的行数和列数
                int tableRow = 6;
                int tableColumn = 6;

                //定义一个Word中的表格对象
                Word.Table table = wordDoc.Tables.Add(wordApp.Selection.Range,
                tableRow, tableColumn, ref Nothing, ref Nothing);

                //默认创建的表格没有边框,这里修改其属性,使得创建的表格带有边框 
                table.Borders.Enable = 1;//这个值可以设置得很大,例如5、13等等
                Thread.Sleep(10);;
                //表格的索引是从1开始的。
                wordDoc.Tables[1].Cell(1, 1).Range.Text = "列\n行";
                for (int i = 1; i < tableRow; i++)
                {
                    for (int j = 1; j < tableColumn; j++)
                    {
                        if (i == 1)
                        {
                            table.Cell(i, j + 1).Range.Text = "Column " + j;//填充每列的标题
                        }
                        if (j == 1)
                        {
                            table.Cell(i + 1, j).Range.Text = "Row " + i; //填充每行的标题
                        }
                        table.Cell(i + 1, j + 1).Range.Text = i + "行 " + j + "列";  //填充表格的各个小格子
                    }
                }
                Thread.Sleep(10);;
                //添加行
                table.Rows.Add(ref Nothing);
                table.Rows[tableRow + 1].Height = 35;//设置新增加的这行表格的高度
                //向新添加的行的单元格中添加图片
                string FileName = Environment.CurrentDirectory + "\\3.jpg";//图片所在路径
                object LinkToFile = false;
                object SaveWithDocument = true;
                object Anchor = table.Cell(tableRow + 1, tableColumn).Range;//选中要添加图片的单元格
                wordDoc.Application.ActiveDocument.InlineShapes.AddPicture(FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor);
                Thread.Sleep(10);;
                //由于是本文档的第2张图,所以这里是InlineShapes[2]
                wordDoc.Application.ActiveDocument.InlineShapes[2].Width = 50;//图片宽度
                wordDoc.Application.ActiveDocument.InlineShapes[2].Height = 35;//图片高度
                Thread.Sleep(10);;
                // 将图片设置为四周环绕型
                Word.Shape s = wordDoc.Application.ActiveDocument.InlineShapes[2].ConvertToShape();
                s.WrapFormat.Type = Word.WdWrapType.wdWrapSquare;

                Thread.Sleep(10);;
                //设置table样式
                table.Rows.HeightRule = Word.WdRowHeightRule.wdRowHeightAtLeast;//高度规则是:行高有最低值下限?
                table.Rows.Height = wordApp.CentimetersToPoints(float.Parse("0.8"));// 

                table.Range.Font.Size = 10.5F;
                table.Range.Font.Bold = 0;

                table.Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;//表格文本居中
                table.Range.Cells.VerticalAlignment = Word.WdCellVerticalAlignment.wdCellAlignVerticalBottom;//文本垂直贴到底部
                //设置table边框样式
                table.Borders.OutsideLineStyle = Word.WdLineStyle.wdLineStyleDouble;//表格外框是双线
                table.Borders.InsideLineStyle = Word.WdLineStyle.wdLineStyleSingle;//表格内框是单线

                table.Rows[1].Range.Font.Bold = 1;//加粗
                table.Rows[1].Range.Font.Size = 12F;
                table.Cell(1, 1).Range.Font.Size = 10.5F;
                wordApp.Selection.Cells.Height = 30;//所有单元格的高度
                Thread.Sleep(10);;
                //除第一行外,其他行的行高都设置为20
                for (int i = 2; i <= tableRow; i++)
                {
                    table.Rows[i].Height = 20;
                }
                Thread.Sleep(10);;
                //将表格左上角的单元格里的文字(“行” 和 “列”)居右
                table.Cell(1, 1).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;
                //将表格左上角的单元格里面下面的“列”字移到左边,相比上一行就是将ParagraphFormat改成了Paragraphs[2].Format
                table.Cell(1, 1).Range.Paragraphs[2].Format.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft;

                table.Columns[1].Width = 50;//将第 1列宽度设置为50

                //将其他列的宽度都设置为75
                for (int i = 2; i <= tableColumn; i++)
                {
                    table.Columns[i].Width = 75;
                }

                Thread.Sleep(10);;
                //添加表头斜线,并设置表头的样式
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].Visible = true;
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].Color = Word.WdColor.wdColorRed;
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].LineWidth = Word.WdLineWidth.wdLineWidth150pt;
                Thread.Sleep(10);;
                //合并单元格
                table.Cell(4, 4).Merge(table.Cell(4, 5));//横向合并

                table.Cell(2, 3).Merge(table.Cell(4, 3));//纵向合并,合并(2,3),(3,3),(4,3)

                wordDoc.Content.InsertAfter("\n");//这一句与下一句的顺序不能颠倒,原因还没搞透
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
                wordApp.Selection.Font.Size = 10;//字体大小
                wordApp.Selection.TypeText("表格1  测试表格\n");
                #endregion


                #region 添加第二个表格   填充数据、设置表格行列宽高、合并单元格、添加表头斜线、给单元格添加图片
                wordDoc.Content.InsertAfter("\n");//这一句与下一句的顺序不能颠倒,原因还没搞透
                wordApp.Selection.EndKey(ref unite, ref Nothing); //将光标移动到文档末尾
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft;
                //object WdLine2 = Word.WdUnits.wdLine;//换一行;  
                //wordApp.Selection.MoveDown(ref WdLine2, 6, ref Nothing);//向下跨15行输入表格,这样表格就在文字下方了,不过这是非主流的方法
                Thread.Sleep(10);;

                //设置表格的行数和列数
                tableRow = 6;
                tableColumn = 6;

                //定义一个Word中的表格对象
                table = wordDoc.Tables.Add(wordApp.Selection.Range,
                tableRow, tableColumn, ref Nothing, ref Nothing);

                //默认创建的表格没有边框,这里修改其属性,使得创建的表格带有边框 
                table.Borders.Enable = 1;//这个值可以设置得很大,例如5、13等等
                Thread.Sleep(10);;
                //表格的索引是从1开始的。
                wordDoc.Tables[2].Cell(1, 1).Range.Text = "列\n行";
                for (int i = 1; i < tableRow; i++)
                {
                    for (int j = 1; j < tableColumn; j++)
                    {
                        if (i == 1)
                        {
                            table.Cell(i, j + 1).Range.Text = "Column " + j;//填充每列的标题
                        }
                        if (j == 1)
                        {
                            table.Cell(i + 1, j).Range.Text = "Row " + i; //填充每行的标题
                        }
                        table.Cell(i + 1, j + 1).Range.Text = i + "行 " + j + "列";  //填充表格的各个小格子
                    }
                }
                Thread.Sleep(10);;
                //添加行
                table.Rows.Add(ref Nothing);
                table.Rows[tableRow + 1].Height = 35;//设置新增加的这行表格的高度
               
                Thread.Sleep(10);;
                //设置table样式
                table.Rows.HeightRule = Word.WdRowHeightRule.wdRowHeightAtLeast;//高度规则是:行高有最低值下限?
                table.Rows.Height = wordApp.CentimetersToPoints(float.Parse("0.8"));// 

                table.Range.Font.Size = 10.5F;
                table.Range.Font.Bold = 0;
                //table.Range.Font.TextColor = Word.WdColor.wdColorRed;
                table.Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;//表格文本居中
                //table.Range.Cells.VerticalAlignment = Word.WdCellVerticalAlignment.wdCellAlignVerticalBottom;//文本垂直贴到底部
                //设置table边框样式
                table.Borders.OutsideLineStyle = Word.WdLineStyle.wdLineStyleDouble;//表格外框是双线
                table.Borders.InsideLineStyle = Word.WdLineStyle.wdLineStyleSingle;//表格内框是单线

                table.Rows[1].Range.Font.Bold = 1;//字体加粗
                table.Rows[1].Range.Font.Size = 12F;
                table.Rows[1].Range.Shading.BackgroundPatternColor = Word.WdColor.wdColorBlueGray;//设置行背景颜色
                table.Rows[1].Range.Shading.ForegroundPatternColor = Word.WdColor.wdColorDarkYellow;//设置行前景色
                table.Columns[1].Shading.BackgroundPatternColor = Word.WdColor.wdColorDarkTeal;//设置列背景色
                table.Columns[1].Shading.ForegroundPatternColor = Word.WdColor.wdColorGray375;//设置列前景色
                table.Cell(1, 1).Range.Font.Size = 10.5F;
                wordApp.Selection.Cells.Height = 30;//所有单元格的高度
                Thread.Sleep(10);;
                //除第一行外,其他行的行高都设置为20
                for (int i = 2; i <= tableRow; i++)
                {
                    table.Rows[i].Height = 20;
                }
                Thread.Sleep(10);;
                //将表格左上角的单元格里的文字(“行” 和 “列”)居右
                table.Cell(1, 1).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;
                //将表格左上角的单元格里面下面的“列”字移到左边,相比上一行就是将ParagraphFormat改成了Paragraphs[2].Format
                table.Cell(1, 1).Range.Paragraphs[2].Format.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft;

                table.Columns[1].Width = 50;//将第 1列宽度设置为50

                //将其他列的宽度都设置为75
                for (int i = 2; i <= tableColumn; i++)
                {
                    table.Columns[i].Width = 75;
                }

                Thread.Sleep(10);;
                //添加表头斜线,并设置表头的样式
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].Visible = true;
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].Color = Word.WdColor.wdColorRed;
                table.Cell(1, 1).Borders[Word.WdBorderType.wdBorderDiagonalDown].LineWidth = Word.WdLineWidth.wdLineWidth150pt;
                Thread.Sleep(10);;
                //合并单元格
                table.Cell(4, 4).Merge(table.Cell(4, 5));//横向合并

                table.Cell(2, 3).Merge(table.Cell(4, 3));//纵向合并,合并(2,3),(3,3),(4,3)

                wordDoc.Content.InsertAfter("\n");//这一句与下一句的顺序不能颠倒,原因还没搞透
                wordApp.Selection.EndKey(ref unite, ref Nothing);
                wordApp.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
                wordApp.Selection.Font.Size = 10;//字体大小
                wordApp.Selection.TypeText("表格2  测试表格\n");
                #endregion

                Thread.Sleep(10);;
                wordApp.Selection.EndKey(ref unite, ref Nothing); //将光标移动到文档末尾                   
      
                wordDoc.Content.InsertAfter("\n");
                wordDoc.Content.InsertAfter("就写这么多,算了吧!2020.4.20日 yufuchang");

                Thread.Sleep(10);;
                //WdSaveFormat为Word 2003文档的保存格式
                object format = Word.WdSaveFormat.wdFormatDocument;// office 2007就是wdFormatDocumentDefault
                //将wordDoc文档对象的内容保存为DOCX文档
                wordDoc.SaveAs(ref path, ref format, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
                //关闭wordDoc文档对象
                
                wordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
                //关闭wordApp组件对象
                wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
                Console.WriteLine(path + " 创建完毕!");
               // Console.ReadKey();
                Thread.Sleep(10);;
                //我还要打开这个文档玩玩
                Word.Application app = new Word.Application();
                Word.Document doc = null;
                try
                {

                    object unknow = Type.Missing;
                    app.Visible = true;
                    string str = Environment.CurrentDirectory + "\\测试文件.doc";
                    object file = str;
                    doc = app.Documents.Open(ref file,
                        ref unknow, ref unknow, ref unknow, ref unknow,
                        ref unknow, ref unknow, ref unknow, ref unknow,
                        ref unknow, ref unknow, ref unknow, ref unknow,
                        ref unknow, ref unknow, ref unknow);
                    string temp = doc.Paragraphs[1].Range.Text.Trim();
                    Console.WriteLine("你他妈输出temp干嘛?");
                }
                catch (Exception ex)
                {
                    Console.WriteLine(ex.Message);
                }
                wordDoc = doc;
                wordDoc.Paragraphs.Last.Range.Text += "我真的不打算再写了,就写这么多吧";           

            }        

            /// <summary>
            /// 模板模式,在word文档中插入数据,需要提前设计好模板
            /// </summary>
            public void testword_template()
            {
                object path;                              //文件路径变量
                string strContent;                        //文本内容变量
                Word.Application wordApp;                   //Word应用程序变量 
                Word.Document wordDoc;                  //Word文档变量

                Thread.Sleep(2000);
                path = Environment.CurrentDirectory + "\\个人简历.dotx";
                wordApp = new Word.ApplicationClass(); //初始化 

                wordApp.Visible = true;//使文档可见

                //由于使用的是COM库,因此有许多变量需要用Missing.Value代替
                Object Nothing = Missing.Value;
                wordDoc = wordApp.Documents.Add(ref path, ref Nothing, ref Nothing, ref Nothing);

                object[] oBookMark = new object[5];
                //赋值书签名
                oBookMark[0] = "beizhu";
                oBookMark[1] = "name";
                oBookMark[2] = "sex";
                oBookMark[3] = "birthday";
                oBookMark[4] = "jiguan";

                //赋值任意数据到书签的位置
                wordDoc.Bookmarks.get_Item(ref oBookMark[0]).Range.Text = "使用模板实现Word生成";
                Thread.Sleep(2000);
                wordDoc.Bookmarks.get_Item(ref oBookMark[1]).Range.Text = "李四";
                Thread.Sleep(2000);
                wordDoc.Bookmarks.get_Item(ref oBookMark[2]).Range.Text = "女";
                Thread.Sleep(2000);
                wordDoc.Bookmarks.get_Item(ref oBookMark[3]).Range.Text = "1987.06.07";
                Thread.Sleep(2000);
                wordDoc.Bookmarks.get_Item(ref oBookMark[4]).Range.Text = "保定";
                Thread.Sleep(2000);

                Thread.Sleep(10); ;
                //WdSaveFormat为Word 2003文档的保存格式
                object format = Word.WdSaveFormat.wdFormatDocument;// office 2007就是wdFormatDocumentDefault
                //将wordDoc文档对象的内容保存为DOCX文档
                path = Environment.CurrentDirectory + "\\个人简历.doc";
                wordDoc.SaveAs(ref path, ref format, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
                //关闭wordDoc文档对象

                wordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
                //关闭wordApp组件对象
                wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);

                //wordDoc.Close(ref oMissing, ref oMissing, ref oMissing);
       //关闭word
                //wordDoc.Quit(ref oMissing, ref oMissing, ref oMissing);
            }
        }
     

    包含2个函数,一个是在新文本的基础上自动添加内容,具体添加哪些内容,参考函数testword, 使用方法是  

     YFCWord yfcword = new YFCWord();
                yfcword.testword();

    第二个函数是在原有的word中按位置插入内容,

      YFCWord yfcword = new YFCWord();
                yfcword.testword_template();        

    第二个函数需要一个文件  个人简历.dotx  文件格式如下

    需要在相应的位置增加书签,程序会根据书签填写内容

    展开全文
  • word宏、宏编程以及VBA

    万次阅读 多人点赞 2018-12-03 19:55:37
    word宏是什么呢? 宏是一个批量处理程序命令,正确地运用它可以提高工作效率。微软的office软件允许用户自己编写,叫VBA的脚本来增加其灵活性,进一步扩充它的能力。 如完成一个一打开word文件同时要打开某个文件...

    整理自网络

     

    word宏是什么呢?

    宏是一个批量处理程序命令,正确地运用它可以提高工作效率。微软的office软件允许用户自己编写,叫VBA的脚本来增加其灵活性,进一步扩充它的能力。

    如完成一个一打开word文件同时要打开某个文件的功能,必须要自己编写一段称之为宏的脚本。

    具体做法是在菜单栏点击开发工具-宏,"宏"弹出的对话框输入宏名,然后按"创建"按钮会打开visual basic编辑器,你就可以编程了,这个就是宏。

    学会它会有很多乐趣的。玩过街机模拟器的人肯定有体会,在格斗游戏中,用模拟器来录制宏,以实现一键放绝招。

     

    典型应用

    1.加速日常编辑和格式设置

    2.使对话框中的选项更易于访问

    3.自动执行一系列复杂的任务

     

    Word宏功能介绍和使用

    简单点说就是批处理,但是要比批处理功能更强大.使你一个简单的操作,比如一个左键点击,就可以完成多项任务,很方便的. 比如我们从网上复制的网页内容粘贴到Word以后可能会不少空行,有的行距又很大,手工去除空行、改行距、进行页面设置等等较麻烦,如果你录制一个宏以后,你只要按一下你设定的快捷键,一切工作就自动完成了。

    另外,我们经常使用的一些功能也在不知不觉地使用宏,比如Word的稿纸功能实际上是已经设置好的"页眉和页脚"的一个宏。

    宏是一系列 Word 命令和指令,这些命令和指令组合在一起,形成了一个单独的命令,以实现任务执行的自动化。

    所以, 如果在 Microsoft Word 中反复执行某项任务,可以使用宏自动执行该任务。

     

    比如说你的电脑每天要监控并记录很多组的数据,而且这些数据是不断变化更新的(发/变电站记录表记等),这样你就需要做个宏来将服务器里这些数据定时转到一个或多个WORD文档里来,便于计算存档和打印.你的领导办公室在远一些的地方也可以通过网络来调用这个宏来将数据传到他的办公桌的电脑上.当你启动做好了的这个含有宏的文件的时候会弹出一个窗口问你是否起用宏.

     

    为了让你具体地了解运用,下面举个例子:录制一个进行页面设置的宏。

     

    你任意打开一个Word文档后用鼠标依次点击开发工具-宏-录制宏,再点击"键盘",在"请按新快捷键"内填入你想设定的快捷键(如Ctrl+1),再单击右边的"指定"按钮及"关闭"按钮,这时开始录制宏,屏幕上有一个工具条,有暂停(恢复)、结束按钮。你可以对打开的Word文档,像以前一样地进行页面设置,设置完以后你点一下工具条上的"结束"按钮,宏就录制好了。下次你要对一篇Word文档像录制宏时一样重新进行页面设置时,只要打开这篇Word,再按一下"Ctrl+1"(即您设定的快捷键),一切OK。

     

    宏的一些典型应用

    加速日常编辑和格式设置 .

    组合多个命令,例如插入具有指定尺寸和边框、指定行数和列数的表格 .

    使对话框中的选项更易于访问 .

    自动执行一系列复杂的任务 .

    Word 提供两种方法来创建宏:宏录制器和 Visual Basic 编辑器 。

     

    微软Word和宏病毒

    Visual Basic for Applications (VBA),是 Microsoft Office 里的一种编程语言. 但由上面的定义,它完全不是一种宏语言。然而,它的功能已经从中发展并最终替代了用户应用程序的宏思想,所以他被广泛地错误地称为是一种宏语言。

    VBA 可以访问许多操作系统函数并支持文档打开时自动执行宏。这使得用这种语言写计算机病毒成为可能。1990年代中后期,宏病毒成为了最流行的计算机病毒类型之一。其它的包括宏语言的项目,故意从其宏语言中排除了一些功能(如:自动执行)以避免破坏程序。然而,这一特性在很多事务中受到欢迎。

     

    VBA是什么?

    Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能,特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。该语言于1993年由微软公司开发的的应用程序共享一种通用的自动化语言--------Visual Basic For Application(VBA),实际上VBA是寄生于VB应用程序的版本。微软在1994年发行的Excel5.0版本中,即具备了VBA的宏功能。

    用途

    由于微软Office软件的普及,人们常见的办公软件Office软件中的WordExcelAccessPowerpoint都可以利用VBA使这些软件的应用更高效率,例如:通过一段VBA代码,可以实现画面的切换;可以VBA6实现复杂逻辑的统计(比如从多个表中,自动生成按合同号来跟踪生产量、入库量、销售量、库存量的统计清单)等。

    掌握了VBA,可以发挥以下作用:

    1.规范用户的操作,控制用户的操作行为;

    2.操作界面人性化,方便用户的操作;

    3.多个步骤的手工操作通过执行VBA代码可以迅速的实现;

    4.实现一些VB无法实现的功能。

    5.VBA制做EXCEL登录系统。

    6.利用VBA可以Excel内轻松开发出功能强大的自动化程序。

     

    与VB的区别

    VB是设计用于创建标准的应用程序,VBA是使已有的应用程序(EXCEL)自动化

    VB具有自己的开发环境,VBA必须寄生于已有的应用程序.

    要运行VB开发的应用程序,用户不必安装VB,因为VB开发出的应用程序是可执行文件(*.EXE),VBA开发的程序必须依赖于它的父应用程序,例如EXCEL.

    VBAVB的一个子集。

    尽管存在这些不同,VBAVB在结构上仍然十分相似.事实上,如果你已经了解了VB,会发现学习VBA非常快.相应的,学完VBA会给学习VB打下坚实的基础.而且,当学会在EXCEL中用VBA创建解决方案后,即已具备在WORD ACCESS OUTLOOK FOXPRO POWERPOINT 中用VBA创建解决方案的大部分知识.

    VBA一个关键特征是你所学的知识在微软的一些产品中可以相互转化.

    VBA可以称作EXCEL"遥控器".

    VBA究竟是什么?更确切地讲,它是一种自动化语言,它可以使常用的程序自动化,可以创建自定义的解决方案.

    此外,如果你愿意,还可以将EXCEL用做开发平台实现应用程序.

    Office取得巨大成功的一个重要原因就是VBA,使用VBA可以完成很多事情,基于ExcelWordVBA小程序不计其数。

    VBA程序员很多是业余程序员,正因为业余,解决的却是工作中需要解决的问题;所以,VBA程序大多都是只是在部门内部或个人使用的小工具。

    集成了VBA的其他应用程序也很多,但真正能为程序增色的不多。

    大多数人看到了VBA可以自动化一个程序,可以扩展已有程序,但没有看到在Office中,VBA代码可以是录制的,而不是写出来的,带来的好处是,学习曲线变得非常缓。如果没有宏录制功能,要熟悉某个Office组件的对象模型,绝非一日之功。

    ArcGIS为例,ArcGIS扩展必须使用ArcObject,不管是使用VBA也罢,VB也罢,还是C++也罢。但同时,ArcObject的学习不是一天两天可以搞定,对于业余程序员,要使用VBA来扩展ArcGIS,几乎没有可能;专业程序员又不屑使用VBA;而对于公司,如果要基于ArcObject来扩展ArcGIS,选择VBA意味着源码的保护很困难。所以,ArcGISVBA就如同鸡肋。

    不过,学习AO的时候,使用VBA比使用其他语言要容易一些,写几行代码,然后直接运行测试结果,这种交互式的学习应该是最好的学习方法。

    ArcGIS以及AOOffice相比,还有一个很大的差别,就是ArcGIS缺乏中等粒度的对象,例如WordExcelRange对象。对于Office开发,可以在对底层小粒度对象一无所知的状况下做很多事情,这就是抽象的力量。常人可以处理的复杂度是有限的,面对数十个对象和几百个对象,后者需要付出的努力不是10倍,而是数十倍或更多,因为在学习过程中,必须可以把这些对象在大脑中很好的组织,以控制其复杂度。

    Visual Basic for Applications(简称VBA)是新一代标准宏语言,是基于Visual Basic for Windows 发展而来的。它与传统的宏语言不同,传统的宏语言不具有高级语言的特征,没有面向对象的程序设计概念和方法。而VBA 提供了面向对象的程序设计方法,提供了相当完整的程序设计语言。VBA 易于学习掌握,可以使用宏记录器记录用户的各种操作并将其转换为VBA 程序代码。这样用户可以容易地将日常工作转换为VBA 程序代码,使工作自动化。因此,对于在工作中需要经常使用Office 套装软件的用户,学用VBA 有助于使工作自动化,提高工作效率。另外,由于VBA 可以直接应用Office 套装软件的各项强大功能,所以对于程序设计人员的程序设计和开发更加方便快捷。

     

    上述内容来自于百科

     

    菜单栏中没有开发工具怎么办?

    依次点击:文件——选项——自定义功能区——主选项卡——开发工具,即可。

    如下图所示,菜单栏中出现了“开发工具”。

     

     

    实例

    1:用宏编写“hello world !”程序

    开发工具——宏,输入名称“HelloWorld”,点击创建,在代码编写去输入如下代码:

    Sub HelloWorld()

    MsgBox ("hello world !")

    End Sub
    运行结果,如下图:

    2:简单的用户交互

    创建如下宏程序:
     

    Sub Hello()

    Dim X

    X = InputBox("您的姓名是:")

    MsgBox (" 欢迎" & X & "来到宏编程世界!")

    End Sub
     

    运行效果如下图:

    可以定制title和占位字符串:

    Sub Hello()

    Dim X

    Dim Y

    X = InputBox("您的姓名是:", " 姓名输入框(这是title)", " 您的姓名请输入到这儿.(这是占位字符串)")

    Y = MsgBox(" 欢迎您" & X & "朋友!", 0, "这里是欢迎对话框.(这是title)")

    End Sub

    还可以使用选择结构,根据输入的名字是否为空,执行不同的逻辑:

    Sub Hello()

    Dim X

    Dim Y

    X = InputBox("您的姓名是:", " 姓名输入框", " 您的姓名请输入到这儿。")

    If X <> "" Then                             '如果X的值不为“空”,那么

    Y = MsgBox(" 欢迎您" & X & "朋友!", 0, " 这里是欢迎对话框.")

    Else                                         '否则(即,X的值为“空”)

    End If                                       '结束

    End Sub

    运行效果,感兴趣的可以尝试一下。

    3:在宏编程中使用循环、选择结构,以及生成随机数,数据类型转换

    Sub Hello()

    Dim a, b, c, d                              '申明了四个变量,变量间用英文逗号分开,与前面实例二申明变量的写法不同,结果相同。

    a = 0                                       '这个变量用于计算您猜了多少次。

    Randomize                                   '准备生成一个随机的数字,先初始化随机数生成器。

    b = Int(100 * Rnd)                          '生成一个百以内的随机数,“Rnd”就是“随机数生成函数”。

    Do                                          '开始循环

    a = a + 1                                   '您猜的次数增添一次。当再次循环到这儿时,次数会继续往上加。

    c = InputBox("请输入您所猜的数")            '将取得的值赋予变量“c”,“c”是字符串!

    d = CInt(c)                                 '将变量“c”转化为整数,再将值赋给“d”。

    If b < d Then                               '进行比较,如果猜大了。

    MsgBox ("您猜的数大了")                     '显示比较的结果。

    ElseIf b > d Then                           '进行比较,如果猜小了。

    MsgBox ("您猜的数小了")                     '显示比较的结果。

    Else: b = d                                 '进行比较,如果猜对了。

    MsgBox ("哈哈,您猜对了!")                   '显示比较的结果。

    Exit Do                                     '既然已经猜对了,就跳出循环。

    End If                                      '结束比较。

    Loop                                        '回到前面的Do,继续循环。

    MsgBox ("您猜了" & a & "次!")               '弹出消息框,并使用了字符串连接。

    End Sub                                     '结束程序。
     

    上述例子来自于网友的“从零开始,步入Word宏编程的世界”,主要用于宏编程的教学,感兴趣的可以自行百度,还有更多的例子。

    下面的两个例子,也来自于网络,但是更具有现实意义,是我用来解决实际工作中遇到的问题的。

     

    4:如何利用宏选中word文档里的所有表格?

    Sub SelectAllTables()
         Dim mytable As Table
          Application.ScreenUpdating = False
          For Each mytable In ActiveDocument.Tables
             mytable.Range.Editors.Add wdEditorEveryone
         Next     
        ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
        ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
         Application.ScreenUpdating = True
    End Sub

    为什么要选中所有表格呢?

    当你处理一个有许多个表格的Word文件时,比如由数据库导出数据字典时,数据库中可能有50多个表,导出到word就会相应地

    有50多个表格,这些表格的原始格式,可能并不满足我们的需要,比如,表格只显示外边框,内部边框的线条都不显示,那么我

    们要一个一个地修改表格属性么?还是利用Ctrl选中所有表格后再设置表格属性?或者还有别的方法?

    利用宏,我们只需要几行代码,就可以选中所有表格,不是很高效、很快捷么?

     

     

    5:如何利用宏同时为所有表格设置样式?

    Sub AutoAdapt()

    Application.Browser.Target = wdBrowseTable

    For i = 1 To ActiveDocument.Tables.Count

       With ActiveDocument.Tables(i)

       .AutoFitBehavior (wdAutoFitWindow)  '根据窗口调整内容

       .Range.ParagraphFormat.Alignment = wdAlignParagraphCenter  '水平居中

       .Range.ParagraphFormat.Alignment = wdCellAlignVerticalCenter  '垂直居中

       .Borders(wdBorderHorizontal).LineStyle = wdLineStyleInset  '加水平线

       End With

    Next i

    End Sub

    利用宏,不仅仅可以选中所有的表格,甚至还可以直接操作表格的属性,是不是很强大?

    有兴趣的朋友可以多学一点宏编程的知识,好像挺有趣的。

     

     

     

     

    展开全文
  • 如何word里面插入代码块?

    万次阅读 2021-07-18 16:22:29
    写一些有关编程的技术报告的时候,既要用到word、又要用到代码块,那么如何在word中插入代码块呢?下面小虎就来详细讲述。

    写一些有关编程的技术报告的时候,既要用到word、又要用到代码块,那么如何在word中插入代码块呢?下面小虎就来详细讲述。

    插入代码块方法

    插入—>文本—>项目—>OpenDocument Text开放格式文本一般选第二个OpenDocument Text,第一个是LibreOffice的。

    在这里插入图片描述
    在这里插入图片描述

    插入后会新开一个截面,把代码从编译器复制过去即可。

    在这里插入图片描述

    另外,其实我直接在VSCode复制粘贴到word(没有前面的步骤)也是这个效果。不过还是建议用这个对象块,因为里面的代码不会随着你在外面改变字体的格式而改变。

    在这里插入图片描述

    参考资料

    翻译并修改自:
    How do you display code snippets in MS Word preserving format and syntax highlighting?

    展开全文
  • C#编程习题 以下有 18 道习题 (当然这并非全部的习题最后应该会多增加 2 题共 20 题 )对于 这 20 道题目要求大家每道题目都能够做到看到题目不看其他参考材料的情况下能够 实现出来 期末考将会从中抽取三道题目 ...
  • 涵盖56种编程语言,几种DBMS和1000多种最重要的UNIX / Linux命令。 与StackOverflow一样,提供对世界上最好的社区驱动的备忘单存储库的访问。 随处可用,无需安装。 Ultrafast通常会在100毫秒内返回答案。 有一个...
  • 话题:word里面怎么找出重复的词语?在不知道的什么词语的情况下回答:用word的替换(Ctrl-H)功能,查找你要替换的内容,全部替换成空的就可以起到删除的作用。参考回答:选中,在格式-字体中选择“上标”话题:怎样...
  • } } C#编程习题 以下有 18 道习题 当然这并非全部的习题最后应该会多增加 2 题共 20题对于 这 20 道题目要求大家每道题目都能够做到看到题目不看其他参考材料的情况下能够 实现出来 期末考将会从中抽取三道题目 分数...
  • 批量对word文档进行操作

    千次阅读 2022-02-11 15:42:46
    前面几章我们以经介绍了怎么批量对excel和ppt操作今天我们说说对word文档的批量操作 应用 python-docx允许您创建新文档以及对现有文档进行更改。实际上,它只允许您对现有文档进行更改;只是如果您从一个没有任何...
  • 最近在研究在Linux下读写word文件,从网上找了一些资料,分别对多种技术方案进行了比较。
  • 可利用MacType替换费眼且难看的宋体和新宋体,在Word中也不会导致文档的行间距发生变化(意味着常规字形下的版面不会变化;对于粗体和粗斜体,宋体/新宋体加粗后字符宽度会发生变化,而本字体不会,因此替换后的版面...
  • 大家在做plc 程序设计时有没有遇到过这种困惑:有的程序INT 和WORD可以互用,但是有的不行,word和INT各自的区别以及总结下哪些可以替代互用,哪些不能互用?本文一起学习一下!一、区别的概述(着急的话看完这段...
  • 其实可以在Word中插入代码并使之进行高亮显示,达到和专用排版工具大致一样的效果,使代码的阅读体验更好。如下图所示,是在Word中插入的一段R语言代码,代码缩进、注释、保留字、数据都被正确显示了。那么是如何做...
  • VS作为宇宙第一IDE(Integrated Development Environment ,集成开发环境),在编程界可谓无人不知,无人不晓。现有的最新版本为VS2019,即VC16。它分为三个版本:社区版Community(免费);专业版Professional...
  • VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能,特别是Microsoft Office软件。它也可说是一种...
  • [1] 能输出各种编程语言并保持代码格式和语法高亮显示的网站: PlanetB | Syntax Highlight Code in Word Documents http://www.planetb.ca/syntax-highlight-word Welcome! — Pygments http://pygments.org/ [2...
  • word里如何插入pdf

    2021-03-26 14:15:32
    word里插入pdf的方法:首先点击标题栏“插入”选项卡,并选择“对象”按钮;然后选择【Adobe..】并点击确定;接着插入PDF页面,并依次点击【页面布局-页面设置】;最后设置页边距上下左右均为0即可。本文操作环境:...
  • 本文实例为大家分享了C#根据Word模版生成Word文的具体代码,供大家参考,具体内容如下1、指定的word模版2、生成word类添加com Microsoft word 11.0 Object Library 引用using System;using System.Collections....
  • 关于word插入代码块的小tips
  • 利用VB6.0开发了一个实用的Word2010插件,可以用于增强Word2010的文档打印格式检查、数学运算、函数图形显示等功能。详细介绍了Word2010插件的开发原理及其功能的实现原理。结合实例,给出了该插件功能实现的具体...
  • Sub '调节亮度和对比度() ' 调节亮度和对比度 宏 For i = 1 To ActiveDocument.InlineShapes....步骤:在word中新建一个宏,然后复制上述代码到里面,点击运行后提示“处理完成”,然后保存宏以后用  
  • 涵盖56种编程语言,几种DBMS和1000多种最重要的UNIX / Linux命令。 与StackOverflow一样,提供对世界上最好的社区驱动的备忘单存储库的访问。 随处可用,无需安装。 Ultrafast通常会在100毫秒内返回答案。 有一个...
  • office2016 word 代码排版

    千次阅读 2019-07-02 11:12:22
    【参考资料】 https://www.xiazaiba.com/jiaocheng/27428.html http://www.docin.com/p-1811661594.html ... 在word中代码排版 ...将代码文件用Notepad++打开,选中要复制的代码,右键如图选择。...Ctrl+v 粘贴到word...
  • Office·Word高级·VBA基础概念语法

    千次阅读 2020-06-29 19:51:55
    『Office·Word高级·VBA基础概念语法』 编写人 | SCscHero 编写时间 | Monday, June 29, 2020 文章类型 | 系列 完成度 | 待完善 座右铭 每一个伟大的事业,都有一个微不足道的开始。Hello World! ...
  • 方法:我们先插入一个1*3的表格,然后再中间各自写公式,在右边格式写编号,然后都设置成横向居中和纵向居中,最后在表格属性中取消边框 具体操作:
  • phpword 导入word

    2021-03-24 11:19:13
    PHP读取word文档内容的方法jeyyu的代码中浏览器中执行时需要降低浏览器的安全设置,不方便,而且取得的...个人体会,SOAOffice编程调用上,要比金格的全文批注简单得多如何在php中插入word表格一般,有2种方法可以导...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 97,877
精华内容 39,150
关键字:

word里面怎么编程