按键精灵同时读取表格A列10行数据怎么写代码？

发布网友 发布时间：2022-04-21 03:47

我来回答

共5个回答

热心网友 时间：2023-11-05 04:56

Step1: 打开按键精灵，点击“脚本”-> “新建脚本”，在打开的页面中按照如下步骤操作；
Step2: 点击“Excel”->“输入数据”，设置 Excel 的工作表名称，FileName 为 Excel 的文件名，CellName 为 A 列的单元格，Count 为 10；
Step3: 点击“循环”->“无限循环”->插入“输入数据”按钮，在 CellName 中输入下一个需要读取的 A 列单元格，比如它上一个读取的是 A1，则下一个需要读取的就是 A11；
Step4: 点击“断点”->“暂停脚本”，用于暂停脚本并输出读取的数据；
Step5: 点击“保存脚本”，保存这个脚本文件；
Step6: 关闭 Excel，重新打开按键精灵，点击“运行”->“运行脚本”，选择0刚才保存的脚本，点击“确定”开始运行该脚本，按照步骤一次读取A列10条数据输出，依次往下；追问无法操作，系统不能识别

热心网友 时间：2023-11-05 04:57

dim a, text
Call Plugin.Office.OpenXls("C:\AA.xls")
a = 1
x = 1
y = 2
for i = 1 to 10
text = Plugin.Office.ReadXls(1, a, 1)
a = a + 1
Call Plugin.Office.WriteXls(2, x, 1, text)
x = x + 1
Call Plugin.Office.WriteXls(2, y, 1, text)
y = y + 1
next
上面代码中，使用for循环读取A列的第1~10行数据，并依次写入B列和C列的对应位置。
如果需要读取多列，可以在for循环中嵌套循环，再调用ReadXls和WriteXls函数即可。
如果需要读取A列10条数据输出，在依次读取另外10条输出，可以在外层循环中加一个循环变量来实现，假设每次读取10条数据，总共读取100条数据，可以这样写：
dim a, text
Call Plugin.Office.OpenXls("C:\AA.xls")
a = 1
x = 1
y = 2
for i = 1 to 10
for j = 1 to 10
text = Plugin.Office.ReadXls(1, a, 1)
a = a + 1
Call Plugin.Office.WriteXls(2, x, 1, text)
x = x + 1
Call Plugin.Office.WriteXls(2, y, 1, text)
y = y + 1
next
next
上面代码中，外层循环i控制每次读取10条数据，内层循环j控制读取A列第1~10行数据，实现读取A

热心网友 时间：2023-11-05 04:57

您可以使用按键精灵中的循环语句来实现这个功能。代码类似如下：
// 设置每次读取的数据条数
const int per_count = 10;
// 读取总条数
const int total_count = 100;
// 循环次数
const int loop_count = total_count / per_count;
// 循环读取数据
for (int i = 0; i < loop_count; ++i) {
// 读取A列的第i*per_count+1到(i+1)*per_count条数据
// 例如第一次读取A列的第1到10条数据，第二次读取第11到20条数据
// 读取方法可以使用按键精灵提供的EXCEL读取函数
// 输出方法可以使用按键精灵提供的输出函数
}
希望这些信息能够帮助您解决问题。追问放在按键精灵中不能用

热心网友 时间：2023-11-05 04:58

按键精灵里的插件命令：
//定义变量//
dim a,text
Call Plugin.Office.OpenXls(C:\AA.xls)
a = 1
x = 1
y = 2
//读取表格，括号内第2个是行，第3个是列//
Text = Plugin.Office.ReadXls(1, a, 1)
a = a + 1
//写入指定位置//
Call Plugin.Office.WriteXls(2, x, 1, text)
x = x + 1
Call Plugin.Office.WriteXls(2, y, 1, text)
y = y + 1

如果需要读取B列，C列，就定义多几个变量，最后写个循环命令就行了。

热心网友 时间：2023-11-05 04:59

//设置变量i,jvar i,j;//循环读取A列10行数据for(i=1;i<=10;i++){ //获取第i行A列的值 j=Excel_ReadCell("A"+i); //输出第i行A列的值 Dialog_ShowMessage(j);}