エクセルVBA、マクロについて教えてください。
https://box.yahoo.co.jp/guest/viewer?sid=box-l-62itttdrrgzrvsaxkvu53tmg3a-1001&uniqid=d4c90186-7ae6-4c7a-8f04-a499509147fc&viewtype=detail
サンプルブックを見て頂きたいのですが、シートに分けておりますが、それぞれ別ブックとなります。
エクセルブックAにはシート1-シート10まであります。
ブックAのデータをVBAを使って、ブックBに転記したいのですが、
今はVBAがわからないため、作業列、関数を使って読み取っているのですが、検索をかけると、とても遅いため、関数を消すと早く検索が出来たため、VBAでデータを転記出来たらいいなと思っております。
いくつか条件があるのですが、
ブックAのAQ-ATが作業列としており、
ブックBのG-Uまで関数を入れております。
G4==SUMIFS('[ブックA.xlsx]シート1'!$AD:$AD,'[ブックA.xlsx]シート1'!$AQ:$AQ,$A4,'[ブックA.xlsx]シート1'!$AS:$AS,$F$2,'[ブックA.xlsx]シート1'!$AT:$AT,G$2)
H4==SUMIFS('[ブックA.xlsx]シート1'!$AD:$AD,'[ブックA.xlsx]シート1'!$AQ:$AQ,$A5,'[ブックA.xlsx]シート1'!$AS:$AS,$F$2,'[ブックA.xlsx]シート1'!$AT:$AT,H$2)
I4==SUMIFS('[ブックA.xlsx]シート1'!$AD:$AD,'[ブックA.xlsx]シート1'!$AQ:$AQ,$A4,'[ブックA.xlsx]シート1'!$AS:$AS,$F$2,'[ブックA.xlsx]シート1'!$AT:$AT,I$2)
同じような関数をG-Uまで入れております。
このような関数を入れております。
E4==VLOOKUP(A4,'[ブックA.xlsx]シート1'!$B:$AC,28,FALSE)
この関数をなくすとAdvancedFilterが早くなるので、ここの部分を転記出来たらと考えております。
ブックAとブックBはブックAのB列のコードとブックBのA列のコードが一致すれば、転記すると言った感じです。
決まっている部分は、商品コードは重複しないのと、ブックAのB列は結合されております。
結合セルのため、作業列を使用しておりました。
ブックAの基準をかえずに転記できる方法があればおしえてください。
お礼
ありがとうございます。是非そうしてみます。