Excel VBA

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Dawyck
nováček
Příspěvky: 3
Registrován: prosinec 17
Pohlaví: Nespecifikováno
Stav:
Offline

Excel VBA

Příspěvekod Dawyck » 06 led 2018 21:35

Zdravím,
mám prosbu. Mám v souboru makra na vytvoření listu a smazání listu. Vše funguje tak, že na začátku se ze vzoru udelá list Poptávka. Po uložení do PDF a XLSX se daný list smaže. No a jak to mám nastavené na jméno listu, tak jsem zjistil, že někdy potřebuji mít těch listů s Poptávkou více. Jak mám upravit tyhle dvě makrat tak, abych mohl nasekat těch listů více?
Díky moc
David

Sub VytvorNovyListPoptavka()
'
' vytvoří kopii listu Vzor na list Poptavka
'
'
Sheets("Vzor").Select
Sheets("Vzor").Copy Before:=Sheets(1)
ActiveSheet.Name = "Poptávka"
End Sub



Sub SmazListPoptavka()
' smaže list Faktura
Application.DisplayAlerts = False
Sheets("Poptávka").Delete
Application.DisplayAlerts = True


End Sub

Reklama
guest
Pohlaví: Nespecifikováno

Re: Excel VBA

Příspěvekod guest » 07 led 2018 14:17

No přeci v cyklu...

For i = 1 To PocetListu
... váš kód (používající proměnnou i třeba pro pojmenování listu
Next i


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Excel a OneDrive
    od sginfo » 11 zář 2023 15:28 » v Kancelářské balíky
    16
    5985
    od mirekol Zobrazit poslední příspěvek
    20 říj 2023 08:31
  • Excel - vlastní formát Příloha(y)
    od Story-Long » 11 srp 2023 14:50 » v Kancelářské balíky
    3
    1837
    od Story-Long Zobrazit poslední příspěvek
    14 srp 2023 10:11
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    260
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • Excel - problém se vzorci
    od honzzicek » 28 čer 2023 21:45 » v Kancelářské balíky
    2
    1633
    od honzzicek Zobrazit poslední příspěvek
    01 črc 2023 08:57
  • Excel - funkce když
    od Martyn20 » 13 črc 2023 11:56 » v Kancelářské balíky
    5
    2317
    od mmmartin Zobrazit poslední příspěvek
    13 črc 2023 18:44

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 5 hostů