表格 问题 求助

xiang9897

.版本 2
.支持库 iext
.支持库 spec

线程_初始化COM库 ()
窗口_置焦点 (取窗口句柄 ())
' 激活 ()
标题 ＝ 全局_桩编号
超级列表框1.全部删除 ()
ex1.创建 ()
ex1.保留警告与否 (假)
ex1.打开EXCEL (全局_path)
.计次循环首 (100, i)
    name ＝ ex1.激活工作簿 (i)
    .如果真 (name ＝ “水下”)
        表下标 ＝ i
        跳出循环 ()
    .如果真结束
    调试输出 (name)
.计次循环尾 ()
调试输出 (name)
.变量循环首 (10, 19, 1, j)
    k ＝ 超级列表框1.插入表项 (, , , , , )
    .计次循环首 (9, i)
        y ＝ i － 1
        .判断开始 (i ＜ 4)
            i1 ＝ i ＋ 1
        .判断 (i ＜ 5)
            i1 ＝ i ＋ 2
        .判断 (i ＜ 7)
            i1 ＝ i ＋ 3
        .判断 (i ＜ 8)
            i1 ＝ i ＋ 4
        .判断 (i ＜ 10)
            i1 ＝ i ＋ 5
        .默认
            i1 ＝ i ＋ 6

        .判断结束

        列名 ＝ 数字到列名 (i1)
        .如果 (y ＜ 2)
            re ＝ 到小数 (ex1.读单元格文本 (表下标, 列名 ＋ 到文本 (j)))
            小时 ＝ 绝对取整 (re × 24)
            分钟 ＝ 绝对取整 ((re × 24 ％ 1) × 60 ＋ 0.0001)
            str ＝ 文本_自动补零 (到文本 (小时), 2) ＋ “:” ＋ 文本_自动补零 (到文本 (分钟), 2)
        .否则
            str ＝ ex1.读单元格文本 (表下标, 列名 ＋ 到文本 (j))
            .判断开始 (y ＝ 2 或 y ＝ 5)
                str ＝ 到文本 (四舍五入 (到小数 (str), 1))
            .判断 (y ＝ 7)
                str ＝ 到文本 (四舍五入 (到小数 (str), 0))
            .默认

            .判断结束


        .如果结束

        超级列表框1.置标题 (k, y, str)

    .计次循环尾 ()

.变量循环尾 ()
ex1.保存 ()
ex1.关闭工作薄 ()
ex1.关闭 ()
线程_取消COM库 ()

这个是打开表格把内容显示到超级列表框  读表格的行数了。行数少了，我现在只想用让他读取多点。    我要改那个位置 ？

狼※牙

要修改代码以实现读取更多行数，你需要做以下更改：

在第13行的计次循环首部分，将起始值修改为大于100的数字，例如200或300，这取决于你希望从表格中读取的更多行数。

  

计次循环首 (200, i)

.计次循环首 (200, i)

接下来，在第25行的变量循环首部分，你可以根据需要调整起始和结束值。起始值表示表格中的列索引，结束值表示结束的列索引。

  

变量循环首 (10, 19, 1, j)

.变量循环首 (10, 19, 1, j)

请确保表格中存在足够的行数供读取。如果表格中的行数不足以满足你的需求，你需要添加更多的行到表格中。另外，请确保所有的变量和函数都有正确的引用并按照预期工作。

记得保存并重新运行修改后的代码，它应该能够读取更多的行数并将内容显示在超级列表框中。如果你遇到任何错误或问题，请提供详细的错误信息以便我能够更好地帮助你。

鹏书

https://www.bilibili.com/video/BV1784y1u7S5/

po1718

变量循环首 (10, 19, 1, j)  
第1个参数10是开始值.
第2个参数19 是停止值.  改大这个值

国王软件

表格一键导入.zip (1.36 MB, 下载次数: 0)

2023-8-18 13:37 上传

点击文件名下载附件

可在原基础上修改操作

狼※牙

要修改代码以实现读取更多行数，你需要做以下更改：  在第13行的计次循环首部分，将起始值修改为大于100的数字，例如200或300，这取决于你希望从表格中读取的更多行数。  ```plaintext .计次循环首 (200, i) ```  接下来，在第25行的变量循环首部分，你可以根据需要调整起始和结束值。起始值表示表格中的列索引，结束值表示结束的列索引。  ```plaintext .变量循环首 (10, 19, 1, j) ```  请确保表格中存在足够的行数供读取。如果表格中的行数不足以满足你的需求，你需要添加更多的行到表格中。另外，请确保所有的变量和函数都有正确的引用并按照预期工作。  记得保存并重新运行修改后的代码，它应该能够读取更多的行数并将内容显示在超级列表框中。如果你遇到任何错误或问题，请提供详细的错误信息以便我能够更好地帮助你。

xiang9897

狼※牙 发表于 2023-8-18 14:23
要修改代码以实现读取更多行数，你需要做以下更改：

在第13行的计次循环首部分，将起始值修改为大于100的 ...

变量循环首 (10, 19, 1, j)   这是代表什么意思呢？