< návrat zpět

MS Excel

Téma: praca so vsetkymi sheets naraz rss

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ěď >
icon eLCHa(17.12.2013 9:11)#016831
eLCHa
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
avatar
toto som prave skusal ale nejde spravit nasledne toto:

sheets(shArray).cells(1,2) = sheets(shArray).cells(2,2)citovat
icon eLCHa(17.12.2013 9:20)#016833
eLCHa
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
avatar
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
avatar
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)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje