excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
Příspěvky uživatele
< návrat zpět
Kopie oblasti buněk mezi sešity (21.12.2019 22:30)
marjankaj napsal/a:
RESIZE je zbytočné. A je jedno ktorý list bude aktívny.
Otestuj si přiložené soubory a uvidíš
Kopie oblasti buněk mezi sešity (21.12.2019 22:13)
marjankaj napsal/a:
Keď tak na to pozerám stačilo vyhodiť ten RANGE.
Workbooks(zdrojSesit).Worksheets(zdrojList).Range(Cells(1, 1), Cells(122, 34)).Copy _
Workbooks(cilSesit).Worksheets(cilList).Cells(1, 1)
Jak se to vezme.
Ano kód bude funkční, ale pouze za předpokladu, že zdrojový list bude aktivní.
V případě cells(1,1).resize .....
na tom nezáleží
viz soubory
Kopie oblasti buněk mezi sešity (21.12.2019 22:03)
marjankaj napsal/a:
Stalker napsal/a:Pokud chci vybrat oblast dá se použít tento zápis Range(Cells(1, 1), Cells(122, 34)), i když bych spíše volil
Range("A1").Resize(122, 34)
nebo
Cells(1,1).Resize(122, 34)
Nebo si stojím na vedení?
A skúšal si to? Tiež by to malo hodiť chybu.
Zkoušel a projde bez problému, ani nemusí být aktivní zdrojový list.
Sub qq()
Workbooks("zdrojSesit.xlsm").Worksheets("zdrojList").Cells(1, 1).Resize(122, 34).Copy _
Workbooks("cilSesit.xlsx").Worksheets("cilList").Range("A1")
End Sub
Kopie oblasti buněk mezi sešity (21.12.2019 21:49)
Začátečník napsal/a:
náhradou Range("A1:AH122") za Range(Cells(1,1),Cells(122,34))) zhavaruje?
Range(Cells(1,1)) není až taková zhovadilost, ale souhlasím, postačuje Cells(1,1)
Protože Range(Cells(1,1),Cells(122,34)) projde a zhavaruje to právě na Range(Cells(1,1))
Kopie oblasti buněk mezi sešity (21.12.2019 21:45)
marjankaj napsal/a:
No ja tento zápis používam a funguje. Má to využitie v cykloch. Iba v tomto prípade s COPY to nefunguje.
Jakože používáš např Range(Cells(i,1)) ?
No není mi jasný proč bych měl jednu buňku tedy např. cells(1,1) ještě balit do range? Vždiť stačí uvest jen cells(1,1).
Pokud chci vybrat oblast dá se použít tento zápis Range(Cells(1, 1), Cells(122, 34)), i když bych spíše volil
Range("A1").Resize(122, 34)
nebo
Cells(1,1).Resize(122, 34)
Nebo si stojím na vedení?
Kopie oblasti buněk mezi sešity (21.12.2019 21:28)
Začátečník napsal/a:
Už jsem se smířil s chybou v MSO2007 a s prostým Copy -> Paste
O Žádnou chybu se nejedná. Jde o to, že sešit a list ze kterého se provádí copy MUSÍ být vždy aktivní na cíli (Destination) nezáleží. Sešit do kterého se má kopírovat musí být samozřejmě otevřen.
Zápis musí být ve tvaru jaký uvádí marjankaj, protože Range(Cells(1,1)) je zhovadilost.
Kopie oblasti buněk mezi sešity (21.12.2019 19:52)
Začátečník napsal/a:
Bláhově jsem se domníval, že Range(Cells(1, 1), Cells(122, 34)) === Range("A1:AH122").
Range(Cells(1, 1), Cells(122, 34)).Select
Vybere jakou oblast?
Kopie oblasti buněk mezi sešity (21.12.2019 18:15)
A co takhle použít resize, místo toho fujtajblu.
Podmíněné formátování prohodit barvy šipek (18.12.2019 23:05)
???
https://www.youtube.com/watch?v=tGY70sdpaLc
https://www.youtube.com/watch?v=faPSXNkU1Y0
Nefunkční makro (12.12.2019 12:53)
Jaj, sorry. Tu interpunkci v názvu makra sem vůbec nezaznamenal, moje chyba. Jak už tu zaznělo do kódu něco takového nepatří, což sis sám ověřil v praxi.
Počet jedinečných hodnot s krytériem (11.12.2019 16:28)
https://exceljet.net/formula/count-unique-text-values-with-criteria
Nefunkční makro (11.12.2019 15:09)
Upraveno, otestuj.
Nefunkční makro (11.12.2019 11:43)
Frida napsal/a:
.. myslíte si, že bych Vás mohl poprosit i o naprogramování makra na "vymazání"?....
Jo klidně, ale musím vědět, které buňky se mají vymazat.
Ve kterých se má nastavit defaultní hodnota a jaká.
Z toho kódu co je v přiloženém souboru mi to bohužel není jasné.
Buď detailně popsat, které buňky (rozsahy buněk), nebo přiložit vyplněný formulář a potřebné vyznačit (např barvou písma...)
Nefunkční makro (10.12.2019 15:23)
Vyzkoušej tento soubor. Řešil sem jen makro na archivaci.
Přeuspořádání dat ze sloupce do řádku (2.12.2019 20:04)
Makrem
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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.
RSS nejnovější články