excel中用VBA设置代码
发布网友
发布时间：2022-04-30 04:54
共1个回答
热心网友
时间：2023-10-14 09:47
理解1是要设置数据有效性。处理方式：选中B列，然后，选择“数据→有效性”菜单，打开“数据有效性”对话框，在“设置”选项卡的有效条件“允许”处选择“自定义”，在出现的“公式”下面的方框中输入公式“=AND(LEN(B1)=26,ISNUMBER(B1))”，再选择“出错警告”选项卡并设置为“停止”，确定返回。这样，但输入的号码位数不正确或不是数字时，系统会给出提示。
理解2是要C列显示B列中的内容是否合法。处理方式：在C列第一个单元格写公式“=IF(AND(LEN(B1)=26,ISNUMBER(B1)),"正确","错误") ”，然后下拉填充所有C列。
理解1和2结合，那你依步骤设置就行。
以上理解全部错误，就要VBA实现。这个也简单，选录制宏，然后按以上步骤操作，完成后查看录制的代码，就生成了VBA代码。最终结果一样。
给你简单说下我的需求吧，我现在有一个标签是26位的，标签明码都是一样的，防错使用，最好是vba程序编写
热心网友
时间：2023-10-14 09:47
理解1是要设置数据有效性。处理方式：选中B列，然后，选择“数据→有效性”菜单，打开“数据有效性”对话框，在“设置”选项卡的有效条件“允许”处选择“自定义”，在出现的“公式”下面的方框中输入公式“=AND(LEN(B1)=26,ISNUMBER(B1))”，再选择“出错警告”选项卡并设置为“停止”，确定返回。这样，但输入的号码位数不正确或不是数字时，系统会给出提示。
理解2是要C列显示B列中的内容是否合法。处理方式：在C列第一个单元格写公式“=IF(AND(LEN(B1)=26,ISNUMBER(B1)),"正确","错误") ”，然后下拉填充所有C列。
理解1和2结合，那你依步骤设置就行。
以上理解全部错误，就要VBA实现。这个也简单，选录制宏，然后按以上步骤操作，完成后查看录制的代码，就生成了VBA代码。最终结果一样。
给你简单说下我的需求吧，我现在有一个标签是26位的，标签明码都是一样的，防错使用，最好是vba程序编写
