Z makrom lahko kopirate podatke z enega Excelovega delovnega lista na drug list v istem delovnem zvezku
Ali želite vsebino območja prenesti z enega delovnega lista na drugega? To je enostavno z interaktivno uporabo Excela. Kako pa opravite delo z makrom? Zgradite zanko, ki se ponavlja skozi vse celice, ki jih želite kopirati. Tako izgleda makro:
Področje podkopiranja ()
Dim Quelltab kot delovni list
Zatemni zavihek cilja kot delovni list
Dim Cell As Range
Dim Counter As Long
Števec = 1
Obseg = "A1: A10"
Nastavi zavihek vir = ActiveWorkbook.Worksheets ("Tabela1")
Nastavi ciljni zavihek = ActiveWorkbook.Worksheets ("Tabela2")
Za vsako celico v SourceTab.Range ("A1: A10")
Ciljna tabela Celice (števec, 1) = celica
Števec = števec + 1
Naslednja celica
End Sub
V definiciji spremenljivke »Zavihek Vir« podate ime izvorne tabele v delovnem zvezku. To je delovni list, iz katerega želite kopirati podatke. V makru je list "Tabela1".
Z oznako »Ciljni zavihek« določite ime delovnega lista, v katerega želite kopirati podatke.
Področje A1: A10 se kopira v makro. Če želite uporabiti drugo območje, ustrezno prilagodite makro.
Z oznako "Counter" lahko nadzirate vrstico v ciljni tabeli, v kateri se začne vstavljanje celic. Podatki se v celicah kopirajo eden pod drugim
Če želite vnesti makro, pritisnite ALT F11 v Excelu, da odprete urejevalnik VBA. Z ukazom INSERT - MODULE vstavite prazen list modula. Za zagon makra neposredno iz Excela uporabite kombinacijo tipk ALT F8.
Kopirajte celoten delovni list v delovni zvezek
Imate tudi možnost kopiranja celotnega delovnega lista v delovnem zvezku z uporabo makra. Če želite kopirati aktivni list trenutnega delovnega zvezka na konec delovnega zvezka, uporabite naslednji makro:
Sub CopyActiveTable ()
ActiveSheet.Copy After: = Delovni listi (Worksheets.Count)
End Sub
Po zagonu makra se aktivnemu delovnemu zvezku doda delovni list. To je kopija delovnega lista, ki je bil aktiven ob klicu makra. Za razlikovanje dveh delovnih listov Excel ustvari zaporedno številko za kopiranim delovnim listom. Naslednja slika prikazuje, kako to izgleda v registru tabel po kopiranju delovnega lista "Prodaja":
