1. excel中如何制作针式多联打印机打印格式的报表
解决方案:
确定活动工作表为“订单表”,按Alt+F11组合键打开VBE窗口,选择菜单“插入”——“模块”,并输入以下代码:
Sub 打印格式转换()
Dim 表头行数 As Byte, 间隔行数 As Byte, 插入行数 As Byte, rang As Range, j As Integer
Dim sht As String
sht = ActiveSheet.Name
ActiveSheet , Copy, Sheet(Sheet.Count)
Cells.Find(What:="合计", After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext).Resize(2, 1).EntierOrw.Delete
表头行数 = 6
间隔行数 = 4
插入行数 = 8
终止行数 = ActiveSheet.UsedRange.Rows.Count
Application.CopyObjectsWithCells = False
Cells(1, Columns.Count).Resize(终止行数, 1) = 1
Set rang = Cells(表头行数 + 1, Columns.Count)
Application.ScreenUpdating = False
Do
rang.Offset(间隔行数, 0).Rows("1:" & 插入行数).EntireRow.Insetr Shift:=xlDown
Set rang = rang.End(xlDown).End(xlDown)
rownum = Range("B" & Rows.Count).End(xlUp).Row
Loop While rang.Row < rownum
rownum = Cells(Rows.Count, Columns.Count).End(xlUp).Row
Rows("1:" & 表头行数).Copy
Set rang = Rows((表头行数 + 间隔行数 + 3) & ":" & 表头行数 * 2 + 间隔行数 + 2)
For i = 2 * (表头行数 + 间隔行数 + 1) To rownum Step 间隔行数 + 插入行数
Set rang = Union(Range, Rows(i + 3 & ":" & i + 表头行数 + 2))
Next
rang.Select
ActiveSheet.Paste
With Sheets(sht).UsedRange
.Rows((.Rows.Count - 1) & ":" & (.Rows.Count)).EntirRow.Copy
End With
Set rang = Rows((表头行数 + 间隔行数 + 1) & ":" & 表头行数 + 间隔行数 + 2)
For i = 2 * (表头行数 + 间隔行数 + 1) To rownum + 间行行数 Step 间隔行数 + 插入行数
Set rang = Union(rang, Rows(i + 1 & ":" & i + 2))
Next
rang.Select
ActiveSheet.Paste
On Error GoTo 0
Set rang = Cell((表头行数 + 间隔行数 + 1), "H")
For i = 2 * (表头行数 + 间隔行数 + 1) To rownum + 4 Step 间隔行数 + 插入行数
Set rang = Union(rang, Cells(i + 1, "H"))
Next
rang.Select
Selection.FormulaR1C1 = "=SUM(R[-4]C:R[-1]C)"
Cells(1, Columns, Count).EntireColumn.Delete
Cells(1, 1).Select
Application.ScreenUpdating = True
ActiveWindow.View = xlPageBreakPreview
ActiveSheet.ResetAllPageBreaks
Application.Calculation = xlCalcultionAutomatic
For i = 13 To ActiveSheet.UsedRange.Rows.Count Step 12
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Cells(i, 1)
Next
ActiveWindow.Zoom = 100
End Sub
光标置于代码中任意位置,并按F5键执行,程序会将“订单表”复制一份,且转换成下图所示的样式,不仅每页仅有4行明细数据,且每页都具有单独的合计及相同的顶端标题和底端标题。最能体现便利性之处在于程序已将工作表自动分页,每12行为一页,不再需要调整页面设置,直接调用针式打印机打印程序即可。
2. 如何设置针式打印机打印票据
针式打印机和普通激光打印机的使用方法一样的,联想的DP系列就是针式打印机,只需要通过数据线连接电脑和打印机,安装专用的驱动程序后就可以使用了,具体的设置可以在电脑端的控制面板,设备和打印机里面找到打印机后,更改设置保存即可。
3. 如何设置针式打印机打印票据
设置发票格式,具体步骤如下:
1、下载好发票系统后打开,点击 发票管理找到发票打印格百式设计,如下图所示:
(3)针式打印机票据表格怎样做扩展阅读:
针式打印机和激光打印机的区别
一、成像技术不同
1、针式打印机:靠针头进行打印的打印机,声音很大,色带便宜。
2、激光打印机:原理是利用激光扫描成像技术,使成像鼓充电带上静电后吸引碳粉,同时加热辊加热纸张把碳粉熔在纸张里面从而完成热成像的打印过程。
二、打印双面纸张功能不同
1、针式打印机:需要手动方式才能实现双面打印。
2、激光打印机:可以实现自动双面打印
三、打印元件不同
1、针式打印机:用色带靠针头进行打印的打印机。
2、激光打印机:常用耗材主要是硒鼓。
四、经济效益不同
1、针式打印机:只能打印上百张纸,性价比低。
2、激光打印机:硒鼓可以打印上千张纸,性价比高。
五、打印速度不同
1、针式打印机:利用色带靠针头进行打印的打印机,速度慢。
2、激光打印机:打印速度要快于喷墨打印机。
4. 针式打印机表格怎么做
打印机是不能制作文件的,需要在电脑端制作好文件,然后通过打印机打印就可以了。针式打印机一般是联想的DP系列,需要到联想图像的官网找到最新的驱动程序才可以使用。