1.如何用Word宏操作处理图片
word2007以上版本使用docm格式可以保存宏,保存的时候选择类型为“带宏的word文档”就可以了,不用向下兼容。
不用VBA是无法实现这一功能的,实际上宏只是用代码记录下操作便于重复使用,其实质与作法与VBA没有什么区别。不过,VBA是人工编写代码,宏是自动编写代码而已。
创建宏:
1、创建新宏。点击工具“开发工具”里的分组“代码”里的“宏”命令代码,在弹出的“宏”对话窗里的“宏名称”下面的文本框里输入宏名称(这里输入“CropPicture”),选择“宏的位置”为当前的文档。最后,点击“创建”命令按钮,会弹出VBA的IDE环境,里面已经给出CropPicture程序的程序头尾。如下:
Sub CropPicture()
'
' CropPicture 宏
'
'
End Sub
2、添加代码
把下面代码里的Sub CropPicture()与End Sub之间的代码粘贴到上面提到的代码之间或者直接用下面的代码覆盖上面提到的代码。
'剪切图片
Sub CropPicture()
Dim shps As InlineShapes, shp As InlineShape
Set shps = ActiveDocument.InlineShapes
'左、右、顶、底边各剪切20磅,根据需要修改就行了。
For Each shp In shps
With shp.PictureFormat
.CropLeft = 20
.CropRight = 20
.CropTop = 20
.CropBottom = 20
End With
Next
End Sub
添加热键
点击word文档左上角的Office按钮(logo图标),执行弹出菜单里的“word选项”,会弹出一个对话窗。
在弹出的对话窗里点击左侧导航条“自定义”,点击右侧设置项里的“键盘快捷方式”右侧的“自定义”命令按钮,会弹出“自定义键盘”对话窗。
将“指定命令”的类型选择为“宏”,选择“将更改保存在”右侧的下拉列表,选择为你正在编辑的文档。这时,“宏”列表里会显示当前文档里的所有宏,我们选择“CropPicture”,然后将光标移入“新按新快捷键”文本框,按下“Ctrl+Q”键,点击“指定”命令按钮退出,即可。
调用
按键盘键^q,就可以直接调用宏“CropPicture”,帮你把当前文档里的所有图片向内剪切40磅了。
2.求word2010中批量修改光标所在页的所有图片大小的完整宏命令(非
由于是批量的处理同样的事情,因此要用到宏。
是这样的,如果你的图片显示的是嵌入式的。也就是不能旋转的那种格式,钻切换大小会很容易,方法
要使用宏命令。
宏主要用来处理有规律的重复的工作,相当于批处理。想好了就能编辑出来。工具→宏→录制新宏→然后指定一个快捷键(如L,相当于ctrl L快捷键),然后指定、关闭。开始录制宏。把你能够重复的操作执行一下,以计算机能识别的重复为准。然后→工具→宏→停止录制。这样宏就录制出来了。你ctrl L执行就行了。连续按,则连续执行。如果不完全正确,还要修改或重新录制宏。
对你来说:使用的循环是:查找,图形→然后调整大小,然后鼠标移到图形右侧。然后再执行循环。这个命令是:ctrl F,点开高级,查找里面,选择特殊格式里面的“图形”,单击查找下一个。关掉查找界面,回到word编辑界面。直接去单击 格式菜单里面的 图片,设置大小为你认可的比例。确定。然后将光标用键盘移出 图片(右移以下)。
执行宏即可。
3.如何能快速地在Word文档中批量调整图片
方法一:
可以使用宏命令进行处理:
Sub FormatPics()
Dim iSha As InlineShape
For Each iSha In ActiveDocument.InlineShapes
If iSha.Type = wdInlineShapePicture Then
iSha.LockAspectRatio = msoFalse '不锁定纵横比
iSha.Width = CentimetersToPoints(5) '宽5CM
iSha.Height = CentimetersToPoints(5) '高5CM
End If
Next
End Sub
方法二:
先对单张图片进行处理,然后点击其他需要处理的图片,按F4就可以了,F4在word中有独特的作用:重复上一操作。
4.在word中大家是怎样应用宏命令的
这个问题我有经验。
跟你分享。 宏命令在WORD里面其实是很强大的,它其实是一种脚本编程语言VB。
有一次,我写了一个大文档,有很多表格,而且表格的几个域内容相同。 于是,我偷懒用VB写了一个小程序,自动填写相同的域。
琢磨了一个礼拜, 终于搞好了。 别的同事都十分惊讶。
后来,这个程序还真起作用了。上面 要求修改某个域的填写方法。
别的同事都傻傻地一个一个改,我只修改了 几句程序就搞定。呵呵。
可惜,我现在把所有的VB知识都忘了。 宏命令还有一个简单的应用方法,就是录制! 我们可以录制一个宏,其实就是一系列操作,然后给这个宏指定一个快捷键。
这样,我们就能够利用快捷键反复重复特定的一连串动作,效果也不错。 宏能够记录几乎所有的键盘操作,比如:按一下向下箭头就可以被记录。
这是 宏超过“替换”功能的地方。 因为时间的关系,我不在这里详细说明如何录制宏,那其实挺简单的,稍微 琢磨一下就行了。
欢迎访问我的BLOG: 。
5.在word忠如何用宏设置图片居
我一本正经地胡说一下吧。
帮稍微修改了下使所有嵌入式图片居对于所有图片用ActiveDocument。Shapes。
Count 注意:里Shapes(InlineShapes)仅仅指图片也包含其自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等Sub setpicsize()'设置图片大小' 宏 2008-3-31 由 hero_thm 录制'Dim j '计数图片数For j = 1 To ActiveDocument。 InlineShapes。
Count '文件图片总数图片类型inlineshapesActiveDocument。InlineShapes(j)。
Select '选图片 Selection。ParagraphFormat。
Alignment = wdAlignParagraphCenter '图片居;wdAlignParagraphLeft左对齐Next jEnd Sub上面我补充语句其实也录制宏方式生成(先选图片再点居按钮)另外学习宏多看看Word自带帮助文档吧==========2008-4-16========Sub setpicsize()'Dim j '计数图片数For j = 1 To ActiveDocument。 InlineShapes。
Count '文件图片总数图片类型也shapesActiveDocument。InlineShapes(j)。
Select '选图片'ActiveDocument。InlineShapes(j)。
Range。Paragraphs(1)。
Range。Select '上行行用 With Selection。
ParagraphFormat '所选段落格式 。Alignment = wdAlignParagraphCenter '图片居 。
LeftIndent = 0 '左缩进磅数 。RightIndent = 0 '右缩进磅数 。
FirstLineIndent = 0 '首行缩进磅数 。CharacterUnitLeftIndent = 0 '左缩进字符数 。
CharacterUnitRightIndent = 0 '右缩进字符数 。CharacterUnitFirstLineIndent = 0 '首行缩进字符数 End WithNext jEnd Sub。
6.word 宏 批量修改图片大小 方向
旋转的我不会,但是调整大小的我可以给你提供一个 ,你可以参考下面的代码
Sub t()
WordBasic.PageSetupMargins TopMargin:="0.3", BottomMargin:="0.3", LeftMargin:="0.3", RightMargin:="0.3"
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数,图片类型为inlineshapes
If ActiveDocument.InlineShapes(j).Height > 14.5 * 28.346 Then
ActiveDocument.InlineShapes(j).Height = 14.5 * 28.346 '设置高度 14.5cm
End If
If ActiveDocument.InlineShapes(j).Width > 10.1 * 28.346 Then
ActiveDocument.InlineShapes(j).Width = 10.1 * 28.346 '设置宽度 10.1cm
End If
Next j
End Sub
7.关于用word宏命令保持图片的纵横比
1、CTRL+↑2、1/72英寸 顺便找的题目,希望对你有帮助!单选1. 在Word的编辑状态下打开了一个文档,对文档没作任何修改,随后单击Word主窗口标题栏右侧的“关闭”按钮或单击“文件”菜单中的“退出”命令,则( )。
A)仅文档窗口被关闭 B)文档和Word主窗口全被关闭 C)仅Word主窗口被关闭 D)文档和Word主窗口都没关闭 答案:B2. 在Word的编辑状态,打开了“W1. DOC”文档,若要将经过编辑后的文档以“W2.DOC”为名存盘,应当执行“文件”菜单中的命令是( )。A)保存 B)另存为HTML C)另存为 D)版本 答案:C3. 在Word编辑状态下,对当前文档中的文字进行替换操作,应当使用的菜单是( )。
A)“工具”菜单 B)“文件”菜单 C)“视图”菜单 D)“编辑”菜单 答案:D4. 下列选项中不能用于启动Word的操作是( )。A)双击Windows桌面上的Word快捷方式图标 B)单击“开始”→“程序”→“Microsoft Word” C)单击任务栏中的Word快捷方式图标 D)单击Windows桌面上的Word快捷方式图标 答案:D5. 在Word编辑状态下,如果要在当前窗口中隐藏(或显示)格式工具栏,应选择的操作是( )。
A)单击“工具”→“格式” B)单击“视图” →“格式” C)单击“视图”→“工具栏”→“格式” D)单击“编辑”→“工具栏”→“格式” 答案:C6. 在Word编辑状态下绘制图形时,文档应处于( )。A)普通视图 B)主控文档 C)页面视图 D)大纲视图 答案:C7. 在Word中( )。
A)既可以建立一空表格,再往表格里填入内容,也可以将现有的文本转换成表格 B)只可以建立一空表格,再往表格里填入内容,不可以将现有的文本转换成表格 C)不可以建立一空表格,再往表格里填入内容,但可以将现有的文本转换成表格 D)既不可以建立一个空表格,再往表格里填入内容,也不可以将现有的文本转换成表格 答案:A8. 在Word的编辑状态下,编辑文档中的A2,应使用“格式”菜单中的命令是( )。A)字体 B)段落 C)文字方向 D)组合字符 答案:A9. 立即运行Word,下列操作( )是错误的。
A)在WIN98桌面,单击“Microsoft Word”图标(快捷方式),再回车 B)在WIN98桌面,双击“Microsoft Word”图标 C)在“开始”按钮下的“程序”菜单中,单击“Microsoft Word”图标 D)将“Microsoft Word中文版 ”程序项图标拖曳到“启动组” 答案:D10. 欲将Word窗口的宽度和高度同时放大或缩小,下列( )操作是正确的。A)拖曳上或者下边框到新位置 B)拖曳左或者右边框到新位置 C)沿非水平及非垂直方向,拖曳窗口的四个角之一到新位置 D)拖曳标题栏到一新位置 答案:C11. 关闭Word窗口,下列( )操作是错误的。
A)双击窗口左上角的控制按钮 B)选择“文件”菜单中的“退出”命令 C)按Ctrl+F4键 D)按Alt+F4键 答案:C12. 关闭Word文档1(活动窗口)而不退出Word ,下列操作中,( )是错误的。A)双击文档1窗口左上角的控制按钮(当文档1窗口最大化时,该按钮在“菜单栏”左侧) B)选择“文件”菜单中的“关闭”命令 C)按Ctrl+F4键 D)Alt+F4键 答案:D13. 下面关于Word标题栏的叙述中,错的是( )。
A)双击标题栏,可最大化或还原Word窗口 B)拖曳标题栏,可将最大化窗口拖到新位置 C)拖曳标题栏,可将非最大化窗口拖到新位置 D)Word标题栏显示所运行的软件名称Microsoft Word及其所打开的文档名称 答案:B14. Word文档的默认扩展名是______。A) DOC B) DOT C) DAT D) WPS 答案:A15. Word“段落”是按_______键产生的。
A)回车 B)S。
转载请注明出处51数据库 » 实用word处理宏命令