[Excel] Kako da automatski dodam vise sheet-ova a da im imena pocinju rednim brojem

Odgovori Nova tema

1 odgovor
3.420 pregleda

[Excel] Kako da automatski dodam vise sheet-ova a da im imena pocinju rednim brojem 19.04.2008. u 12:33 · pre 225 meseci #1

Pitanje glasi potrebno je da napravim vise sheetova koji imaju isti sadrzaj ali se sortiraju pod rednim brojem tj treba umesto sheet1,sheet2......sheet300 imama samo 1,2,3...300
Znam da to mogu uraditi peske tako sto cu svakom da izmenim ime ali je posao poveliki.
Zanima me da li postoji komanda koja ce da mi omoguci kopiranje prvog sheet-a sa imenom 1 u 300 primeraka istiha ali da im imena pocinju sa sledecim vecim brojem?
Nadam se da razumete sta sam mislio!

Potpis

Jo smrtnici!

Re: [Excel] Kako da automatski dodam vise sheet-ova a da im imena pocinju rednim brojem 20.04.2008. u 18:25 · pre 225 meseci #2

Ako baš insistira da trošiš memoriju kopirajući isti list 300 puta to se može uraditi korišćenjem VBA.
Kopiranje prvog lista iza poslednjeg ostvaruje se sledećim kodom:

Code:
Worksheets(1).Copy After:=Worksheets(Worksheets.Count)

Sada to staviš u petlju da uradiš 299 puta i dodeliš nazive 2, 3 ... 300:

Code:

Sub KopirajList
Dim i As integer
For i = 2 to 300
  Worksheets(1).Copy After:=Worksheets(Worksheets.Count)
  Worksheets(Worksheets.Count).Name = Str(i)
Next i
End Sub

Potpis

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme