excel - 使用参考 Excel VBA 将单行转换为单列

Question

问题：我经常需要将一行引用到一列（使用 =Cell）。当我需要对多行执行此操作时，我只需使用 Ctrl+Shift+Enter。但这很烦人，因为当我想编辑某些内容时出现错误：“您无法更改数组的一部分”。

解释预期结果：我想选择没有标题的单行范围。

Dim cRangeColumn As Range
Set cRangeColumn = Application.InputBox("Please choose a range", "Specify Range", Type:=8)

按“确定”后，它应该让我选择放置行的位置（与列转置的单行） - 让程序知道从哪里开始的单元格地址

同样，这可以通过

Dim rRangeRow As Range
Set rRangeRow = Application.InputBox("Please choose a range", "Specify Range", Type:=8)

我面临的问题：如何访问范围内的值

逻辑：

1. 我得到了列的范围 - 比如说$E$29:$E$37- 总计 9 个值

2. 我选择转置列（一行）的起始地址，比如说Sheet226!$G$14

3. 程序开始写入="$E$29 to the starting address "Sheet226!$G$14"，然后写入直到$E$37满足。每次写入时，偏移 1 列。

Answer 1

在海里游泳后，我能够完成这项工作

我尝试使用“<code>”，但看起来不太好。所以我拍摄了代码的快照。它不长。我希望它不打扰。