如何用word vb宏来生成sql
转载 &更新时间：日 17:38:14 & 作者：
本篇文章是对利用word vb宏来生成sql的方法进行了详细的分析介绍，需要的朋友参考下
昨天BOSS下了个命令让我用word宏的方式来快速生成sql，这样在我们建表的时候就不用在一条一条元数据的输入。从而提高效率节约成本：
接到命令后就开始着手来做，一边上网搜相关的现成的材料，一边看vb宏的视频教程。终于让我写出了这个程序，虽说有点儿小吧，可是感觉挺好的。
这里的vb宏要针对固定的数据库数据字典表格进行的。由于代码太长就不拿出来了，这里是word中的表格式和vb运行后的结果如下：
用户信息表
Discription
& 代码如下:CREATE TABLE T_Test (&userid integer NOT NULL ,&username varchar (50) Default 'Chen' NOT NULL ,&password varchar (30) Default '我的' NOT NULL ,&telephone varchar (20) Default '112323' NOT NULL ,&Address varchar (50) Default 'sss'&& ,&Discription varchar (200) Default 'sssss'&& ,&jjjjjj varchar (122) Default '333' NOT NULL ,&hhhh varchar (23) Default '111' NOT NULL );ALTER TABLE T_Test add&CONSTRAINT PK_T_Test PRIMARY KEY(userid);comment on table T_Test is '用户信息表';comment on column T_Test.userid is '主键ID' ;comment on column T_Test.username is '用户名' ;comment on column T_Test.password is '密码' ;comment on column T_Test.telephone is '用户电话' ;comment on column T_Test.Address is '用户地址' ;comment on column T_Test.Discription is '用户介绍' ;comment on column T_Test.jjjjjj is '试试看' ;comment on column T_Test.hhhh is '试试看撒' ;在pl/sql中跑了一遍也挺好的，直接就可以执行。
您可能感兴趣的文章:
大家感兴趣的内容
12345678910
最近更新的内容
常用在线小工具用VB做一个WORD的高级宏_百度知道
用VB做一个WORD的高级宏
在原来的WORD文章里篇首篇尾和中间自动插入我写入的三段话并且自动改变格式通过一个快捷键完成以上内容如有可能把文章的标题也改成我对照表的相应的内容。要分给分，再赠送Q币QQ
我有更好的答案
我给你代码发你邮箱了
采纳率：47%
首先打开录制宏，在word中把你要实现的操作完成，停止宏，然后查看刚才录制的宏，直接copy到vb中，就ok了，你可以分析一下宏代码。vb操作word网上很多代码的。
没太明白你得意识
发个消息联系下QB就免了。
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。WORD宏，把所有表格则设置 缩进为0，居中对齐。
<img onerror="imgDelByClass('comimg_box');" class="piczoom mpic" alt="WO
这个不用宏，直接用格式刷就能办到。
弄好了一个格子的坐缩进，双击格式刷，刷其他的所有（拉黑）即可。下面的表格也带着刷子去操作一下就行了。
用宏，才有点罗嗦。
其他答案（共1个回答）
e表缩进为0()
Dim ss As Table 'aa_no_indent_table表缩进为0
For Each ss In ActiveDocument.Tables
ss.Range.ParagraphFormat.CharacterUnitFirstLineIndent = 0
'取消字符单位的首行缩进
ss.Range.Parag...
Sub aa_no_indent_table表缩进为0()
Dim ss As Table 'aa_no_indent_table表缩进为0
For Each ss In ActiveDocument.Tables
ss.Range.ParagraphFormat.CharacterUnitFirstLineIndent = 0
'取消字符单位的首行缩进
ss.Range.ParagraphFormat.FirstLineIndent = 0
'取消取行缩进
请看这个帖子：
呵呵，另请参考此帖：
希望是你想要的
这个问题只有用宏来解决了。
1、打开这个文档，点击窗口上面的菜单“工具”-》“宏”-》“Visoual Basic编辑器”；
2、在弹出的VBE窗口中点窗口上面...
办公软件中的“宏就”是用“VBA”编辑器编写的一种程序语言，也可以理解为是一个程序。
启用宏，才能运行一些特定的程序，但同时也增加了感染病毒的机会，所以对一些来...
打开VBE，插入一个模块就搞定了：
Option Explicit
Sub 统一超链接格式()
Dim hlkTemp As Hyperlink
For Eac...
是该大小和裁剪
在Word中将鼠标单击图片一下，然后右击选择显示图片工具栏，用工具栏中的东西就可以了，选择及裁剪！
答: 乘上60 =TEXT(A1/24,"[h]小时m分钟")
答: 楼主可以找找一下软件：
电脑监控专家
F8电脑监控软件
健康上网专家
前两个是共享版，很难找到注册的
答: 你试一试重新安装XP,可能是你那个系统损坏!
铝属于两性金属，遇到酸性或碱性都会产生不同程度的腐蚀，尤其是铝合金铸件的孔隙较多，成分中还含有硅和几种重金属，其防腐蚀性能比其他铝合金更差，没有进行防护处理的铝铸件只要遇到稍带碱性或稍带酸性的水，甚至淋雨、水气、露水等就会受到腐蚀，产生白锈。
解决的办法。
铝铸件完成铸造后，在机械加工前，先要进行表面预处理，如预先对铸件进行喷砂，涂上一道底漆（如锌铬黄底漆），在此基础上再进行机械加工，以避免铸铝件在没有保护的情况下放久了被腐蚀。
工行的网银没有软键盘，主要通过安全控件来保证安全，只有安装了工行的安全控件，才能在工行网页上输入密码。
修改密码的操作，你可以在登陆工行网银以后，在“客户服务”的“修改客户密码”里找到相关链接。
如果是下拉的，只有党员而没有预备党员一项，可填党员，但如果是填写的，你就老老实实填预备党员，填成党员对你没什么好处，填预备党员也不会有什么吃亏。
tann转成假名就是たん，拼音的话，相当于tang吧……
bakka转成假名是ばっか
kkou转成假名是っこう
benn转成假名是べん
kyo转成假名是きょ
系统学过五十音的话，看罗马音就能直接读了。用拼音来学是不合适的，有些发音没法用拼音标的。
P.S.罗马音里，“nn”就是波音“ん”，“kka”是前面带促音小写“っ”的“か”，同理“tta”就等于“った”。
单纯的色盲患者分为遗传性的和后天形成的。一般都是在体检时才会发现自己色盲。导致色盲的原因，遗传的色盲是不好完全根治的，但是如果是部分的红绿色盲，再加上是由于后天的发现而造成的。也还是有治愈或者消除的可能性。目前世界上的医疗手段，是不能完全医治好红绿色盲的，因为色盲是基因出现了问题。不过我们可以加强自身的素质，也许后天造成的红绿色盲是能够根治病情的。患有红绿色盲患者的家人，应该多多鼓励患者，不要让他们产生悲观的心情。色盲患者平时可以加强体育锻炼，多去医院做色彩校正。希望患者能有一个积极的态度来治疗自己的疾病。患上色盲是很常见的，重要的是患者要拥有一颗多姿多彩的心，只有心情变得愉悦了，病情才会有所好转的。市场上有卖一些色盲矫正的眼睛，患者在购买时，一定要擦亮眼睛。真假的货真的很难分辨出来，劣质的眼镜只会让病情适得其反啊。一定要慎重选择。
症状：我们可以观察到口腔内的舌系带短缩、紧张，常牵拉舌端形成向内凹陷性切迹，舌头不能灵活上抬，左右活动。因为舌系带短缩，所以限制了舌端的正常活动并且影响了患儿的正常发音，使患儿出现发音障碍或者声音异常。治疗：如果我们发现患有舌系带短缩的患儿，应尽早实施手术。手术步骤：(1)麻醉：局部浸润麻醉或全身麻醉。(2)切开：将舌系带黏膜及其深层纤维横向切断，或进行“Z”字成形术。(3)缝合：纵向或“Z”形交错缝合伤口。除了进行传统手术外，激光、电离子及高频电刀等手段也被使用。保健：舌系带短缩的术后要保持口腔清洁，漱口；无不适症状可以不用药物预防感染；饮食健康，多吃绿色蔬菜，忌辛辣饮食。1、舌系带缩短畸形应尽早治疗，在新生儿期就可以进行治疗。2、早期治疗前要进行筛选，对于不适合早期治疗的要作相应处理后再适时治疗。3、要注意术后的保护，预防感染等。
第一个就是那个微循环出现障碍，当人的情绪激动或者焦虑之后，，我们的肾，就会分泌一些肾上腺，同时比正常量增加很多，从而也就导致了耳内部的血液循环供氧不足，就出现这种情况。对急性耳聋通常我们要见的就是感冒，属于一种病毒感染引起的如果患者的偶尔一次感冒很长时间都没有见好的话，那么这个时候就需要到正规的医院中一个正规的检查，排除是不是体内的炎症导致的或者是急性耳聋的一个症状。对于急性耳聋的治疗我们就需要根据患者的实际情况进行决定的，并不是每一个患者患上了这种疾病，就是用一种特性的药物进行治疗，因为每一个患者的症状都是不一样的，那么这个时候我们就需要根据病因进行对症下药。
一般手术比较干脆。需要根据慢性副鼻窦炎患者病情的严重程度来决定手术的选择方式。手术的治疗方式相对疗效药好一些，治疗鼻窦炎比较直接的一种治疗方式就是用手术进行治疗，但是手术的风险肯定是有的。药物治疗比较安全。但效果因人而异。选择采用清热解毒的中草药治疗比较合适。但是不要乱用药物造成没有必要的伤害，一定要重视!一般鼻窦炎的治疗可以用药物进行治疗，药物的治疗一般用中药比较好，需要注意的是药物肯定得遵循专科医生的指导。慢性副鼻窦炎的患者生活中一定要避免不良的习惯，不能抽烟喝酒，不能熬夜，要注意多休息。平时要保持鼻腔的清洁通畅卫生。注意多喝水，可以吃新鲜的水果蔬菜，保持好自己的心情愉快，不要有思想负担。我们在平时的生活中一定要注意自我的保养，不要忽视鼻窦炎的存在，鼻窦炎的危害还是很大的，一经发现一定要及时的处理，接受全面的检查治疗很重要。
看一看周围有没有传染源。一般这是有感染习惯的啊，而且啊，医生又给儿子问了一些问题，像是有没有经常用脏手揉眼睛啊；有没有适当的眼部清洁啊等等，后来啊医生就给我儿子开了些氯霉素眼药水，让他经常滴一滴，以防眼睛干痒又用手去揉，这样子会让病菌感染，加重沙眼症状。平时要多注意休息，休息好了才能治好啊，要不就会越发展越厉害，你应该做最好多闭眼睛。有时候特别痒，但是也不能用手搓，我都有时候痒的不行了，也忍着，实在坚持不住，用卫生棉签擦一下。应该尽量保持眼睑卫生，一般就是眼睛不卫生造成的呢，局部使用0.1%的利福平滴眼剂。不要揉眼，平时多吃点蔬菜水果，多锻炼，增强抵抗力，减少感冒。
沈师傅的残疾人矫正鞋制作中心，专门给孩子定做矫正鞋，要根据孩子的问题，程度，病因，取模来定做。
“环保袋不环保”，并非名人一己之感觉，这相差无几在公众中都快得到共识了。当然，还可以经过树立诸如“环保袋循环流通机制”这种更为积极的处理办法以更大限度地成功实现环保袋的社会形态价值：由小区物业、居委会或成立专门机构回停止营业民骈枝的环保袋，将他们集中起来，这么既可以再发放给需求环保袋的私人或家子，也易于进做善事处。
你用的是光纤激光打标机还是CO2激光打标机，我们可以帮你试验下
推荐去沈师傅鞋业，他们有一个残疾人矫正鞋制作中心，专门解决一些特宽、特肥脚、因伤至变形、异形脚、天生畸形脚等问题。自从2000年成立至今，我们已经为几万位的顾客提供了专业的定做矫形鞋服务。
首先给你说说深圳创想激光主要是做哪方面的激光设备的吧，创想激光最主要生产与销售半导体激光打标机、二氧化碳激光打标机、侧面激光打标机、端面激光打标机、光纤激光打标机、紫外激光打标机等打标机，还有其它像塑料激光焊接机，首饰激光焊接机啊，激光切割机方面就不多说了，不告诉你指的是他们哪种类型的激光打标机还是总体的激光打标机？我自己在用他们公司生产的半导体激光打标机，用了一段时间，感觉挻较好，最让我安心还有舒心的是他们家的服务蛮不俗的，现在机器用快半年了，机器没经常出现过什么问题。他家其它的打标机我也到他们工厂看完，也在现场看完他们上过样，感觉都挻好的，最重要的一点是他们家的价格也比较合理。期望可以帮到你
正在加载...
Copyright &
Corporation, All Rights Reserved
确定举报此问题
举报原因(必选)：
广告或垃圾信息
激进时政或意识形态话题
不雅词句或人身攻击
侵犯他人隐私
其它违法和不良信息
报告，这不是个问题
报告原因(必选)：
这不是个问题
这个问题分类似乎错了
这个不是我熟悉的地区
相关问答：123456789101112131415Word宏代码集锦_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
赠送免券下载特权
10W篇文档免费专享
部分付费文档8折起
每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
Word宏代码集锦
&&宏简单点说就是批处理,但是要比批处理功能更强大.使你一个简单的操作,比如一个左键点击,就可以完成多项任务,如果你录制一个宏以后,你只要按一下你设定的快捷键,一切工作就自动完成了。 所以, 如果在 Microsoft Word 中反复执行某项任务,可以使用宏自动执行该任务。请让我们一起走进word的宏世界里去吧!
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
&#xe64e;加入VIP
还剩38页未读，
定制HR最喜欢的简历
你可能喜欢请教word宏高手，有关vb编辑器实现定位、取值、替换功能？_百度知道
请教word宏高手，有关vb编辑器实现定位、取值、替换功能？
原文中包含：“人员张三，”“人员李四四，”“人员王五太郎，”
等通过宏命令定位关键字&人员&，
识别关键字“人员”后文字字符位数（到逗号为止），并设置筛选条件字数长度大于等于一个字小于等于三个字，
提取“人员”后文字内容作为查询对象，
解答者可加分
我有更好的答案
人员后面是1~4个字？如果碰上复姓怎么办？
采纳率：52%
来自团队：
为您推荐：
其他类似问题
您可能关注的内容
word宏的相关知识
&#xe675;换一换
回答问题，赢新手礼包&#xe6b9;
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。}