admin 管理员组

文章数量: 1086019


2024年4月30日发(作者：怎样用inputbox输出文本)

helkaIndex = helkaIndex + 1

Loop

If okIndex > 0 Then

(stoIndex, 12) = "核对成功"

(stoIndex, 13) = (okIndex, 4)

(stoIndex, 14) = (okIndex, 5)

(stoIndex, 15) = (okIndex, 6)

Else

NotFoundCount = NotFoundCount + 1

(stoIndex, 12) = "不存在"

(stoIndex, 12).ndex = 6

End If

stoIndex = stoIndex + 1

Loop

If NotFoundCount > 0 Then

(stoIndex, 12) = "核对结果"

(stoIndex, 13) = "状态"

(stoIndex, 14) = "物品名称"

(stoIndex, 15) = "备注"

MsgBox "共发现" + Str(NotFoundCount) + " 条不存在的数据!"

Else

MsgBox "核对完成，所有单号都找到!"

End If

End If

End Sub


本文标签： 核对 单号 输出 物品

版权声明：本文标题：excel宏循环行数据,Excel统计所有sheet数据行数VBA 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/p/1714454559a680806.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。