找回密码
 立即注册

QQ登录

只需一步,快速开始

萌新小白

注册会员

9

主题

47

帖子

130

积分

注册会员

积分
130
萌新小白
注册会员   /  发表于:2023-8-24 09:57  /   查看:2302  /  回复:3
1金币
ar11升级到ar16后,后台导出Excel报表会自动合并一些单元格,之前的版本并不会,升级后变更导出方法后就这样了,有属性可以控制不合并单元格吗

最佳答案

查看完整内容

确实之前有这种情况,可以考虑使用宏的方法: https://gcdn.grapecity.com.cn/showtopic-184343-1-4.html 使用Excel的脚本实现。操作如上所述,然后删除的脚本可以直接导入如下的:

3 个回复

倒序浏览
最佳答案
最佳答案
Felix.LiWyn认证
超级版主   /  发表于:2023-8-24 09:57:56
来自 4#
确实之前有这种情况,可以考虑使用宏的方法:

https://gcdn.grapecity.com.cn/showtopic-184343-1-4.html

使用Excel的脚本实现。操作如上所述,然后删除的脚本可以直接导入如下的:


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复 使用道具 举报
Bella.YuanWyn认证
超级版主   /  发表于:2023-8-24 11:17:57
2#
您好,针对导出excel文件行或列会自动合并的问题,我记得之前有客户发过帖子,我们也反馈过我们开发同事,开发同事回复导出excel后,excel上做了处理导致的,目前AR上控制不了。您上传个截图,我看看是不是同一个问题,猜测应该是同一个问题。
回复 使用道具 举报
萌新小白
注册会员   /  发表于:2023-8-24 13:42:08
3#
Bella.Yuan 发表于 2023-8-24 11:17
您好,针对导出excel文件行或列会自动合并的问题,我记得之前有客户发过帖子,我们也反馈过我们开发同事, ...
  1. Dim psDownLoadFileName As String = strPrintID &
  2.                                  My.Resources.FixedValue.UnderLine &
  3.                                  strPrintName &
  4.                                  My.Resources.FixedValue.UnderLine &
  5.                                  Now.ToString(My.Resources.FixedValue.DateFormat_YMDHMSF) &
  6.                                  My.Resources.FixedValue.ExcelExtenstion2007

  7.             Dim excelSetting As New Export.Excel.Page.ExcelRenderingExtensionSettings()
  8.             excelSetting.FileFormat = Export.Excel.Page.FileFormat.Xlsx
  9.             excelSetting.Pagination = False

  10.             Dim setting As Extensibility.Rendering.ISettings = excelSetting
  11.             Dim excelRenderingExtension As New Export.Excel.Page.ExcelRenderingExtension()
  12.             Dim memoryProvider As New Rendering.IO.MemoryStreamProvider()
  13.             rpt.Document.Render(excelRenderingExtension, memoryProvider, setting.GetSettings())
  14.             Response.ContentType = My.Resources.FixedValue.Application_Excel
  15.             Response.AddHeader(My.Resources.FixedValue.ResponseHeader_Key_Disposition,
  16.                                  My.Resources.FixedValue.ResponseHeader_Key_Attach &
  17.                                  My.Resources.FixedValue.Semicolon &
  18.                                  My.Resources.FixedValue.ResponseHeader_Key_FileName &
  19.                                  My.Resources.FixedValue.Equal &
  20.                                  UrlEncode(psDownLoadFileName, System.Text.Encoding.UTF8))
  21.             Dim secondaryStream As MemoryStream = DirectCast(memoryProvider.GetPrimaryStream().OpenStream(), MemoryStream)
  22.             Response.BinaryWrite(secondaryStream.ToArray())
  23.             Response.Flush()
  24.             Response.End()
复制代码
代码和生成的Excel截图上传了。

文件问题点:
1,打开文件报错,怀疑和合并单元格有关。
2,文件第一行行高自动缩小了。
3,跨单元格显示的项目自动合并单元格了。(第一列和最后一列)。
4,中间个别项目列宽缩小到最小并且合并单元格了。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 立即注册
返回顶部