2022-05-26 11:13:37
Re②:エクセルの複数シートのデータを新規シートにまとめたい
ありがとうございました。 エクセルのコピーは、空白行を削除して下記を実行したら うまくいきました。 >行＝Aでエクセル最下行取得。 >列＝行でエクセル最右列取得。 >セル＝行,列のエクセルセル名取得。 >「A1:{セル}」をエクセル選択。 >エクセルコピー。 しかし、新規ブックを開き、シートの注目を行い、上記プログラムをコピーするまでは 問題なく行えるのですが、コピーを貼り付ける際に、全てのシートのコピーが「A1」に貼り付けされてしまいます。 「りんご」のエクセルシート注目 行＝Aでエクセル最下行取得。 列＝行でエクセル最右列取得。 セル＝行,列のエクセルセル名取得。 「A1:{セル}」をエクセル選択。 エクセルコピー。 「Sheet1」のエクセルシート注目 貼付行＝1。 「A{貼付行}」をエクセル選択。 エクセル貼付け。 貼付行＝貼付行＋行＋１。 「バナナ」のエクセルシート注目 行＝Aでエクセル最下行取得。 列＝行でエクセル最右列取得。 セル＝行,列のエクセルセル名取得。 「A1:{セル}」をエクセル選択。 エクセルコピー。 「Sheet1」のエクセルシート注目 貼付行＝1。 「A{貼付行}」をエクセル選択。 エクセル貼付け。 貼付行＝貼付行＋行＋１。 「みかん」のエクセルシート注目 行＝Aでエクセル最下行取得。 列＝行でエクセル最右列取得。 セル＝行,列のエクセルセル名取得。 「A1:{セル}」をエクセル選択。 エクセルコピー。 「Sheet1」のエクセルシート注目 貼付行＝1。 「A{貼付行}」をエクセル選択。 エクセル貼付け。 貼付行＝貼付行＋行＋１。 ご教示いただけませんでしょうか？ |