每次迭代时将单元格列递增 +1-解网

问：

我试图弄清楚标题。但是我是 vba 的新手，想不出一种足够简单的方法来从一个工作簿中的单元格 C29 复制并粘贴到另一个工作簿中的单元格 KJ54 中。我希望 KJ54 每次迭代都增加 1，所以下次将是 KK54，下次是 KL54 等（基本上，每次我运行这个宏时，它都会将 C29 粘贴到下一列的单元格中）。

尝试搞砸类似的东西：

Dim i As Range
Set i = Range("KJ")
i = i + 1

再次运行宏时，预计 KJ 在下一次迭代中为 KK

我只是一个新手太多了，找不到有效的东西。

我知道在 excel 本身中有一个解决方法，但它需要更多的手动工作，我喜欢尽可能懒惰:)

任何帮助都非常感谢

Excel VBA 增量复制粘贴

通常人们使用 Dim i As Long，其中 i 是循环的迭代，而 Dim rng As Range：将 rng = Range（“KJ54”）设置为范围（名称可能会有所不同，但这样更容易理解）。然后，将 For i = 1 To endOfYourLoopVariable 与 rng 一起使用。Offset（，i-1）（这样你就可以从你的 KJ 开始，下一次迭代，你转到下一列。

0赞 CLR 9/18/2023

通常，这是通过查找第 54 行的下一列来完成的，模拟用户选择第 54 行中最右边的单元格，然后按 Ctrl-Left 查找上次使用的单元格，然后向右查找空单元格。这里有很多页面可以在行/列中查找下一个可用的单元格。

0赞 Foxfire And Burns And Burns 9/18/2023

我强烈建议阅读有关对象单元格和对象范围的信息

答： 暂无答案

上一个：Excel VBA - 是否可以在多个工作表之间增加索引？（一次递增一行，从每张纸中索引一行）

下一个：使用 PySimpleGUI 搜索 pandas 数据帧

每次迭代时将单元格列递增 +1

increment cell column by +1 with each iteration

评论