FlexCell用户自定义打印模板

'说明:现在只能加载一张图片
Private Sub Form_Load()
    Dim imageRow As Long    '图片所在的行
    Dim imageCol As Long    '图片所在的列
    Dim imagHeight As Long '图片所在行的高度
    Dim ImageBln As Boolean    'True   存在有图片单元格
    With Grid1
         '——————————————————————————————————
         '说明:取得模块的基本信息
         ImageBln = False
         '加载文件
        .OpenFile "c:/1.cel"
        '判断表格是否存在有图片单元格,如果有,取得表格的宽度和高度
        For i = 1 To .Rows - 1
            For j = 1 To .Cols - 1
                If .Cell(i, j).ImageKey <> "" Then
                    imageRow = i '图片所在的行
                    imageCol = j '图片所在的列
                    imagHeight = .RowHeight(i)
                    ImageKey = .Cell(i, j).ImageKey '图片关键字
                    ImageBln = True '存在图片单元格
                End If
            Next
        Next

         '取得行数
         Row = .Rows - 1

         '选中,并复制
        .Range(1, 1, Row, .Cols - 1).Selected
        .Selection.CopyData
        .AutoRedraw = False
        '——————————————————————————————————
        '——————————————————————————————————
        '说明:加载数据
        For i = 1 To 10
            '插入行:和选中的行数一样
            .Selection.InsertRows
            .Range(1, 1, Row, .Cols - 1).Selected
            '选中粘贴数据
            .Selection.PasteData
            '判断是否存在有图片
            If ImageBln Then
                .Cell(imageRow, imageCol).SetImage ImageKey
                .RowHeight(imageRow) = imagHeight
            End If
            '分页符
            .HPageBreaks.Add Row + 1
        Next
        '——————————————————————————————————
         .Refresh
        .AutoRedraw = True
    End With
End Sub

FlexCell用户自定义打印模板相关推荐

U9单据打印模板自定义扩展字段显示名称
UBF打印模板中,单据自定义扩展字段显示均为扩展字段值集值编码,而在实际运用过程中打印时需要显示扩展字段名称,具体实现方法如下方式一:采用SQL系统定义函数[dbo].[fn_GetSegName] ...
ERP用户自定义打印
前言既然说用户自定义打印,说的肯定是ERP所不具备的打印功能. 在我看来,一般的打印一共分三种: 1.批量打印 2.表单打印 3.标签打印批量打印我用一个简单的例子来说明一下: 模拟数据: 预览 ...
实现用户自定义Excel模板
2019独角兽企业重金招聘Python工程师标准>>> 需求背景: 在Excel的实际使用过程中,动态生成报表.导出报表等都是最终用户常常使用的功能,使用常规的方式针对模板中具体的每 ...
itextdef将动态html转为pdf,[C#]使用第三方开源库iText7.pdfHtml，将Html转换成Pdf，以及如何以Html作为打印模板...
使用第三方开源库iText7.pdfHtml,将html和css转成pdf,官方:https://itextpdf.com/en/demos/convert-html-css-to-pdf-free- ...
java 绘图打印_java调用本地打印机，绘制打印模板，小票模板
文章目录 jar资源绘制打印模板 import java.awt.Color; import java.awt.Font; import java.awt.Graphics; import java ...
XtraReport通过动态设置打印模板进行标签打印
如题所述,之前的打印都是通过程序内写好的模板进行打印.但是问题很快就暴露出来了,不同的打印机,不能适应同一个打印模板,有些还需要进行比较大的调整,所以就需要在打印之前,能够对模板上的控件的位置进行一定 ...
追加审批人样式html,更新 | 你的审批打印模板真丑！看别人用html模板怎么玩
更新简报1.html打印模版正式上线,操作更便捷,小白也能快速上手,模板更多样: 2.合同支持打印,无需每次额外制作其他纸质合同留档,一键轻松搞定: 3.选项类控件支持设置对应选项分数,测评结果可以自 ...
打印模板-Zebra指令
打印模板 1.Zebra指令(包括:一维码,二维码,横线,竖线,图片) 通过找IP地址的方式传输给打印机(必须是后台和打印机必须是再同一个网段) public bool PrintZPL(Barcod ...
用友U8如何调整凭证打印模板
用友U8如何调整凭证打印模板用友公司UFERPU8系统总帐系统中的凭证打印格式(包括套打和非套打的凭证打印格式)如果不能满足用户需要,可以进行适当调整.方法如下: 1．首先,必须在您的系统中安装用友 ...

FlexCell用户自定义打印模板

FlexCell用户自定义打印模板相关推荐

最新文章

热门文章