Foxtable(狐表)用户栏目专家坐堂 → 单元格多行


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

主题:单元格多行

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


加好友 发短信
等级:童狐 帖子:226 积分:1655 威望:0 精华:0 注册:2015/11/26 16:03:00
单元格多行  发帖心情 Post By:2017/2/27 18:45:00 [只看该作者]

请教一下,单元格中单列多行字符如何在打印出来的格式也保持多行,字段在打印文件的表头上
[此贴子已经被作者于2017/2/27 18:45:25编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108451 积分:551714 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/2/27 20:10:00 [只看该作者]

怎么样打印的?

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


加好友 发短信
等级:童狐 帖子:226 积分:1655 威望:0 精华:0 注册:2015/11/26 16:03:00
  发帖心情 Post By:2017/2/28 7:49:00 [只看该作者]

套打设置这列在table中是多行的,打印出来字全在一行上了
图片点击可在新窗口打开查看此主题相关图片如下:{6ae56379-ff46-4fda-8b26-dabbd21c86cc}.bmp
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108451 积分:551714 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/2/28 8:49:00 [只看该作者]

设置模板的时候,把单元格设置为“自动换行”

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/28 9:31:00 [只看该作者]

 可以生成以后,用vba处理下

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim fl As String = ProjectPath & "Reports\出库单.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿

 

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.WrapText = True
'Rg.EntireColumn.AutoFit   '自动调整列宽
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True

 


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


加好友 发短信
等级:童狐 帖子:226 积分:1655 威望:0 精华:0 注册:2015/11/26 16:03:00
  发帖心情 Post By:2017/2/28 16:09:00 [只看该作者]

谢谢,我去试下

 回到顶部