野猪上有任何微软Excel专家吗

lamensterms · 发表于 2022-7-5 20:21:30

大家好，

这不是一个Lisp程序的问题，但它确实与绘图有关。

我们在办公室使用ProSteel，我们必须能够为模型中的所有项目/组生成数据库/报告。我想能够使用这些数据库来执行项目比较，并检查所有部分应该是相同的。。。都是一样的。

请参阅随附的电子表格。

项目比较。xls公司

您看到的是一个数据库，其中一个工作模型中有几个项目。每行代表一个零件，有些是相同的。“\u POS\u NUMBER”列显示每个零件号，具有相同“POS NUMBER”的每个零件在所有其他字段/列中应相同。例如POS编号1068-FV1008的两行具有相同的“材料”、“长度”、“重量”等。如果可能（在Excel 2003中），我希望能够执行某种比较/测试，以检查POS编号相同但任何其他列ey中不匹配的行。例如，您可以看到项目1068-FV1006（两行之间）的“高”、“重量”和“油漆面积”值不匹配。

有人知道实现这一点的方法吗？

非常感谢您的帮助。

steven-g · 发表于 2022-7-5 20:27:25

有几种方法可以做到这一点，我更喜欢的方法是使用VBA，如果您的it部门允许在Excel中使用宏，那么这应该可以做到。我在工作表上添加了一个运行宏的按钮。

需要启用宏才能运行此操作。它检查差异，如果发现任何差异，则更改单元格颜色（仅检查相邻行）
项目比较。xls公司

lamensterms · 发表于 2022-7-5 20:32:57

嗨，史蒂文，

哇，太棒了。非常感谢你的帮助。

只是想知道（我对宏几乎一无所知）这个宏可以处理的数据/行的数量有限制吗？

再次感谢您的帮助。ProSteel确实有一个用于此任务的内置实用程序，但最近我们注意到它并不能捕获所有错误，因此使用此宏将产生巨大的差异。

steven-g · 发表于 2022-7-5 20:39:03

你的欢迎

copy

 
Lastrow = Cells(1, 1).End(xlDown).Row

将自动找到最后一行数据，这仅限于Excel可以处理的数量，即很多。

copy

 
For b = 1 To 119

用于表示您拥有多少列数据，因此如果需要添加列，请更改该值。
但是请注意，它只会对照前一行检查一行，因此，例如，如果有3行具有相同的编号，并且第2行和第3行是错误的，那么第2行将高亮显示（与第1行不同），但第3行不会高亮显示，因为它与第2行相同（但实际上与第1行不同），无论如何，您都明白了，如果出现错误，您知道要开始进一步检查的区域。

lamensterms · 发表于 2022-7-5 20:45:19

令人惊叹的

我同意，与上述行进行比较就足够了，它将标记需要调查的零件号。

再次感谢史蒂文。

lamensterms · 发表于 2022-7-5 20:47:36

你好，史蒂文，

只是想知道是否有可能添加一个精度范围到您的比较宏。

例如，如果我有两个项目，质量差只有0.00001公斤，我想通过比较忽略它。我想将精度设置为小数点后2位。

我曾尝试将Excel中的单元格格式设置为一个小数点后两位的数字，但这不会改变值（仅改变值的显示方式）。

再次感谢你的帮助。