|
Nastavak iz prethodne teme, malo trikova i zabave uz exel i VB....
Prilagodjevanje komentara celija:
Komentari celija omogucavaju nam da postavite "nalepnicu" na bilo koju zadanu celiju u radnom listu. Kad umetnete neki komentar celije preko Insert-Coment, Excel ce automatski uzeti korisnicko ime sa kompa koji se koristi.
Da bi to promenili odaberite: Tools- Options- General
Korisnicko ime pojavi ce se na dnu dijaloga pa mozete promeniti i upisati bilo sta..
Naravno pri odabiru Insert-Coment, excel vas stavlja u mod edit gdje upisujete komentar koji zelite.
Da bi komentar malo ulepsali kliknite uz levu ivicu (vanjsku granicu komentara, i odaberite opciju Drawing sa alatne trake, pa change AutoShape. Tu se nalazi citav niz opcija i mozete birati boju, senku i sl.
Jos jedna zanimljiva stvar ove opcije je da mozete upotrebiti sliku ili dijagram da stavite u komentar a da ne smeta popunjenim celijama.
Da bi dodali sliku, odaberite komentar celije a da ne ulazite u mod edit(Za unosenje komentara). dvostruko kliknite na okvir komentara i odaberite Format Comment i odaberite Colors and Lines. Iz opcija Color odaberite Fill Effects, pa u dijalogu Fill Effects odaberite Picture. Sada odaberite sliku koju zelite postaviti.
Sledeci primer je upotreba Excel kalendara uz dodavanje kratkog VB koda, bilo kojoj beleznici kako bi unošenje datuma u radne listove bilo sto lakse.
Za pocetak bi bilo dobro da otvorite svoju datoteku (Personal.xls). Ucinite to klikom na Wndow-Unihide.
Ako je ova opcija zasivljena, mozete je formirati na ovaj nacin:
Odaberite Tools- Macro-Record New Macro pa iz okvira Store Macro in odaberite Personal Macro WorkBook kliknite OK.
Sada odaberite Tools- Macro-VBE a zatim Insert - UserForm. To bi trebalo prikazati kutiju sa alatom Control
Desnim klikom iz menija odaberite Additional Controls i pronadjite Calendar Control. Otkacite ga i OK. Sada bi trebalo da u kutiji sa alatom imate i tu opciju.
Sada u UserForm-u postavite kalendar iz kutije i razvucite ga na razumnu velicinu:
Neka je odabran UserForm pa odaberite View-Properties Window
Iz prozora Properties Odaberite Caption i Zamjenite UserForm 1 Rijecju Calendar. Sad odaberite View Code i dodajte sledeci kod:
Private Sub Calendar1_Click()
Activatecell = Calendar1.Value
End Sub
Private Sub UserForm_Activate()
Me.Calendar1.Value = Date
End Sub
Sada kliknite na Insert- Module i upisite sledeci kod:
Sub ShowIt()
UserForm1.Show
End Sub
Zatvorite przor za povratak u excel. Odaberite Tools-Macro- Macros za zatim ShowIt. Kliknite Options, dodjelite precicu i gotovo.........
Sada kada zelite unositi datume u Excel-ove tabele samo kliknite precicu i birajte datum.....
Nastavak sutra............
|
