2

問題:行を列に参照する必要があることがよくあります(= Cellを使用)。複数の行でそれを行う必要がある場合は、Ctrl + Shift+Enterを使用するだけです。しかし、何かを編集したいときに「配列の一部を変更することはできません」というエラーがあるため、煩わしいです。

期待される結果を説明してください:ヘッダーのない単一行である範囲を選択したいと思います。

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

「OK」を押すと、行を配置する場所(列を転置した単一の行)を選択できるようになります。これは、プログラムがどこから開始するかを知らせるためのセルアドレスです。

繰り返しますが、これは

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列オフセットします。

4

1 に答える 1

1

海で泳いだ後、この作品を作ることができました

ここに画像の説明を入力してください

「<コード>」を使おうとしていますが、見栄えがよくありません。そこで、コードのスナップショットを撮ります。長くはありません。気にならないように。

于 2012-05-06T19:13:01.490 に答える