winform 根据Excel模版打印文件

原创 2013年12月06日 10:50:45
Dim app As New Excel.Application
Dim workbook As Excel.Workbook
Dim worksheet As Excel.Worksheet

Dim strFiled As String=String.Empty
Dim strPrintName As String=String.Empty

app.Visible = False
app.DisplayAlerts = False
workbook = app.Workbooks.Open(Excel文件)
worksheet = workbook.Sheets(1)

'根据ExcelSheet名选中模版
Dim bln As Boolean = False
For i As Integer = 1 To workbook.Sheets.Count
    If workbook.Sheets(i).Name.Equals(Me.txtSendTypeName.Text.Trim) Then
       worksheet = workbook.Sheets(i)
       bln = True
       Exit For
    End If
Next

If bln = False Then
   MsgBox("打印模板没有找到!")
Else
   worksheet.Select()
   With worksheet        
       '选中区域
        .Range("A1:AZ26").Select() 

       '替换区域
        app.Selection.Replace(What:=strFiled, Replacement:=Me.txtFiled.Text.Trim, LookAt:=Excel.XlLookAt.xlWhole, SearchOrder:=Excel.XlSearchOrder.xlByRows, MatchCase:=False, SearchFormat:=False,ReplaceFormat:=False)

        .Range("A1").Select()   
   End With

'设置默认打印机

Dim strDefaultPrinter As String = app.ActivePrinter If Not strPrintName.Trim.Equals("") Then       
    app.ActivePrinter = strDefaultPrinter '设置Excel的默认打印机    
End If

'打印
worksheet.PrintOut()

'指定默认打印机
app.ActivePrinter = strDefaultPrinterEnd If

'关闭Excel文件
workbook.Close()
app.Quit()
app = Nothing

说明:

Range.Replace 方法:

返回 Boolean,它表示指定区域内单元格中的字符。使用此方法并不会更改选定区域或活动单元格。

语法 表达式.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte, SearchFormat, ReplaceFormat)

参数 可选/必选 说明
What 必选 Excel 要搜索的字符串。
Replacement 必选 替换字符串。
LookAt 可选 可为以下 XlLookAt 常量之一:xlWhole 或 xlPart。
SearchOrder 可选 可为以下 XlSearchOrder 常量之一:xlByRows 或 xlByColumns。
MatchCase 可选 布尔值。如果为 True,则搜索区分大小写。
MatchByte 可选 只有在 Microsoft Excel 中选择或安装了双字节语言时,才能使用此参数。如果为 True,则双字节字符只与双字节字符匹配。如果为 False,则双字节字符可与其对等的单字节字符匹配。
SearchFormat 可选 该方法的搜索格式。
ReplaceFormat 可选 该方法的替换格式。

C# 设置Excel打印选项及打印excel文档

C# 设置Excel打印选项及打印excel文档 打印Excel文档是一个很常见的操作,但有时候我们会碰到各种不同的打印需求,例如只打印一个Excel工作表的其中一部分,或打印时每页都有表头,或把工作...
  • Eiceblue
  • Eiceblue
  • 2016年05月18日 17:13
  • 2967

c# 对excel数据进行打印

c# 对excel数据进行打印今天写的主要就是对报表的打印部分,打印栏中一个有三个功能,分别是打印浏览,直接打印,打印设置。当点击按钮时弹出菜单栏进行打印。这个地方并不难,先在窗体的任意地方建立一个M...
  • cyg2001
  • cyg2001
  • 2016年08月11日 18:13
  • 949

C#关于Excel导出及打印

添加DLL文件   Using: using Excel = Microsoft.Office.Interop.Excel;   调用: //Excel模板文件 string str...
  • u014741497
  • u014741497
  • 2014年04月16日 09:26
  • 2895

C# 打印Excel

  • 2014年07月16日 09:36
  • 736KB
  • 下载

C#创建与Excel打印输出(转载)

摘要:本文介绍了Excel对象、C#中的受管代码和非受管代码,并介绍了COM组件在.NET环境中的使用。 0 引言     Excel是微软公司办公自动化套件中的一个软件,他主要是用来处理电子表格...
  • kirawoo
  • kirawoo
  • 2015年06月19日 08:34
  • 960

C#创建、打开、读取、写入、保存Excel,Excel打印输出

摘要:本文介绍了Excel对象、C#中的受管代码和非受管代码,并介绍了COM组件在.NET环境中的使用。关键词:受管代码;非受管代码;Excel对象;动态连接库0 引言Excel是微软公司办公自动化套...
  • baogreat
  • baogreat
  • 2007年12月06日 22:22
  • 2812

C# 打印表格 winform打印Excel表格

  • 2009年10月28日 11:34
  • 198KB
  • 下载

C# 导出 Excel 和相关打印设置

源地址:http://blog.csdn.net/wanmingtom/article/details/6125599 Excel.Application myExcel = new Excel...
  • wobckr
  • wobckr
  • 2017年10月13日 15:56
  • 93

EXCEL表格打印 C# 打印调用excel表格打印操作excel文档

  • 2011年09月06日 16:06
  • 198KB
  • 下载

C# 导出 Excel 和相关打印设置(不断更新中)

Excel.Application myExcel = new Excel.Application(); Excel.Workbook workbookData = myExcel.Applicat...
  • wanmingtom
  • wanmingtom
  • 2011年01月09日 18:46
  • 11547
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:winform 根据Excel模版打印文件
举报原因:
原因补充:

(最多只允许输入30个字)