FM：ALSM_EXCEL_TO_INTERNAL_TABLE 是上载Excel文件的一个函数，但是这个函数有两个限制。
一是每个CELL只能导入前50个字符，二是如果超过9999行，行号会初始化为从零开始
其实解决起来很简单，只要改一下结构 ALSMEX_TABLINE 的字段就行了，然后COPY
SPAN {
font-family: "新宋体";
font-size: 11pt;
color: #000000;
background: #C0C0C0;
}
ALSM_EXCEL_TO_INTERNAL_TABLE 为
SPAN {
font-family: "新宋体";
font-size: 11pt;
color: #000000;
background: #C0C0C0;
}
ZALSM_EXCEL_TO_INTERNAL_TABLE ，并做少许改动即可。
另外，如果要上载有打开密码保护的Excel，只要修改一下OLE的 OPEN 语句即可。
以及导入指定的Sheet等。。
注意COPY出来的函数的
SPAN {
font-family: "新宋体";
font-size: 11pt;
color: #000000;
background: #C0C0C0;
}
.L1S52 {
color: #0000FF;
}
Global Data 里面应该有下列语句：
TYPE-POOLS: ole2.
TYPES: ty_d_itabvalue TYPE zalsmex_tabline-value,
ty_t_itab TYPE zalsmex_tabline OCCURS 0,
BEGIN OF ty_s_senderline,
line(4096) TYPE c,
END OF ty_s_senderline,
ty_t_sender TYPE ty_s_senderline OCCURS 0.
CONSTANTS: gc_esc VALUE '"'.
ty_t_itab TYPE zalsmex_tabline OCCURS 0,
BEGIN OF ty_s_senderline,
line(4096) TYPE c,
END OF ty_s_senderline,
ty_t_sender TYPE ty_s_senderline OCCURS 0.
CONSTANTS: gc_esc VALUE '"'.
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/23495244/viewspace-694698/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
限制同名程序同时只运行一个
下一篇：
用OLE获取Excel的Sheet名
请登录后发表评论
登录
全部评论
