此主题相关图片如下:qq图片20160903094716.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-9/2016939443261179.png)
设计了一窗口,窗口中对应着资产数据列表
我现在设计了一个"标签打印'的按钮如下,先单击点中我要打印的资产行,然后点"标签打印"按钮可以实现该资产卡片的打印.
Dim Book As New XLS.Book(ProjectPath & "Attachments\资产卡片.xls")
Dim fl As String = ProjectPath & "Reports\资产卡片.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Verb = "Print" '指定动作
Proc.Start()
我现在想实现像图中一样先任意选择多行,然后再点击“标签打印”按钮,实现选中行资产数据的卡片全部一起打印出来,请问如何实现?
我则看了帮助,发现此代码些现相近Tables("员工").ShowCheckBox = True
For Each r As Row In Tables("员工").GetCheckedRows
r.Delete
Next
请问我应该怎么将此代码结合进行能够实现。或是有别的代码可以实现,请大神们请教。