Question

按键精灵脚本 判断 黏贴板/粘贴版

我的工作内容如下
将一个excel录入系统，需要可循环

步骤1：工作开始【省略】然后选择到判断单元格
步骤2：复制单元格
步骤3：判断 复制的内容
步骤4：【复制的数字为1、2、3】
如果是1或者2 进行 操作A
如果是2 进行 操作B
如果以上都不是 ，报错 停止循环
步骤5：完成剩下的操作，完成一次工作，从步骤1开始重复。

希望有经验的高手给予帮助
指点一下判断部分【步骤4】
也可以直接在步骤4结束，我可以把步骤5的内容加到步骤四后面
我只会简单的编辑输入，条件语句不会。
=====================================
好吧，重新写详细的

步骤1：
工作开始，前期的功能
【我已经写好了这部分代码，就是复制单元格，切换到工作界面，粘贴。我就不全部写上来了，这一段省略。。。。】
然后选择到需要判断单元格，并复制单元格。
【此单元格中数字为1、2、3】

步骤3：
判断 复制的内容
如果是1或者2 进行 操作A
如果是3 进行 操作B
如果以上都不是 ，报错 停止循环

步骤4：
完成剩下的操作（复制粘贴复制粘贴。。。），完成一次循环。然后从步骤1开始重复。

希望有经验的高手给予帮助
指点一下判断部分【步骤3】
如果步骤4对编写代码带来麻烦，也可以直接在步骤3结束，我可以把步骤4的内容加到步骤四后面。

Answer 1

//之前的单元格选择,脚本循环你自己处理,下面从你选中要复制的单元格开始
KeyDown 17, 1
KeyPress 67, 1
KeyUp 17, 1//这三句是复制你选中的单元格
n = Plugin.Sys.GetCLB()//获取剪切板内容
Select Case n//下面对单元格内容进行判断
Case 1//如果内容是1就执行操作A
Call a()
Case 2//如果内容是2就执行操作A
Call a()
Case 3//如果内容是3就执行操作B
Call b()
Case Else//如果内容都不是就报错停止脚本
MessageBox "错误"
EndScript
End Select
sub a()
//这儿放你的操作A
end sub
sub b()
//这儿放你的操作B
end sub
//如有其他问题可以继续追问

追问

这样试了一下，都是“错误” 。我没有修改你的代码，就是在//这儿放你的操作里面放了两个弹出窗口

追答

我试了一下确实发现有问题
需要在
n = Plugin.Sys.GetCLB()//获取剪切板内容

后面加一句
n=int(n)