EXCEL VBAコミュの一括コピーで、行→列に

一括コピーで、行→列に

mixiユーザー 2009年10月18日 22:14

C5〜G5（１行５列）をC1〜C5（５行１列）といった形でコピーしたいのですが、
で実行するとC1〜G5（５行５列）にコピーされてしまいます。
１つ１つコピーするのを繰り返すという方法しかないんでしょうか
行列を入れ替えてコピーするという記述の仕方とかないんでしょうか
マクロを記録してみてソースを見てみたのですが、いまいちわかりません。

Worksheets("Sheet1").Range("C5:G5").Copy Worksheets("Sheet2").Range("C1:C5")

どなたかよろしくお願いします

• イイネ！
• コメント

コメント(3)

• 最初
• 全て
• 最新の40件

• 1

[1] mixiユーザー 10月18日 22:55

次のようにすれば、行・列の入れ替えができると思います。
　
　Sheets("Sheet1").Range("C1:G1").Copy
　Sheets("Sheet2").Range("C1").PasteSpecial Transpose:=True

• イイネ！
• コメント

[3] mixiユーザー 10月19日 00:01

ありがとうございます

• イイネ！
• コメント

ログインすると、みんなのコメントがもっと見れるよ

• ログイン
• 新規登録

• 最初
• 全て
• 最新の40件

• 1

mixiユーザー

ログインしてコメントしよう！

EXCEL VBA 更新情報

• 最新のトピック

  • はじめまして！
  • 総合質問スレ ２
  • For Eachの印象
  • EXCELとACCESSの連携 その3（最
  • EXCELとACCESSの連携 その2
  • EXCELとACCESSの連携 その1
  • 質問ですが

  • 一覧へ

• 最新のイベント

  • 初心者からのＶＢＡ

  • 一覧へ

• 最新のアンケート

  • まだ何もありません

EXCEL VBAのメンバーはこんなコミュニティにも参加しています

星印の数は、共通して参加しているメンバーが多いほど増えます。

EXCEL VBA

mixiに参加して、
コミュニティをもっと楽しもう

• 新規登録（無料）
• ログイン

パスワード・メールアドレスを忘れた方