0

これは私を夢中にさせています。

xlWBk.Sheets(1) を介して参照するワークブック/シートがあります。

私は基本的に次のことをしたい:

xlWBk.Sheets(1).The sixth row.Copy Everything (text, format, etc)
xlWBk.Sheets(1).Arbitrary row.Paste Everything (text, format, etc)

これを行うための迅速でクリーンな方法はありますか? 行/範囲貼り付けコマンドの非常に多くの組み合わせを試しましたが、何も貼り付けられません。

4

1 に答える 1

1

はい、これを試してください:

xlWBk.Sheets(1).Range("A6").EntireRow.Copy xlWBk.Sheets(1).Range("A7")

これにより、6 行全体が 7 行にコピーされます。

編集

ありがとうございます。答えのペーストブック/シートを定量化するのを忘れていました。大漁!。上記のコードが更新されました。

于 2012-10-11T18:08:03.287 に答える