Konsolidacja danych za pomocą Excel VBA

Anonim

W tym artykule nauczymy się VBA, jak napisać makro konsolidujące dane w programie Microsoft Excel.

Konsolidacja danych: -Ta opcja służy do podsumowania danych z oddzielnych zakresów, konsolidując wyniki w jednym wyniku.

Weźmy przykład, aby zrozumieć, jak połączyć dane za pomocą VBA.

Mamy 3 skoroszyty programu Excel o nazwach A, B i C. Każdy skoroszyt ma arkusz Sheet1 z numerami z zakresu A2:A4. Teraz chcemy pobrać sumę do wszystkich skoroszytów w pliku Excel z sumą liczb i nazwą pliku.

Plik a:-

Plik B:-

Plik C:-

Konsolidować:-

Aby skonsolidować dane, wykonaj poniższe czynności:-

  • Wstaw formularz użytkownika, a następnie wstaw 3 pola etykiet, 3 pola tekstowe i jeden przycisk polecenia.
  • Kliknij dwukrotnie przycisk Command, aby przypisać makro.
  • Napisz poniższy kod:-
 Sub Consolidate() Range("A1").Select ActiveCell.Value = "Nazwa" Range("B1").Select ActiveCell.Value = "Ilość" Range("A2").Select ActiveCell.Value = "A" Range ("A3").Select ActiveCell.Value = "B" Range("A4").Select ActiveCell.Value = "C"Range("B2").SelectWorkbooks.OpenFileName:="D:\Data\A.xlsx " Workbooks.OpenFileName:="D:\Data\B.xlsx" Workbooks.OpenFileName:="D:\Data\C.xlsx"Windows("Konsolidacja").Aktywuj zaznaczenie.Konsoliduj źródła:=Array("'D :\Data\[A.xlsx]sheet1'!R2C1:R4C1", _ "'D:\Data\[B.xlsx]sheet1'!R2C1:R4C1", "'D:\Data\[C.xlsx] sheet1'!R2C1:R4C1"), Funkcja:=xlSum Windows("A.xlsx").Aktywuj ActiveWorkbook.Zamknij Windows("B.xlsx").Aktywuj ActiveWorkbook.Zamknij Windows("C.xlsx").Aktywuj ActiveWorkbook .Zamknij koniec Sub

Wyjaśnienie kodu:-Najpierw zdefiniujemy wartości zakresów, a następnie zdefiniujemy ścieżkę do każdego pliku. Następnie określimy, która funkcja będzie działać dla każdego pliku i jakie obliczenia chcemy skonsolidować.
• Aby uruchomić kod, naciśnij klawisz F5.
• Wszystkie pliki zostaną otwarte, a następnie VBA zwróci sumę do wszystkich plików, a następnie umieści wynik przed nazwą pliku.

W ten sposób możemy skonsolidować liczby i pobrać w jednym pliku z różnych plików w programie Microsoft Excel za pomocą VBA.

Jeśli podobały Ci się nasze blogi, podziel się nimi ze znajomymi na Facebooku. A także możesz śledzić nas na Twitterze i Facebooku.
Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy ulepszyć, uzupełnić lub unowocześnić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas nawitryna e-mail