Excel 在for-each-if语句中移动复制位置

我想从

列N（5到偏移量）

复制

>0.05

的每个值。然后希望将每个值粘贴到其他位置；换位。如何使“写入”功能在每个格式副本中都移动粘贴区域

Set ListOfCells = MainA.Worksheets("Summary_2016").Range("N5", EndCellA.Offset(14, 7))

        For Each SingleCell In ListOfCells
            If SingleCell.Value > 0.05 Then
               Range(SingleCell, SingleCell.Offset(0, -1)).Copy
                 StarterA.Worksheets("Mail").Range ("B30")

            etc

---

starter a.Worksheets（“Mail”）.Range（“B30”）

euh，因此这当然是

paste

命令，但每次都必须移动。如何使其动态化？

尝试使用

偏移量

和

地址

，假设相对位置为（0,5）

---

我将研究address函数，但我不知道这会如何改变每次迭代的粘贴范围？如果

SingleCell

更改了每次迭代，则会发生这种改变，因为

offset

函数。。我的代码使用固定相对位置（0，5）…如果需要，您可以修改它使其成为动态的..但是单单元格范围与我要粘贴的位置无关？那么..取决于什么？我们如何从当前的代码和问题中知道这一点？…请随时更新。。这应该有答案。对不起，Susilo，也许我的问题不够清楚，从b30开始，应该在工作表邮件上粘贴

  Tgt = SingleCell.Offset(0, 5).Address
  StarterA.Worksheets("Mail").Range (Tgt)