Foxtable(狐表)用户栏目专家坐堂 → excel模板问题


  共有25人关注过本帖树形打印复制链接

主题:excel模板问题

帅哥哟,离线,有人找我吗?
aidimeng
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:830 积分:7966 威望:0 精华:0 注册:2015/9/14 14:26:00
excel模板问题  发帖心情 Post By:2025/5/21 10:51:00 [只看该作者]

图片点击可在新窗口打开查看
只导出选中行是为什么
导出代码
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter = "EXCEL文件|*.xlsx" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
 
    Dim Book As New XLS.Book(ProjectPath & "Attachments\合同导出模板.xlsx") 
Dim Sheet As XLS.Sheet 
Book.Build() 
Sheet = Book.Sheets(0)
Sheet(Sheet.Rows.Count, 0).Value = "制单人:" & User.Name 
    
    Book.Save(dlg.FileName & ".xlsx")
End If
excel模板
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113936 积分:580301 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/5/21 11:06:00 [只看该作者]


 回到顶部