[《梅花转字》作者署名修改稿]梅花转字(相声) 孙世泉 边角儿 (整理) (一点说明:1963我刚上小学一年级,姥爷讽刺我写的字太乱,讲了这个小故事。现整理成“相声”与大家分享。) 甲:汉字博大精深,书体分箴草隶篆四种。...+阅读
word批量修改图片大小方法: 固定长宽方法: 1、打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示,输入一个宏名,宏名自己起,能记住就行! 2、宏名起好了,单击“创建”进入Visual Basic 编辑器,输入如下代码并保存 Sub setpicsize() '设置图片大小 Dim n '图片个数 On Error Resume Next '忽略错误 Forn = 1 ToActiveDocument.InlineShapes.Count 'InlineShapes类型图片 ActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400px ActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300px Nextn Forn = 1 ToActiveDocument.Shapes.Count 'Shapes类型图片 ActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400px ActiveDocument.Shapes(n).Width = 300 '设置图片宽度 300px Nextn End Sub 3、返回word,工具-宏-宏(或者直接按Alt+F8),再次进入宏的界面,选择刚才编辑好的宏,并单击“运行”按钮,就可以了!(图片多时,可能会花一些时间) 按比例缩放方法 这部分要说的是把word中的所有图片按比例缩放! 具体操作同上,只是代码部分稍做修改,代码如下: Sub setpicsize() '设置图片大小 Dim n '图片个数 Dimpicwidth Dimpicheight On Error Resume Next '忽略错误 For n = 1 ToActiveDocument.InlineShapes.Count 'InlineShapes类型图片 picheight = ActiveDocument.InlineShapes(n).Height picwidth = ActiveDocument.InlineShapes(n).Width ActiveDocument.InlineShapes(n).Height = picheight * 1.1 '设置高度为1.1倍 ActiveDocument.InlineShapes(n).Width = picwidth * 1.1 '设置宽度为1.1倍 Nextn For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片 picheight = ActiveDocument.Shapes(n).Height picwidth = ActiveDocument.Shapes(n).Width ActiveDocument.Shapes(n).Height = picheight * 1.1 '设置高度为1.1倍 ActiveDocument.Shapes(n).Width = picwidth * 1.1 '设置宽度为1.1倍 Nextn End Sub 若还想使所有图片居中对齐,可在循环中加入下面的语句: ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment= wdAlignParagraphCenter '左对齐:wdAlignParagraphLeft 注意:这里的Shapes(InlineShapes)不仅仅是指图片,也包含其它的,自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。
延伸阅读:
修改稿《可笑的未婚梦姑娘》---小品 《 可笑的未婚梦姑娘 》--- 时 间: 某天。 地 点:佟辉家。 人 物: 佟辉;佟勤俭;勤俭对象梦姑。 【幕启:客厅装饰只能说明主人富有,跟本找不到奢侈摆阔的痕迹, 仅此而以。...
家和万事兴修改版家和万事兴 甲:丈夫 乙:妻子 丙:孩子 丁:母亲 背景:女强人对老公和婆婆吆五喝六,但很疼很宠孩子,孩子就学的跟他妈一样,不懂得尊重人,忽然某天孩子做的某个事让人女强人明白过来了 ,怎...
联欢会应征稿“牙”修改稿方言07.12联欢会节目应征稿 牙疼不是病(陕西独脚戏表演,亦可做为小品表演) 演员着装:医生白大褂分别印有“牙”,“胃”,“喉”,“刚肠”,备放大镜及超大号放大镜,手电,钳子,班子,螺丝刀。患者白羊...
《瞎检测》修改版《瞎检测》“爆笑四川方言小品”冷幽默 主创;吴所谓 甲;是一名老实巴交农民老头,既是风湿病患者,又有严重的老花眼。 乙;经营私人诊所的老板,有严重的近视眼。 道具;两把椅子、书桌...
人能力有大小,水平有高低预测未来的最好办法是自己亲手创造未来。 伟人议论理,常人议论事,小人议论人。 在人生的舞台上,没有彩排的戏;在人生的道路上,没有重走的路。 一个人只要心中有目标,他的面前就...
医院装修改造庆祝会欢迎词尊敬的各位领导、各位与会来宾: 大家好! 正值我院***装修改造基本结束即将开业之际,******离退休干部党支部书记学习班在我院召开,这既是我院接待服务工作中的一件喜事,也是省***...
关于感恩支教老师的朗诵台词是送别的如何修改一声呼唤,你毅然离家前来,放下城市生活的舒适便捷、放下家中的安逸温暖、放下高薪高职的邀请挽留,只带着对社会的责任与感恩、对教育的热爱与执着、对孩子的关怀与真心,来到了到...
怎样批量调整word图片大小我知道通过宏可以批量完成一个word中所有图片大小的修改,在次与大家共享,也希望可以给大家参考。 1、Alt+F8调出宏编辑窗口 2、点创建按钮,创建新宏,setpicsize,内容如下: Sub set...