• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: praca so vsetkymi sheets naraz

Zaslal/a Palooo 17.12.2013 8:41

Ahojte,

dnes som skusal pracovat naraz zo vsetkymi sheetmi ale bez selectovania to nejde

moj problem na kazdom sheete je nejaka tabulka a tu treba zformatovat takze sa mi jedna len o prikazy
- pridat riadok/stlpec
- premiesnit bunku

daju sa urobit tieto operacie tak aby som neselectoval oblast alebo pojednom? - resp. co najefektivnejsie

Zaslat odpověď >

---

eLCHa(17.12.2013 9:11)#016831

Jsou případy, ve kterých je výhodnější použít Select než vymýšlet nějaké složitosti. A tohle je asi jeden z nich ;)
Existuje sice možnostDim shArray As Sheets
Set shArray = Sheets(Array("List1", "List2", "List3"))ale potom stejně budete pracovat v cyklu ;)citovat

Palooo(17.12.2013 9:13)#016832

toto som prave skusal ale nejde spravit nasledne toto:

sheets(shArray).cells(1,2) = sheets(shArray).cells(2,2)citovat

eLCHa(17.12.2013 9:20)#016833

ne nejde
musel bysteshArray(I).Cells(1,2) = shArray(I).Cells(2,2), ale to už je cyklus.
Takže je to na zvážení, co je v tu chvíli praktičtější.citovat

Palooo(17.12.2013 9:33)#016834

zas ide to oklamat takto:

shArray = Array("list1", "list2", "list3")
Sheets(shArray).Select
Cells(3, 3).Copy
Cells(1, 1).Select
ActiveSheet.Paste

ale ten moj zapis je otrasny :))

hlavne sa mi tam nepaci ze musim urobit navyse toto: Cells(1, 1).Selectcitovat

Palooo(18.12.2013 9:31)#016851

tak pastovanie s 3 sheets by slo takto:

shArray = Array("list1", "list2", "list3")
Sheets(shArray).Select
Cells(3, 3).Copy
Cells(1, 1).PasteSpecial

uz len zistit ako doplnat riadok/stlpec (naraz)citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse