2

みんなありがとう。互いに参照している 2 つのシートをコピーして貼り付ける必要があります。それらをグループ化し、両方を同時にコピーして貼り付ける方法を見つけました。ただし、個々のシートから値を抽出/変更/削除しようとするのは困難です。または、2 枚のシートをそれぞれ 1 枚ずつ選択するにはどうすればよいですか。

以下は、2つのシートをグループ化してコピー/貼り付けするコードです。

Dim myArray As Variant
'select workbook
Workbooks("InsertTempSheets.xlsm").Activate

'group 2 sheets and make copies
myArray = Array("Working1", "Working2")
Sheets(myArray).Copy After:=Sheets(Sheets.Count)

どんな助けでも大歓迎です。どうもありがとう。

4

1 に答える 1