Kako postaviti upit u bazu podataka MS Access 2019
Naučite kako postaviti upite u Access bazi podataka uz jednostavne korake i savjete za učinkovito filtriranje i sortiranje podataka.
Ovaj primjer programskog dodatka za Excel govori o osnovnim koracima koji su uključeni u stvaranje korisnog dodatka koji možete koristiti za pakiranje VBA procedura. Ovaj primjer Excel VBA temelji se na uslužnom programu za pretvorbu teksta Change Case.
Excel radna knjiga sastoji se od jednog praznog radnog lista, VBA modula i korisničkog obrasca.
Izvorna verzija uslužnog programa uključuje opcije za velika, mala i ispravna slova. Verzija dodatka uključuje dvije opcije za korisnički obrazac tako da ima iste opcije kao ugrađeni alat u programu Microsoft Word:
Ova slika prikazuje UserForm1. Pet kontrola OptionButton nalazi se unutar kontrole okvira. Osim toga, korisnički obrazac ima gumb Odustani (nazvan CancelButton) i gumb U redu (nazvan OKButton).

Korisnički obrazac za dodatak Change Case.
Kod koji se izvršava kada se klikne na gumb Odustani vrlo je jednostavan. Ovaj postupak učitava korisnički obrazac bez radnje:
Privatni sub CancelButton_Click() Učitajte korisnički obrazac1 Kraj Sub
Slijedi kod koji se izvršava kada se pritisne gumb U redu. Ovaj kod obavlja sav posao:
Privatni pod OKButton_Klik()
Zatamnite tekstualne ćelije kao raspon
Zatamnjena ćelija As Range
Zatamnjen tekst kao niz
Dim i As Long
' Stvorite objekt samo s tekstualnim konstantama
U slučaju pogreške Nastavi dalje
Postavi TextCells = Selection.SpecialCells(xlConstants, xlTextValues)
' Isključite ažuriranje zaslona
Application.ScreenUpdating = False
' Prođite kroz ćelije
Za svaku ćeliju u TextCells
Tekst = ćelija.Vrijednost
Odaberite Istina
Velika i mala slova Opcija
cell.Value = LCase(cell.Value)
Opcija velikih slovaUpper 'UPPERCASE
cell.Value = UCase(cell.Value)
Case OptionProper 'Pravi slučaj
cell.Value = WorksheetFunction.Proper(cell.Value)
Case OptionSentence 'Padež rečenice
Tekst = UCase(Lijevo(ćelija.Vrijednost, 1))
Tekst = Tekst & LCase(Mid(cell.Value, 2, Len(cell.Value)))
ćelija.Vrijednost = Tekst
Case OptionToggle 'TOGGLE CASE
Za i = 1 do Len (tekst)
Ako sredina (tekst, i, 1) kao "[AZ]" Onda
Sredina(tekst, i, 1) = LCase(sredina(tekst, i, 1))
Drugo
Sredina(tekst, i, 1) = UCase(sredina(tekst, i, 1))
Završi ako
Sljedeći i
ćelija.Vrijednost = Tekst
Kraj Odaberite
Sljedeći
' Ispraznite dijaloški okvir
Učitajte korisnički obrazac1
Kraj Sub
Testirajte Excel dodatak prije pretvorbe ove radne knjige. Da biste simulirali što se događa kada je radna knjiga dodatak, trebali biste testirati radnu knjigu kada je aktivna druga radna knjiga programa Excel. Budući da dodatak programa Excel nikada nije aktivan list ili radna knjiga, njegovo testiranje kada je druga radna knjiga otvorena može vam pomoći da identificirate neke potencijalne pogreške.
Otvorite novu radnu knjigu i unesite podatke u neke ćelije.
Za potrebe testiranja unesite različite vrste informacija, uključujući tekst, vrijednosti i formule. Ili jednostavno otvorite postojeću radnu knjigu i upotrijebite je za svoje testove. Imajte na umu da se sve promjene u radnoj knjizi ne mogu poništiti, pa biste mogli upotrijebiti kopiju.
Odaberite jednu ili više ćelija (ili cijele retke i stupce).
Izvršite makronaredbu ChangeCase odabirom nove naredbe Change Case iz izbornika prečaca za ćelije (ili redak ili stupac).
Ako se naredba Promjena slučaja ne pojavi na vašem izborniku prečaca, najvjerojatniji razlog je taj što niste omogućili makronaredbe kada ste otvorili radnu knjigu change case.xlsm. Zatvorite radnu knjigu, a zatim je ponovo otvorite — i provjerite jeste li omogućili makronaredbe.
Iako nije potrebno, smatra se da je najbolja praksa unijeti opis vašeg dodatka za Excel . Slijedite ove korake da biste dodali opis:
Aktivirajte radnu knjigu Change case.xlsm.
Odaberite Datoteka → Informacije i kliknite Prikaži sva svojstva u donjem desnom kutu.
Excel proširuje popis Svojstava.
Unesite naslov za dodatak u polje Naslov.
Ovaj se tekst pojavljuje na popisu dodataka u dijaloškom okviru Dodaci. Za ovaj primjer unesite Change case.
U polje Komentari unesite opis.
Ove se informacije pojavljuju na dnu dijaloškog okvira Add-Ins kada je dodatak odabran. Za ovaj primjer unesite
Mijenja velika i mala slova teksta u odabranim ćelijama.
Pristupite ovom uslužnom programu pomoću izbornika prečaca.
Ova slika prikazuje odjeljak Svojstva s popunjenim poljima Naslov i Komentari.

Koristite odjeljak Svojstva za unos opisnih informacija o svom dodatku.
Ako želite dodati lozinku kako biste spriječili druge da pregledaju VBA kod, slijedite ove korake:
Aktivirajte VBE i odaberite radnu knjigu change case.xlsm u prozoru projekta.
Odaberite Alati → Svojstva VBAProject i kliknite karticu Zaštita u dijaloškom okviru koji se pojavi.
Odaberite potvrdni okvir Zaključaj projekt za pregled i unesite lozinku (dvaput).
Kliknite OK.
Spremite radnu knjigu odabirom Datoteka → Spremi u VBE-u ili tako da se vratite u prozor programa Excel i odaberete Datoteka → Spremi.
U ovom trenutku ste testirali datoteku change case.xlsm i ona radi ispravno. Sljedeći korak je stvaranje dodatka. Prati ove korake:
Ako je potrebno, ponovno aktivirajte Excel.
Aktivirajte radnu knjigu change case.xlsm i odaberite Datoteka → Spremi kao → Pregledaj.
Excel prikazuje dijaloški okvir Spremi kao.
Na padajućem izborniku Spremi kao vrstu odaberite Dodatak (*.xlam).
Odredite lokaciju i kliknite Spremi.
Stvorena je nova datoteka dodatka (s ekstenzijom .xlam), a izvorna XLSM verzija ostaje otvorena.
Kako biste izbjegli zabunu, zatvorite XLSM radnu knjigu prije otvaranja dodatka koji ste izradili iz te radne knjige.
Otvorite dodatak slijedeći ove korake:
Odaberite Developer → Add-Ins → Add-Ins (ili pritisnite Alt+TI).
Excel prikazuje dijaloški okvir Dodaci.
Kliknite gumb Pregledaj.
Pronađite i odaberite dodatak koji ste upravo izradili.
Kliknite OK za zatvaranje dijaloškog okvira Pregledavanje.
Nakon što pronađete svoj novi dodatak, dijaloški okvir Dodaci navodi dodatak. Kao što je prikazano u nastavku, dijaloški okvir Add-Ins također prikazuje opisne informacije koje ste naveli na ploči Svojstva dokumenta.

U dijaloškom okviru Add-Ins izabran je novi dodatak.
Provjerite je li vaš novi dodatak odabran u dijaloškom okviru Dodaci.
Kliknite OK za zatvaranje dijaloškog okvira.
Excel otvara dodatak. Sada ga možete koristiti sa svim svojim radnim knjigama. Sve dok ostaje odabran u dijaloškom okviru Dodaci, dodatak se otvara svaki put kada pokrenete Excel.
Ako ste velikodušno raspoloženi, ovaj dodatak možete distribuirati drugim korisnicima programa Excel jednostavno tako što ćete im dati kopiju XLAM datoteke. (Ne treba im XLSM verzija.) Kada otvore dodatak, nova naredba Promjena slučaja pojavljuje se na izborniku prečaca kada odaberu raspon, jedan ili više redaka ili jedan ili više stupaca. Ako VBA projekt zaključate lozinkom, drugi ne mogu vidjeti vaš makro kod osim ako ne znaju lozinku.
Dodatak se može uređivati kao i svaka druga radna knjiga. XLAM datoteku možete urediti izravno (ne morate raditi s izvornom XLSM verzijom) slijedeći ove korake:
Otvorite svoju XLAM datoteku, ako već nije otvorena.
Aktivirajte VBE. Dvaput kliknite naziv projekta u prozoru projekta.
Ako ste zaštitili kod, od vas će se tražiti lozinka.
Unesite svoju lozinku i kliknite U redu.
Unesite svoje izmjene u kodu.
Spremite datoteku odabirom Datoteka → Spremi.
Ako izradite dodatak koji pohranjuje informacije na radnom listu, svojstvo IsAddIn radne knjige morate postaviti na False da biste vidjeli radnu knjigu. To činite u prozoru Svojstva kada je odabran objekt ThisWorkbook. Nakon što izvršite izmjene u radnoj knjizi, provjerite jeste li svojstvo IsAddIn vratili na True prije nego što spremite datoteku.

Izrada dodatka, a ne dodatka.
Naučite kako postaviti upite u Access bazi podataka uz jednostavne korake i savjete za učinkovito filtriranje i sortiranje podataka.
Tabulatori su oznake položaja u odlomku programa Word 2013 koje određuju kamo će se točka umetanja pomaknuti kada pritisnete tipku Tab. Otkrijte kako prilagoditi tabulatore i optimizirati svoj rad u Wordu.
Word 2010 nudi mnoge načine označavanja i poništavanja odabira teksta. Otkrijte kako koristiti tipkovnicu i miš za odabir blokova. Učinite svoj rad učinkovitijim!
Naučite kako pravilno postaviti uvlaku za odlomak u Wordu 2013 kako biste poboljšali izgled svog dokumenta.
Naučite kako jednostavno otvoriti i zatvoriti svoje Microsoft PowerPoint 2019 prezentacije s našim detaljnim vodičem. Pronađite korisne savjete i trikove!
Saznajte kako crtati jednostavne objekte u PowerPoint 2013 uz ove korisne upute. Uključuje crtanje linija, pravokutnika, krugova i više.
U ovom vodiču vam pokazujemo kako koristiti alat za filtriranje u programu Access 2016 kako biste lako prikazali zapise koji dijele zajedničke vrijednosti. Saznajte više o filtriranju podataka.
Saznajte kako koristiti Excelove funkcije zaokruživanja za prikaz čistih, okruglih brojeva, što može poboljšati čitljivost vaših izvješća.
Zaglavlje ili podnožje koje postavite isto je za svaku stranicu u vašem Word 2013 dokumentu. Otkrijte kako koristiti različita zaglavlja za parne i neparne stranice.
Poboljšajte čitljivost svojih Excel izvješća koristeći prilagođeno oblikovanje brojeva. U ovom članku naučite kako se to radi i koja su najbolja rješenja.