Question

在col A中，我在工作簿的表3中有一个c ++数据类型列表在col C中，我有与每种数据类型相关的字节数。

在工作表1中，我有一个基于工作表3中数据类型的下拉选择框。

我有一个按钮来运行宏来填充此工作表上的col C，其中包含来自工作表3的相关数据大小。

因此数据是：

col A col C
char 8
int 16
长32

等等

我找到填充的总行数： Lastrow = Cells.Find（＆＃34; *＆＃34;，[A1] ,,, xlByRows，xlPrevious）.Row

这是我的循环的最大行数如何比较第1页中第1页中第1页中每列中每行的比较，以便从第3页上的col C中获取正确的值，并将其放入第1页中col C中的相应行中。 Thnks。

Answer 1

这可以通过多种方式完成。但是如果你想通过vba来实现它，请输入以下代码button_click sub。 Lastrow可以像你一样计算。

Dim searchRange As Range

Set searchRange = Worksheets("Sheet3").Range("A1:A3")
For i = 1 To Lastrow
matchedrow = WorksheetFunction.Match(ActiveSheet.Range("A" & i), searchRange, 0)
ActiveSheet.Range("C" & i) = Sheet3.Cells(matchedrow, 3).Value
Next i

根据其他单元格的内容填充单元格

1 个答案: