Add Formatted Text to a Word Document

Demonstration script that displays formatted data in a Microsoft Word document. 


代码如下:

Set objWord = CreateObject("Word.Application")

objWord.Visible = True
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection

objSelection.Font.Name = "Arial"
objSelection.Font.Size = "18"
objSelection.TypeText "Network Adapter Report"
objSelection.TypeParagraph()

objSelection.Font.Size = "14"
objSelection.TypeText "" & Date()
objSelection.TypeParagraph()

赞 (0)

相关推荐

  • Add Formatted Text to a Word Document

    Demonstration script that displays formatted data in a Microsoft Word document.  复制代码 代码如下: Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents.Add() Set objSelection = objWord.Selection objSelect

  • Add a Formatted Table to a Word Document

    Demonstration script that retrieves service data from a computer and then displays that data in a formatted table in Microsoft Word.  复制代码 代码如下: Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents

  • Add a Table to a Word Document

    Demonstration script that retrieves service information from a computer and then displays that information in tabular format in Microsoft Word. 复制代码 代码如下: Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord

  • Add a Picture to a Microsoft Word Document

    Demonstration script that adds a picture (C:\Scripts\Logo.jog) to a Microsoft Word document 复制代码 代码如下: Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents.Add() Set objSelection = objWord.Selectio

  • Open and Print a Word Document

    Demonstration script that opens and prints and existing Microsoft Word document.  复制代码 代码如下: Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open("c:\scripts\inventory.doc") objDoc.PrintOut() objWord.Quit

  • Add Formatted Data to a Spreadsheet

    Script Code 复制代码 代码如下: Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True  objExcel.Workbooks.Add  objExcel.Cells(1, 1).Value = "Test value"  objExcel.Cells(1, 1).Font.Bold = TRUE  objExcel.Cells(1, 1).Font.Size =

  • 使用python处理一万份word表格简历操作

    使用python处理一万份word表格简历操作

    前言 有一天朋友A向我抱怨,他的老板要求他把几百份word填好的word表格简历信息整理到excel中,看着他一个个将姓名,年龄--从word表格里复制粘贴到excel里,边粘贴心里边暗暗诅咒着自己的boss--但毕竟新手小白,又不能违背老板的意愿说我不干了,爱咋咋地,于是过来向我求助.我说,这事情好办啊,学学python就能解决啊,简单容易上手.好了,接下来进入正题. 思路:首先针对每一份word表格进行分析 怎么才能利用python获取到word表格里面的信息,最初的想法是把word里面的表

  • Spring MVC 关于controller的字符编码问题

    在使用springMVC框架构建web应用,客户端常会请求字符串.整型.json等格式的数据,通常使用@ResponseBody注解使 controller回应相应的数据而不是去渲染某个页面.如果请求的是非英文格式的字符串,往往在客户端显示的是乱码.原因是spring的 StringHttpMessageConverter默认的字符类型是iso8895-1 '西欧语言',中文等字符需要单独指定. 这里总结几种解决方案: 1.不使用@ResponseBody注解,使用HttpServeletRes

  • asp.net中如何批量导出access某表内容到word文档

    asp.net中如何批量导出access某表内容到word文档

    下面通过图文并茂的方式给大家介绍asp.net中批量导出access某表内容到word文档的方法,具体详情如下: 一.需求: 需要将表中每一条记录中的某些内容导出在一个word文档中,并将这些文档保存在指定文件夹目录下 二.界面,简单设计如下: 三.添加office相关引用 添加后可在解决方案资源管理器中看到: 四.添加form1中的引用 using System.Data.OleDb; using System.Data.SqlClient; using System.IO; using Mi

  • 从ASP.NET得到Microsoft Word文档的代码

    背景 自动化(Automation)是一个过程,它允许编程语言譬如Visual Basic.NET或C#写的应用程序可以编程控制其它应用程序.自动化到Word允许你执行像创建新文档,向文档中添加文本,邮件合并,还有控制文档格式这样的操作.使用Word和其它Microsoft Office应用程序,几乎所有你能在用户面板上手动实现的操作都可以通过自动化编程实现.Word通过一个对象模型来实现这个编程功能性(programmatically functionality).对象模型是一系列类和方法,它

随机推荐