Udělal jsem si v Excelu makro. Vyberu nějaké buňky a někam je zkopíruji.
Zde je zdroják ve Visual Basicu :
Sub Vložit()
'
' Vložit Makro
' Makro zaznamenané 13.4.2005, Axamith
'
'
Range("A4:G4").Select
Selection.Copy
Range("A5").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Potřeboval bych ho upravit tak, aby nevkládalo do buňky A5, ale do jakékoliv právě vybrané buňky. Je to řešitelné. Děkuji za radu
Úprava makra (vyřešeno)
Nemám teď možnost vyzkoušet, takže ti to neřeknu úplně přesně, jen bych nadhodil nápad. Ty potřebuješ následující postup. Označit oblast A4:G4, zkopírovat ji, pak označit nějakou buňku a tam to vložit. Kdybys to chtěl provádět jedným makrem, musel bys nějakým způsobem počkat, než se změní označená oblast a pak teprve vložit. Neříkám že by to bylo nemožný, ale z hlavy to fakt nevymyslím . Mnohem jednodušší je rozdělit to na makra 2. První spustíš, to zkopíruje zadanou oblast, označíš buňku kam to chceš a druhý makro to tam vloží.
První by vypadalo takhle
Druhý takhle:
Vím že to není úplně optimální, jestli budu mít čas a chuť zkusím vymyslet něco lepšího
První by vypadalo takhle
Kód: Vybrat vše
Sub Kopiruj()
Range("A4:G4").Select
Selection.Copy
Druhý takhle:
Kód: Vybrat vše
Sub Vloz()
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Vím že to není úplně optimální, jestli budu mít čas a chuť zkusím vymyslet něco lepšího
Re: Úprava makra
Udělej to takhle:
Sub Vložit()
Range("A4:G4").Copy
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Takhle napsané makro zkopíruje oblast A4:G4, aniž by ji vybral a zkopíruje ji do aktivní buňky.
Sub Vložit()
Range("A4:G4").Copy
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Takhle napsané makro zkopíruje oblast A4:G4, aniž by ji vybral a zkopíruje ji do aktivní buňky.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 1
- 379
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
- 2
- 1878
-
od lamin_cz
Zobrazit poslední příspěvek
13 kvě 2023 18:18
-
- 6
- 2281
-
od teichmann.ondrej
Zobrazit poslední příspěvek
27 zář 2023 12:21
-
- 16
- 5994
-
od Bary-Jan
Zobrazit poslední příspěvek
08 lis 2023 09:53
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 2 hosti