Kako umetnuti tablice za sljedećih x dana
Trebate li proračunske tablice s imenima s datumom? To je korisno, na primjer, ako bilježite podatke za taj dan i koristite zasebni radni list za svaki unos.
Želite li si uštedjeti probleme pri stvaranju samih radnih listova i dodavanju željenih vrijednosti datuma, makro vam može pomoći. Sljedeći makro definira brojne radne listove koji slijede trenutni datum na temelju trenutnog datuma:
Sub FuegeTabellenEin ()
Zatamni broj kao cijeli broj
Dim i Kao cijeli broj
Number = InputBox ("Koliko listova umetnuti?")
Za i = 1 Za broj
Radni listovi. Dodati nakon: = Radni listovi (Radni listovi.Broj)
Radni listovi (Radni listovi.Broj). Ime = Datum + i
Sljedeći i
Kraj podm
Nakon pokretanja makronaredbe, Excel vam prikazuje prozor za unos. U ovom prozoru možete unijeti broj radnih listova koje želite stvoriti. Sljedeća ilustracija prikazuje kako ovaj prozor izgleda:
Ovdje unesite željeni broj radnih listova. Počevši od trenutnog datuma, Excel zatim stvara željeni broj proračunskih tablica i daje im trenutni datum, datum sljedećeg dana itd. Sljedeća slika prikazuje kako rezultat može izgledati:
Savjet: Ako želite znati kako unijeti i pokrenuti makroe u Excelu, ovdje ćete pronaći kratak opis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
