证书模版框

1. 怎样用WORD（2003版）做荣誉证书模板

找一张和荣誉证书一样大小的纸张（打印试验用），然后按照这样的纸回张在word里面设答置。

由于荣誉证书输入的东西，就三部分内容。

荣誉证书

同志：
因。。。。。。获得。。。。。表彰，特颁发奖励。

最后是落款
日期。

用虚框表格或文本框均可进行快速的设置。

2. 我有一个证书模板，如何在电脑上用word制作出一个一样的证书

CorelDRAW做出来效果会比较好

3. 怎样用word制作荣誉证书

1、我们新建一个Word文档，然后点击菜单栏上的“插入”，插入一个荣誉证书的背内景图容片。

4. 想要用wps做荣誉证书但是里面边框哪里找

点击边框，选择边框和底纹

选择你要的形状

5. 如何用word制作证书打印模板

现如今，不管是大单位还是小公司，公司员工的工作证是少不了的，就像上学时的学生证、胸卡，工作之后单位也会为每位员工配上工作证。随着批量制作工作证需求的增加也逐渐让人们意识到这项工作的重要性。其实这种批量制作可变内容的需求在条码打印软件中是非常简单的一项功能。下面我们就来看一下如何便捷的批量制作工作证？

批量制作工作证之前，我们需要将员工照片及信息进行统一整理。然后在标签打印软件中调用相关的信息进行批量生成和打印。

首先，整理工作证上的员工照片，将员工照片整理为以姓名命名并统一格式保存在一个文件夹中。以下图为例。

6. 求高手，急。要一张证书的边框及背景，CDR格式，图如下

http://www.58pic.com/shiliangtu/10993587.html 采纳谢谢 一模一样 AI转CDR 存AI文件 保存的时候不要勾选压缩 X4及以上直接打开 素材是免费的 其它东西也可以在里面下载 QQ注册一个账号就行了 很方便 采纳谢谢http://www.58pic.com/shiliangtu/10998045.html 还有一张

7. 急急急~~~怎么用word或者wps制作模版打印证件呀

给你一个建议：自己如果不会制作，直接把尺寸（长*宽）量好，和证件照片一起在提一个问，就是请你帮你制作一个。

8. 如可用类似office word的软件,设计一个打证件的模版

有个基于EXCEL2003VBA做的宏，功能是读取身份证信息，记录其中的照片到指定文件夹、身份证号码等信息记录入EXCEL，然后登记参加短期培训后的考试成绩。过程中打印准考证，打印毕业证等等都是在里边完成。不是word版的，需要原始文件可以QQ。

如果只需要打印证件功能，那参考下面的步骤和代码，略加改写就可以用了，代码写得不简洁，高手勿喷。

1、在EXCEL里建立两个工作簿 一个叫“数据”，一个叫“证件”

2、“数据”工作薄的列名如图制作，学员照片需要放在同一目录下，并按学号+姓名+.jpg命名 公章图片文件名也要放同一目录下并命名为"学校证件章.jpg"

3、制作一个宏 代码如下

4、随便在“数据”工作薄中填写些数据 运行宏能看到结果。

Sub 制作证件()

'********************
'***qq13252191制作***
'********************

If MsgBox("程序将删除当前工作表（证件）工作簿中的所有数据和格式，并生成新的证件。确定这样做么？", vbYesNo, "警告") <> 6 Then '
Exit Sub

'删除所有已有数据并重新格式化工作簿
End If
Worksheets("证件").Select '选定证件工作簿
Cells.Select '全选当前工作簿
Selection.ClearContents '全选了当前工作簿右击清除内容
Worksheets("证件").Pictures.Delete '删除证件工作簿当中的所有图片
Selection.Delete shift:=xlUp '全选了当前工作簿右击删除
With Selection
.WrapText = False
.Orientation = 0
.Borders(xlDiagonalDown).LineStyle = xlNone '清除选定区域中的下斜线
.Borders(xlDiagonalUp).LineStyle = xlNone '清除选定区域中的上斜线
.Borders(xlEdgeLeft).LineStyle = xlNone ' 左线
.Borders(xlEdgeTop).LineStyle = xlNone '顶部线
.Borders(xlEdgeBottom).LineStyle = xlNone '下部线
.Borders(xlEdgeRight).LineStyle = xlNone '右线
.Borders(xlInsideVertical).LineStyle = xlNone '垂直线
.Borders(xlInsideHorizontal).LineStyle = xlNone '水平线
.VerticalAlignment = xlBottom '垂直对齐方式是下对齐
.HorizontalAlignment = xlLeft '水平对齐方式是左对齐
.Range("a:a,c:c").ColumnWidth = 42 '把区域内的A列和C列的列宽设置为41.5约等于90毫米
.Range("b:b").ColumnWidth = 2 '把区域内的b列的列宽设置为10
.Font.Name = "楷体_GB2312" '设置整个区域的字体为楷体_GB2312
.Font.Bold = False
.Font.Size = 9 '设置字号为9号字
End With

'定义临时变量
Dim i As Integer '定义变量I为整型
Dim y As Integer '定义变量Y为整型
Dim x As String '定义变量X为字符型
Dim picpath As String '定义照片路径为字符型
Dim picrng As Range '定义照片的区域为区域
Dim printpath As String '定义印章路径为字符型
Dim printrng As Range '定义印章区域为区域
Dim nopic As String '定义无照片人员名单为字符型

'置入公章
printpath = ThisWorkbook.Path & "" & "学校证件章.gif" '将当前工作簿的路径和印章文件名赋值给printpath
With Worksheets("证件")

'定义循环
For i = 2 To Worksheets("数据").Range("a65536").End(xlUp).Row '
picpath = ThisWorkbook.Path & "" & Worksheets("数据").Cells(i, 4).Text & Worksheets("数据").Cells(i, 1).Text & ".jpg"
y = (Int(i / 2) - 1) * 8 + 1
Select Case i Mod 2
Case 0
x = "a"
Case 1
x = "c"
End Select

'置入文本数据
.Range("" & x & "" & y & "") = "国 家 保 安 员 资 格 培 训"
.Range("" & x & "" & y & "").HorizontalAlignment = xlCenter
.Range("" & x & "" & y & "").RowHeight = 30
.Range("" & x & "" & y & "").Font.Name = "宋体"
.Range("" & x & "" & y & "").Font.Size = 11
.Range("" & x & "" & y & "").Font.Bold = True

.Range("" & x & "" & y + 1 & "") = " 合 格 证"
.Range("" & x & "" & y + 1 & "").RowHeight = 40
.Range("" & x & "" & y + 1 & "").Font.Name = "黑体"
.Range("" & x & "" & y + 1 & "").Font.Bold = True
.Range("" & x & "" & y + 1 & "").Font.Size = 22

.Range("" & x & "" & y + 2 & "") = " 姓名：" & Worksheets("数据").Range("a" & i & "")
.Range("" & x & "" & y + 2 & "").RowHeight = 31.1
.Range("" & x & "" & y + 2 & "").Font.Name = "方正行楷简体"
.Range("" & x & "" & y + 2 & "").Font.Size = 20

.Range("" & x & "" & y + 3 & "") = " 编 号：" & Worksheets("数据").Range("d" & i & "")
.Range("" & x & "" & y + 3 & "").RowHeight = 19.8

.Range("" & x & "" & y + 4 & "") = " 身份证号：" & Worksheets("数据").Range("k" & i & "")
.Range("" & x & "" & y + 4 & "", "" & x & "" & y + 3 & "").Font.Size = 9
.Range("" & x & "" & y + 4 & "").RowHeight = 14

.Range("" & x & "" & y + 5 & "") = "制证日期：2011年11月27日" & Worksheets("数据").Range("ad" & i & "") & " " & "培训机构：XXXXXXXXXXXXXXX"
.Range("" & x & "" & y + 5 & "").RowHeight = 14
.Range("" & x & "" & y + 5 & "").Font.Size = 7
.Range("" & x & "" & y + 5 & "").HorizontalAlignment = xlCenter

.Range("" & x & "" & y + 6 & "").RowHeight = 5
.Range("" & x & "" & y + 7 & "").RowHeight = 0

With Range("" & x & "" & y & "", "" & x & "" & y + 6 & "")
.Borders(xlEdgeLeft).LineStyle = xlContinuous
.Borders(xlEdgeLeft).ColorIndex = 1
.Borders(xlEdgeBottom).LineStyle = xlContinuous
.Borders(xlEdgeBottom).ColorIndex = 1
.Borders(xlEdgeRight).LineStyle = xlContinuous
.Borders(xlEdgeRight).ColorIndex = 1
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeTop).ColorIndex = 1
End With


'置入照片
If Dir(picpath) <> "" Then
Worksheets("证件").Pictures.Insert(picpath).Select
Set picrng = Worksheets("证件").Cells(y, x)
With Selection
.Top = picrng.Top + 32
.Left = picrng.Left + 16
.ShapeRange.ScaleWidth 0.85, msoFalse, msoScaleFromTopLeft
.ShapeRange.ScaleHeight 0.85, msoFalse, msoScaleFromTopLeft
End With
Worksheets("证件").Pictures.Insert(printpath).Select
Set printrng = Worksheets("证件").Cells(y, x)
With Selection
.Top = printrng.Top + 93
.Left = printrng.Left + 52
.ShapeRange.ScaleWidth 0.35, msoFalse, msoScaleFromTopLeft
.ShapeRange.ScaleHeight 0.35, msoFalse, msoScaleFromTopLeft
End With
Else
nopic = nopic & Chr(10) & Worksheets("数据").Cells(i, 1).Text
End If

Next i

'判断照片是否存在，并累计错误到提示框
If nopic <> "" Then
MsgBox nopic & Chr(10) & "没有照片！", vbOKOnly, "注意"
End If

End With

End Sub

9. 用word模板套打营业执照证书，怎么建立模板，现有正本模板，做副本的，最外面是文本框吗

找一张和荣誉证书一样大小的纸张（打印试验用），然后按照这样的纸张在word里面设置。由回于荣誉证书输入的答东西，就三部分内容。荣誉证书同志：因。。。。。。获得。。。。。表彰，特颁发奖励。最后是落款日期。用虚框表格或文本框均可进行快速的设置。

10. 最近360浏览器，经常出现需要证书之类的框框~~~请问出现什么问题了怎么解决

金山毒霸可以无脑解决这个玩意，不过你。。装了360 的话在上金山毒霸系统就可以立马重装了。

如果不想太麻烦就等两天，这是微软的一个安全补丁引起的，因为中国很大一部分网站没有得到微软的安全证书（也就是不是用的国际通用标准模板系统建立的）。所以微软的这个补丁强制了屏蔽没有安全证书的网站。
应该会修复。

如果不修复的话，你搞个非IE内核的游览器就完了。比如火狐，迅雷，猎豹，双重空间之类的。