Úprava makra (vyřešeno)

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Axamith
nováček
Příspěvky: 47
Registrován: duben 05
Bydliště: Zábřeh
Pohlaví: Nespecifikováno
Stav:
Offline
Kontakt:

Úprava makra (vyřešeno)

Příspěvekod Axamith » 13 dub 2005 09:35

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

Reklama
miras
Tvůrce článků
Level 5
Level 5
Příspěvky: 2159
Registrován: červenec 04
Pohlaví: Nespecifikováno
Stav:
Offline

Příspěvekod miras » 13 dub 2005 10:26

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:

Uživatelský avatar
mikel
Level 5
Level 5
Příspěvky: 2298
Registrován: květen 05
Bydliště: Karviná
Pohlaví: Muž
Stav:
Offline

Re: Úprava makra

Příspěvekod mikel » 03 kvě 2005 17:54

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.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    379
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43
  • PrestaShop 1.7.7.4 - úprava blogu
    od Bublajs28 » 10 kvě 2023 10:59 » v Programování a tvorba webu
    2
    1878
    od lamin_cz Zobrazit poslední příspěvek
    13 kvě 2023 18:18
  • Wodpress úprava šablony
    od teichmann.ondrej » 26 zář 2023 15:45 » v Programování a tvorba webu
    6
    2281
    od teichmann.ondrej Zobrazit poslední příspěvek
    27 zář 2023 12:21
  • WIN7 nefunguje uprava jasu
    od Bary-Jan » 08 říj 2023 14:02 » v Windows 11, 10, 8...
    16
    5994
    od Bary-Jan Zobrazit poslední příspěvek
    08 lis 2023 09:53

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 2 hosti