Problemi pri kopiranju delovnega lista s pomočjo makroja

Pomoč pri delu z MS Excelom
Odgovori
mkralj123
Prispevkov: 77
Pridružen: Sr Jan 14, 2009 12:21 pm

Problemi pri kopiranju delovnega lista s pomočjo makroja

Odgovor Napisal/-a mkralj123 »

Pozdrav

S pomočjo orodja za izdelavo makrojev sem naredil en preprost makro, ki mi celotno vsebino obstoječega lista skopira v nov delovni list, ki ga predhodno odpre. Stvar deluje do nekje 20 delovnih listov potem pa se ustavi in mi izpiše "excel ne more dokonačati opravila s sredstvi, ki so mu na voljo. Izberite manj podatkov, ali pa zaprite druge aplikacije."
Ko odprem makro je z rumeno označena vrstica activeSheet.Paste
Mislil sem da je problem v tem da je odložišče preveč polno, vendar tudi če ga izpraznim mi zadeve ne nadaljuje. Tukaj je še koda makra:

Sub Makro7()
Cells.Select
Selection.Copy
Sheets.Add
ActiveSheet.Paste
Range("A1").Select
End Sub


lp m
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Odgovor Napisal/-a admin »

Izbrali ste si dolgo in potratno pot preko odlagališča, ki seveda zahteva velika sistemska sredstva. Raj skopirajte list - saj natančno to tudi počnete in dobili bi sledeč makro:

Koda: Izberi vse

Sub Makro1()
'
' Makro2 Makro
' Makro ustvaril: Prtenjak Matjaž, dne 8.12.2009
'

'
    Sheets("List1").Select
    Sheets("List1").Copy Before:=Sheets(1)
End Sub
No če tega samo malce popravite pa dobite makro, ki ga iščete vi:

Koda: Izberi vse

Sub Kopiraj()
  ActiveSheet.Copy Before:=ActiveSheet
End Sub
[/b]
lp,
Matjaž Prtenjak
Administrator
Odgovori