高级表格几个问题

丰晨软件

  

子程序名	返回值类型	公开	备 注
_拖放对象1_得到文件
参数名	类 型	参考	可空	数组	备 注
接收到的文件路径	文本型

变量名	类 型	静态	数组	备 注
文件名	文本型
已用行数	整数型
单元格数据	变体型
变体	变体型类
i	整数型

文件名 ＝ 文件_取文件名 (接收到的文件路径, 假)
判断 (Excel.打开文件 (接收到的文件路径, , 真, , ) ＝ 真)
单元格.置程序 (Excel)
判断 (文件名 ＝ “美团菜品”)
已用行数 ＝ 单元格.取已用行数 ()
单元格数据 ＝ 单元格.极速_取文本值 (1, “A1:O1” ＋ 到文本 (已用行数), )  ' 批量读取区域数据
变体.易_置数组变量 (单元格数据)
高级表格_数据列表.清空数据 ()
高级表格_数据列表.表头列数 ＝ 0
高级表格_数据列表.行数 ＝ 已用行数
高级表格_数据列表.列数 ＝ 15
计次循环首 (已用行数, i)  ' 将指定列数据放入高级表格
高级表格_数据列表.置数据 (i － 1, 0, 1, 变体.易_取文本型 (i, 1))  ' 菜品编码
高级表格_数据列表.置数据 (i － 1, 1, 1, 变体.易_取文本型 (i, 2))  ' 菜品名称
高级表格_数据列表.置数据 (i － 1, 2, 1, 变体.易_取文本型 (i, 3))  ' 菜品英文名称
高级表格_数据列表.置数据 (i － 1, 3, 1, 变体.易_取文本型 (i, 4))  ' 所属菜类
高级表格_数据列表.置数据 (i － 1, 4, 1, 变体.易_取文本型 (i, 5))  ' 菜品价格
高级表格_数据列表.置数据 (i － 1, 5, 1, 变体.易_取文本型 (i, 6))  ' 会员价格
高级表格_数据列表.置数据 (i － 1, 6, 1, 变体.易_取文本型 (i, 7))  ' 菜品单位
高级表格_数据列表.置数据 (i － 1, 7, 1, 变体.易_取文本型 (i, 8))  ' 是否停用
高级表格_数据列表.置数据 (i － 1, 8, 1, 变体.易_取文本型 (i, 9))  ' 是否称重
高级表格_数据列表.置数据 (i － 1, 9, 1, 变体.易_取文本型 (i, 10))  ' 推荐度
高级表格_数据列表.置数据 (i － 1, 10, 1, 变体.易_取文本型 (i, 11))  ' 辣度
高级表格_数据列表.置数据 (i － 1, 11, 1, 变体.易_取文本型 (i, 12))  ' 是否时价
高级表格_数据列表.置数据 (i － 1, 12, 1, 变体.易_取文本型 (i, 13))  ' 是否提成
高级表格_数据列表.置数据 (i － 1, 13, 1, 变体.易_取文本型 (i, 14))  ' 提成类型
高级表格_数据列表.置数据 (i － 1, 14, 1, 变体.易_取文本型 (i, 15))  ' 提成比例/固定金额
计次循环尾 ()



调试输出 (“打开工作簿文件失败！”)

子程序名	返回值类型	公开	备 注
_按钮_导出指定格式_被单击

变量名	类 型	静态	数组	备 注
i	整数型
名称	文本型
首拼	文本型
实体卡号	文本型
工作簿数量	整数型
行数	整数型
变体	变体型类
取回数据	变体型
指定行数	整数型

按钮_导出指定格式.禁止 ＝ 真
指定行数 ＝ 到整数 (编辑框_行数.内容)
判断 (高级表格_数据列表.行数 ＜ 指定行数)
工作簿数量 ＝ 1
工作簿数量 ＝ 高级表格_数据列表.行数 ÷ 指定行数 ＋ 1

计次循环首 (工作簿数量, n)
写到文件 (取运行目录 () ＋ “\菜品_” ＋ 到文本 (n) ＋ “.xlsx”, #菜品 )
判断 (Excel.打开文件 (取运行目录 () ＋ “\菜品_” ＋ 到文本 (n) ＋ “.xlsx”, , 假, , ) ＝ 真)
调试输出 (“打开模版成功”)
判断 (工作簿数量 ＝ 1)
行数 ＝ 高级表格_数据列表.行数 ％ 指定行数 － 1
判断 (n ＝ 工作簿数量)
行数 ＝ 高级表格_数据列表.行数 ％ 指定行数 － 1
行数 ＝ 指定行数
' 利用变体型二维数组快速写入数据
变体.易_创建数组 (, 行数, 1)
取回数据 ＝ 变体.易_取数组变量 ()
变体.易_清除数组 ()
' 利用变体型二维数组快速写入数据
变体.易_创建数组 (, 行数, 15)
计次循环首 (行数, i)
‘变体.易_置文本型 (i, 1, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 1))  ’此项是设置编号的，需要自动生成编号 001  002 003 …
变体.易_置文本型 (i, 2, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 2))
变体.易_置文本型 (i, 3, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 3))
变体.易_置文本型 (i, 4, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 4))
变体.易_置文本型 (i, 5, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 5))
变体.易_置文本型 (i, 6, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 6))
变体.易_置文本型 (i, 7, 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 7))
变体.易_置文本型 (i, 8, “否”)
变体.易_置文本型 (i, 9, “否”)
变体.易_置文本型 (i, 10, “不推荐”)
变体.易_置文本型 (i, 11, “无辣”)
变体.易_置文本型 (i, 12, “否”)
变体.易_置文本型 (i, 13, “停用”)
变体.易_置文本型 (i, 14, “固定提成比例”)
变体.易_置文本型 (i, 15, “0”)
计次循环尾 ()
变体.易_创建数组 (, 行数, 1)
计次循环首 (行数, i)
名称 ＝ 高级表格_数据列表.取数据 ( (n － 1) × 指定行数 ＋ i, 1)
首拼 ＝ 文本_取首拼 (名称)
变体.易_置文本型 (i, 1, 首拼)
计次循环尾 ()
取回数据 ＝ 变体.易_取数组变量 ()
变体.易_清除数组 ()
单元格.置变体文本值 (1, “C2:C” ＋ 到文本 (行数 ＋ 1), 取回数据)
Excel.警告消息关闭 ()
Excel.保存 (“1”)
Excel.警告消息显示 ()
Excel.关闭所有工作簿 ()

调试输出 (“打开模版失败”)

计次循环尾 ()
按钮_导出指定格式.禁止 ＝ 假

i支持库列表	支持库注释
eGrid	高级表格支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 eGrid<br /> .支持库 spec<br /> <br /> .子程序 _拖放对象1_得到文件<br /> .参数 接收到的文件路径, 文本型<br /> .局部变量 文件名, 文本型<br /> .局部变量 已用行数, 整数型<br /> .局部变量 单元格数据, 变体型<br /> .局部变量 变体, 变体型类<br /> .局部变量 i, 整数型<br /> <br /> 文件名 ＝ 文件_取文件名 (接收到的文件路径, 假)<br /> .判断开始 (Excel.打开文件 (接收到的文件路径, , 真, , ) ＝ 真)<br />     单元格.置程序 (Excel)<br />     .判断开始 (文件名 ＝ “美团菜品”)<br />         已用行数 ＝ 单元格.取已用行数 ()<br />         单元格数据 ＝ 单元格.极速_取文本值 (1, “A1:O1” ＋ 到文本 (已用行数), )  ' 批量读取区域数据<br />         变体.易_置数组变量 (单元格数据)<br />         高级表格_数据列表.清空数据 ()<br />         高级表格_数据列表.表头列数 ＝ 0<br />         高级表格_数据列表.行数 ＝ 已用行数<br />         高级表格_数据列表.列数 ＝ 15<br />         .计次循环首 (已用行数, i)  ' 将指定列数据放入高级表格<br />             高级表格_数据列表.置数据 (i － 1, 0, 1, 变体.易_取文本型 (i, 1))  ' 菜品编码<br />             高级表格_数据列表.置数据 (i － 1, 1, 1, 变体.易_取文本型 (i, 2))  ' 菜品名称<br />             高级表格_数据列表.置数据 (i － 1, 2, 1, 变体.易_取文本型 (i, 3))  ' 菜品英文名称<br />             高级表格_数据列表.置数据 (i － 1, 3, 1, 变体.易_取文本型 (i, 4))  ' 所属菜类<br />             高级表格_数据列表.置数据 (i － 1, 4, 1, 变体.易_取文本型 (i, 5))  ' 菜品价格<br />             高级表格_数据列表.置数据 (i － 1, 5, 1, 变体.易_取文本型 (i, 6))  ' 会员价格<br />             高级表格_数据列表.置数据 (i － 1, 6, 1, 变体.易_取文本型 (i, 7))  ' 菜品单位<br />             高级表格_数据列表.置数据 (i － 1, 7, 1, 变体.易_取文本型 (i, 8))  ' 是否停用<br />             高级表格_数据列表.置数据 (i － 1, 8, 1, 变体.易_取文本型 (i, 9))  ' 是否称重<br />             高级表格_数据列表.置数据 (i － 1, 9, 1, 变体.易_取文本型 (i, 10))  ' 推荐度<br />             高级表格_数据列表.置数据 (i － 1, 10, 1, 变体.易_取文本型 (i, 11))  ' 辣度<br />             高级表格_数据列表.置数据 (i － 1, 11, 1, 变体.易_取文本型 (i, 12))  ' 是否时价<br />             高级表格_数据列表.置数据 (i － 1, 12, 1, 变体.易_取文本型 (i, 13))  ' 是否提成<br />             高级表格_数据列表.置数据 (i － 1, 13, 1, 变体.易_取文本型 (i, 14))  ' 提成类型<br />             高级表格_数据列表.置数据 (i － 1, 14, 1, 变体.易_取文本型 (i, 15))  ' 提成比例/固定金额<br />         .计次循环尾 ()<br />     .默认<br /> <br />     .判断结束<br /> <br /> .默认<br />     调试输出 (“打开工作簿文件失败！”)<br /> .判断结束<br /> <br /> <br /> .子程序 _按钮_导出指定格式_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 名称, 文本型<br /> .局部变量 首拼, 文本型<br /> .局部变量 实体卡号, 文本型<br /> .局部变量 工作簿数量, 整数型<br /> .局部变量 行数, 整数型<br /> .局部变量 变体, 变体型类<br /> .局部变量 取回数据, 变体型<br /> .局部变量 指定行数, 整数型<br /> <br /> 按钮_导出指定格式.禁止 ＝ 真<br /> 指定行数 ＝ 到整数 (编辑框_行数.内容)<br /> .判断开始 (高级表格_数据列表.行数 ＜ 指定行数)<br />     工作簿数量 ＝ 1<br /> .默认<br />     工作簿数量 ＝ 高级表格_数据列表.行数 ÷ 指定行数 ＋ 1<br /> .判断结束<br /> <br /> .计次循环首 (工作簿数量, n)<br />     写到文件 (取运行目录 () ＋ “\菜品_” ＋ 到文本 (n) ＋ “.xlsx”, #菜品)<br />     .判断开始 (Excel.打开文件 (取运行目录 () ＋ “\菜品_” ＋ 到文本 (n) ＋ “.xlsx”, , 假, , ) ＝ 真)<br />         调试输出 (“打开模版成功”)<br />         .判断开始 (工作簿数量 ＝ 1)<br />             行数 ＝ 高级表格_数据列表.行数 ％ 指定行数 － 1<br />         .判断 (n ＝ 工作簿数量)<br />             行数 ＝ 高级表格_数据列表.行数 ％ 指定行数 － 1<br />         .默认<br />             行数 ＝ 指定行数<br />         .判断结束<br />         ' 利用变体型二维数组快速写入数据<br />         变体.易_创建数组 (, 行数, 1)<br />         取回数据 ＝ 变体.易_取数组变量 ()<br />         变体.易_清除数组 ()<br />         ' 利用变体型二维数组快速写入数据<br />         变体.易_创建数组 (, 行数, 15)<br />         .计次循环首 (行数, i)<br /> ‘变体.易_置文本型 (i, 1, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 1))  ’此项是设置编号的，需要自动生成编号 001  002 003 …<br />             变体.易_置文本型 (i, 2, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 2))<br />             变体.易_置文本型 (i, 3, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 3))<br />             变体.易_置文本型 (i, 4, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 4))<br />             变体.易_置文本型 (i, 5, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 5))<br />             变体.易_置文本型 (i, 6, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 6))<br />             变体.易_置文本型 (i, 7, 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 7))<br />             变体.易_置文本型 (i, 8, “否”)<br />             变体.易_置文本型 (i, 9, “否”)<br />             变体.易_置文本型 (i, 10, “不推荐”)<br />             变体.易_置文本型 (i, 11, “无辣”)<br />             变体.易_置文本型 (i, 12, “否”)<br />             变体.易_置文本型 (i, 13, “停用”)<br />             变体.易_置文本型 (i, 14, “固定提成比例”)<br />             变体.易_置文本型 (i, 15, “0”)<br />         .计次循环尾 ()<br />         变体.易_创建数组 (, 行数, 1)<br />         .计次循环首 (行数, i)<br />             名称 ＝ 高级表格_数据列表.取数据 ((n － 1) × 指定行数 ＋ i, 1)<br />             首拼 ＝ 文本_取首拼 (名称)<br />             变体.易_置文本型 (i, 1, 首拼)<br />         .计次循环尾 ()<br />         取回数据 ＝ 变体.易_取数组变量 ()<br />         变体.易_清除数组 ()<br />         单元格.置变体文本值 (1, “C2:C” ＋ 到文本 (行数 ＋ 1), 取回数据)<br />         Excel.警告消息关闭 ()<br />         Excel.保存 (“1”)<br />         Excel.警告消息显示 ()<br />         Excel.关闭所有工作簿 ()<br /> <br />     .默认<br />         调试输出 (“打开模版失败”)<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 按钮_导出指定格式.禁止 ＝ 假

1、读取没有任何问题，写入的时候为什么会总弹出保存按钮呢？
2、写入的时候最后两项没有写进去是什么原因？ 变体.易_置文本型 (i, 14, “固定提成比例”)   变体.易_置文本型 (i, 15, “0”)  这两项无法写入。
3、菜品编码需要按排序自动输入改怎么样写呢，例如 001 002 003 …

丰晨软件

第三点我想把
高级表格_数据列表.置数据 (i － 1, 13, 1, 变体.易_取文本型 (i, 14))  ' 提成类型
高级表格_数据列表.置数据 (i － 1, 14, 1, 变体.易_取文本型 (i, 15))  ' 提成比例/固定金额     

以上两条读取的内容写以下指定内容，无法写入不知道什么原因。

变体.易_置文本型 (i, 14, “固定提成比例”)
变体.易_置文本型 (i, 15, “0”)

xf702

丰晨软件 发表于 2024-11-12 10:26
第三点我想把
高级表格_数据列表.置数据 (i － 1, 13, 1, 变体.易_取文本型 (i, 14))  ' 提成类型
高级表 ...

置数据，不报错，那列数查看一下是否够？自动编号为00X？序号一般为整数型，前面加00，估计需要变为文本型+整数型。。

丰晨软件

xf702 发表于 2024-11-12 21:42
置数据，不报错，那列数查看一下是否够？自动编号为00X？序号一般为整数型，前面加00，估计需要变为文本 ...

别的列都写出成功了，就这两项写出的是空白，我想写出 固定提成比例 和 数字0  就是无法写出

xf702

丰晨软件 发表于 2024-11-13 09:30
别的列都写出成功了，就这两项写出的是空白，我想写出 固定提成比例 和 数字0  就是无法写出 ...

只有盲猜盲试了。。，看看取出的是不是文本型了；加个“高级表格1.置列类型 (, )”试试。。

丰晨软件

xf702 发表于 2024-11-13 09:49
只有盲猜盲试了。。，看看取出的是不是文本型了；加个“高级表格1.置列类型 (, )”试试。。 ...

不取出也行 直接写入也行 但是也写不了 下面这些都能写入 唯独14 15不让写入

变体.易_置文本型 (i, 8, “否”)
变体.易_置文本型 (i, 9, “否”)
变体.易_置文本型 (i, 10, “不推荐”)
变体.易_置文本型 (i, 11, “无辣”)
变体.易_置文本型 (i, 12, “否”)
变体.易_置文本型 (i, 13, “停用”)

aipca

1、https://www.eyuyan.la/post/15653.html 这里参考一下用时间搓来解决；
2、输出设试看看这两列有没有什么问题。
3、用精易模块自动补零给它补齐

  

判断 (i ＜ 100)
调试输出 (文本_自动补零 (到文本 (i), 3))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br />     .判断开始 (i ＜ 100)<br />         调试输出 (文本_自动补零 (到文本 (i), 3))<br />     .默认