Re: Excel nyomtatási feladat
Zsolt Nagy
nagyzsolt80 at gmail.com
2014. Jan. 19., V, 12:49:25 CET
Köszönöm Péter a segítséget... + természetesen Zsuzsának is :)
valahogy így néz ki a kód:
Sub Nyomtatásos()
'
' Nyomtatásos Makró
'
' Billentyűparancs: Ctrl+á
'
ChDir "E:\Excel"
Workbooks.Open Filename:="E:\Excel\2014-01-01-001.xls"
ActiveWorkbook.PrintOut From:=3, To:=3, Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
ChDir "E:\Excel"
Workbooks.Open Filename:="E:\Excel\2014-01-01-002.xls"
ActiveWorkbook.PrintOut From:=3, To:=3, Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
ChDir "E:\Excel"
Workbooks.Open Filename:="E:\Excel\2014-01-01-003.xls"
ActiveWorkbook.PrintOut From:=3, To:=3, Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
ChDir "E:\Excel"
Workbooks.Open Filename:="E:\Excel\2014-01-01-004.xls"
ActiveWorkbook.PrintOut From:=3, To:=3, Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
ChDir "E:\Excel"
Workbooks.Open Filename:="E:\Excel\2014-01-01-005.xls"
ActiveWorkbook.PrintOut From:=3, To:=3, Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
már csak annyi segítség kell, hogyan tudom ciklusba rakni a file neveket...
Zsolt
2014. január 19. 12:37 Molnár Péter írta, <molnarp at afg.hu>:
> Hello!
> En regen ugy csinaltam ilyet, hogy rogzitettem egy makrot.
> ebben a leendo feladat cilus magja volt.
> Csak csinalni kell.
> 1. Tehat makro rogzitese menupont
> 2. Megnyitod az elos allomanyt
> 3. nyomtatod, amit akarst.
> 4. Makro rogzitesenek leallitasa.
> 5. Makro szerkesztese:
> Egy ciklust raksz a ciklusmag kore, amiben a szukseges valtozo dolgokat,
> mint allomanynev peldaul folyamatosan valtoztatod.
> Ennyi.
>
>
> --
> Udv:
> Molnar Peter
> http://www.petersoft.hu
>
>
> _______________________________________________
> Techinfo mailing list
> Techinfo at lista.sulinet.hu
> Fel- és leiratkozás: http://lista.sulinet.hu/mailman/listinfo/techinfo
> Illemtan: http://www.szag.hu/illemtan.html
> Ügyfélszolgálat FAQ: http://sulinet.niif.hu/
>
--------- következő rész ---------
Egy csatolt HTML állomány át lett konvertálva...
URL: <http://lista.sulinet.hu/pipermail/techinfo/attachments/20140119/b123d938/attachment.html>
További információk a(z) Techinfo levelezőlistáról