Stránka 1 z 1

Úprava makra (vyřešeno)

Napsal: 13 dub 2005 09:35
od Axamith
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

Napsal: 13 dub 2005 10:26
od miras
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 :wink:. 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

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 :wink:

Re: Úprava makra

Napsal: 03 kvě 2005 17:54
od mikel
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.