宏将遍历一个范围以填充相邻单元格的坐标值

时间:2017-01-21 22:37:09

标签: excel vba if-statement for-loop range

我正在帮助修改相机校准实验室的Excel电子表格。原校准实验室只有一个工作站,有14个固定目标,可以将目标的X, Y, & Z坐标硬编码到电子表格中。

新实验室有90多个目标,可能有多个工作站。我想制作一个允许用户简单地将目标数字插入一系列单元格的宏,当运行宏时,与第一个相邻的三个列(范围)将填充每个目标对应的坐标。

坐标最好存储在另一张纸上,按目标编号排序,右侧单元格中的X, Y, & Z坐标。

我在想代码就像;

  Define range of target numbers
  for each cell in range, 
  If cell(2,4) =  1 then ' 1 is the target number
  cell(2,5) = cell(1,2) ' from another worksheet x value
  cell(2,6) = cell(1,3) ' Y value
  cell(2,7) = cell(1,4) ' Z value
  end if

用户将使用14个目标,可以选择任何目标。

0 个答案:

没有答案