|
▼mariさん、かみちゃん さん:
おはようございます。
かみちゃんさんの後者
> A B C D E
>1 1 2 3 4 5
の場合の考え方の例です。
Sub 行を列に()
Dim I As Long
For I = 1 To 5
Cells(1, I).Value = Cells(I, 1).Value
Next
End Sub
(1,1)の値は(1,1)の値を代入
(1,2)の値は(2,1)の値を代入
(1,3)の値は(3,1)の値を代入
・
・
という感じですね。この基本のコードに
・(1,1)は縦横の値がかぶっているけどどうする?
・元の値を空白にしなくていいの?
・実はA列じゃなくてC列なのよね…。
のような条件を組み合わせていけば良いと思います。
>> このような作業の簡単な方法(公式)などありませんか。
>
>Excelヘルプに使用例が載っていますので、試してみることです。
>あとは、ここの掲示板などいろいろなWebでサンプルなど紹介されていることが多いので、試してみることです。
かみちゃんさんのご提示された意見に大賛成です。
「本を読む」「Webで探す」など手段は多々ありますが、ご自分でコードを
どんどん書いて試していくのが上達の手段だと思われます。
※題名は同じ悩みを持っている他の人が検索しやすいように
内容に沿った題名にしてみてはいかがでしょうか。
今回の場合ですと「行と列を入れ替えるには?」とか…。
|
|