Sadržaj
U ovom članku ćemo ilustrirati kako umetnuti podatke u Excel tabelu koristeći VBA šifra . Uz pomoć ugrađenih svojstava i metoda Excela, možemo olakšati funkcionalnost lakog dodavanja ili prepisivanja podataka u tablicu. Zaronimo u primjere da bismo dobili jasno razumijevanje metoda zajedno s VBA kodovima.
Preuzmite radnu svesku za vježbe
Preuzmite ovu radnu svesku za vježbanje da biste vježbali dok čitate ovaj članak.
Umetnite podatke u Table.xlsm
4 primjera za umetanje podataka u tablicu pomoću VBA u Excelu
Recimo, imamo prodajnu listu trgovine s detaljima kao što su datum narudžbe, naziv proizvoda, količina, jedinična cijena i ukupna cijena.
Kako kreirati tabelu u Excelu
Da pretvorite skup podataka u Excel tabelu , uradite sljedeće-
- Odaberite cijeli skup podataka .
- Idite na karticu Umetanje sa Excel trake .
- Kliknite na opciju Tabela .
- Konačno, kliknite na dugme OK u prozoru Kreiraj tabelu.
- Uspješno smo konvertirali skup podataka u Excel tabelu .
Za umetanje podataka u Excel tablicu, koristit ćemo nekoliko VBA funkcija i svojstava u našem kodu . Sledeći odeljakopisuje kako otvoriti i napisati kod u vizuelnom osnovnom uređivaču.
Napišite kod u Visual Basic Editoru
Slijedite korake da otvorite visual basic editor i tamo napišite neki kod.
- Idite na karticu Developer sa Excel trake .
- Kliknite Visual Basic opciju.
- U prozoru Visual Basic za aplikacije , kliknite na padajući izbornik Insert da odaberete Novi modul
Sada kada je novi modul je otvoren , upišite tamo neki kod i pritisnite F5 za pokreni.
1. Umetnite podatke u zadnji red tabele koristeći VBA u Excelu
U ovom primjeru koristit ćemo VBA kod za dodavanje novi red na donjem tabele i zatim ubacite podatke u to. U našoj tabeli imamo 4 reda podataka . Da dodate 5. , kopirajte i zalijepite sljedeći kod u vizualni osnovni uređivač.
7753
Pritisnite F5 da pokrenite kod .
Mi smo umetnuli novi red od podataka u dno postojeće tabele .
Objašnjenje koda:
- U našem kodu smo koristili ListObjects objekat VBA Excel-a da zgrabi tabelu sa njenim imenom . Za više informacija, svaki od ListObject objekata je tabela na radnom listu . Da biste dobili naziv tabele, kliknite na tabelu >> kliknite na karticu Dizajn tabele u Excel traci.
- Zatim smo koristili ListRows . Dodaj metodu da dodate novi red u tabelu . Ova metoda uzima dva argumenta : Pozicija i UvijekInsert .
Unošenjem cijelog broja broj , možemo specificirati relativnu poziciju novo dodanog reda u tabelu . U ovom primjeru, ostavili smo praznim argument pozicije , kao rezultat, novi red je dodat u dno tabele tabele .
- Konačno, postavljamo podatke u svaku od ćelija nove dodati red . U ovom slučaju, podaci su bili .Range(1) = “1/1/2022” kao OrderDate, .Range(2) = “Apple” kao Proizvod, .Raspon(3) = 5 kao Količina, .Raspon(4) = 1,77 kao Jedinična cijena.
Pročitajte više : Naziv tabele u Excelu: Sve što trebate znati
2. Pokrenite VBA kod za umetanje podataka u određeni red tabele u Excelu
U ovoj ilustraciji ćemo dodati red podataka u specifičnom redu u odnosu na tabelu koristeći isti dio koda koji smo koristili u gornjem primjeru. U ovom slučaju, samo trebamo specificirati Argument pozicije metode ListRows.Add u našojkod. Recimo da želimo dodati podatke o prodaji za Narandžastu sa detaljima u redu broj 3 u odnosu na postojeću tabelu . Da bi se to dogodilo, kopirajte i zalijepite sljedeći kod u uređivač vizualnog koda.
5372
Pokretanje koda pritiskom F5 je umetnuo podatke o prodaji za Orange u 3. red u odnosu na tabelu .
Pročitaj Više: Excel VBA kod za svaki red u tabeli (dodavanje, prepisivanje, brisanje, itd.)
Slična čitanja
- Izračunata suma polja podijeljena s brojem u zaokretnoj tablici
- Kako ilustrirati relativnu distribuciju frekvencija u Excelu
- [Fix] Nije moguće grupirati datume u zaokretnoj tabeli: 4 moguća rješenja
- Kako izračunati postotak distribucije frekvencije u Excelu (2 metode)
- Zaokretna tabela se ne osvježava (5 problema i rješenja)
3. Ubacite i prepišite podatke u tabelu koristeći VBA u Excelu
Ovdje ćemo ilustrirati kako prepisati postojeće podatke u tabela umjesto od umetanje a novi red od podataka . Da bismo to učinili, trebamo koristiti svojstvo ListObject.ListRows Excela umjesto svojstva ListRows.Add koje smo koristili ranije . Svojstvo ListObject.ListRows također uzima broj reda ( Integer value ) kao svoj argument . Recimo, želimo promjeniti jedinična cijena Narandžaste od 2,14 do 2,35 koju smo ubacili u prethodni primjer . Kopirajte i zalijepite sljedeći kod ispod u vizualnom osnovnom uređivaču.
5716
U našem kodu, mi postavljamo argument za svojstvo ListObject.ListRows kao 3 gdje su podaci za Narandžasta pripada . Pokrenite kod pritiskom na F5 i pogledajte razliku .
Kôd ima promijenio samo jediničnu cijenu podataka u redu broj 3 u odnosu u odnosu na tabelu .
Pročitajte više: Kako umetnuti ili izbrisati redove i stupce iz Excel tablice
4. Pokrenite VBA kod za umetanje podataka u Excel tabelu na osnovu korisničkog unosa
U ovom primjeru ćemo umetnuti naziv tabele i detalji o prodaji proizvoda kao korisnički unos a ne tvrdi kod u VBA kodu svaki vrijeme . Slijedite upute u nastavku da biste to postigli.
- Kopirajte i zalijepite sljedeći kod u uređivač vizualnog koda.
4050
- Pritisnite F5 da pokrenite kod.
- Unesite ime od tabele u ulaznom polju ( Tabela1 , u ovom primjeru) i pritisnite OK.
- Zatim stavite vrijednosti za Datum narudžbe, Naziv proizvoda, Količina, i Jedičnu cijenu u kutije za unos koji su se pojavljivali uzastopno . U ovom primjeru, vrijednosti koje smo koristili su 1/1/2022, Orange, 3, i 35.
- Kao rezultat, imamo novi red sa umetnutim podacima na donjem tabele .
Pročitajte više: Savjeti za formatiranje tablice u Excelu – promijenite izgled tabele
Napomene
Kada smo dodali a novi red sa podacima koristeći VBA kod, format i formule se nose u novi red automatski . U našem primjeru, TotalPrice kolona daje proizvod kolona Količina i Jedinična cijena . Upravo smo ubacili samo vrijednosti Količina i vrijednosti jedinične cijene ; novi red je umetnut sa proizvodom od ovih dvije vrijednosti u koloni Ukupna cijena.
Zaključak
Sada znamo kako umetnuti podatke u Excel tablicu koristeći VBA kod. Nadamo se da će vam pomoći da ove metode koristite sigurnije. Bilo kakva pitanja ili sugestije ne zaboravite ih staviti u polje za komentare ispod.