51182_snimek-obrazovky-2021-09-09-072005.png
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Kopírování sloupvů z vybrané oblasti
MS Excel
Téma: Kopírování sloupvů z vybrané oblasti 
Zaslal/a Onykl 9.9.2021 7:24
Dobrý den,
potřeboval bych z vybrané oblasti kopírovat 1 a 3-6 sloupec a tyto sloupce následně vložit do druhého sešitu od pole B3.
Předem děkuji za veškeré rady.
(9.9.2021 8:13)#051183
Omlouvám se, pokud jsem se chybně vyjídřil.
Problém je to, že nevím jak načíst data z aktivní oblasti a říct aby červená pole překopírovala.citovat
Problém je to, že nevím jak načíst data z aktivní oblasti a říct aby červená pole překopírovala.citovat
Sub Kopiruj()
Dim rngCiel As Range, rngZdroj As Range, rngOldSelection As Range
Set rngOldSelection = Selection
Set rngZdroj = Intersect(rngOldSelection, Range("A:A,C:F"))
Set rngCiel = Workbooks("Cieľový zošit.xlsx").Worksheets("Cieľ").Range("B3")
If Not rngZdroj Is Nothing Then rngZdroj.Copy rngCiel
Application.CutCopyMode = False
rngOldSelection.Select
End Sub
Dim rngCiel As Range, rngZdroj As Range, rngOldSelection As Range
Set rngOldSelection = Selection
Set rngZdroj = Intersect(rngOldSelection, Range("A:A,C:F"))
Set rngCiel = Workbooks("Cieľový zošit.xlsx").Worksheets("Cieľ").Range("B3")
If Not rngZdroj Is Nothing Then rngZdroj.Copy rngCiel
Application.CutCopyMode = False
rngOldSelection.Select
End Sub
Příloha: 
51199_kopiruj.zip (39kB, staženo 12x)
citovat51199_kopiruj.zip (39kB, staženo 12x)Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Aktivní diskuse
Týden v roce
Petr92 • 16.7. 15:34
Řazení podle času v kategoriích
veny • 16.7. 11:34
špatný výpočet ze zisku - příčina?
Anonym • 12.7. 22:56
špatný výpočet ze zisku - příčina?
Jakoby • 12.7. 12:35
Řazení podle času v kategoriích
Marekh • 12.7. 9:55
Porovnávací Tabulka
Jess • 8.7. 20:49
Vzorec pro zkopírování obsahu buňky.
veny • 6.7. 8:28
RSS nejnovější články