Příspěvky uživatele


< návrat zpět

Můžu poprosit o ještě jednu radu?

Jak lze přetvořit tento kód bez použití funkce select:

Range(Cells(radek, 1), Cells(radek + 3, 1)).Select
Selection.Copy
Sheets("pomocná tabulka").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Základní skupiny").Select
Range(Cells(radek, 3), Cells(radek + 3, 9)).Select
Selection.Copy
Sheets("pomocná tabulka").Select
Range("C1").Select
ActiveSheet.Paste

děkuji

Velice děkuji za radu :)
Vše nyní funguje jak má.
Díky :-)

Mám problém se čtením pomocných dat z jiných listů ve VBA.
Pokaždé, když chci přečíst z jiného listu nějaká pomocná data, přepne se mi v excelu aktuálně vybraný list.
Výsledkem je, že pokud kliknu na tlačítko, které spustí program, začnou mi na obrazovce neustále chaoticky přeskakovat listy.
Používám funkci Sheets("název listu").Select.
Nevíte prosím někdo o nějaké, která by byla schopna yměnit list, z nějž se data čtou, ale přesto by se mi nezměnil výběr listu a po celou dobu běhu programu tak byl vidět pouze hlavní list?
Děkuji za radu


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