přidávání řádku pomocí makra pod danou oblast

[hormonek]

zdravím,

potřeboval bych udělat makro tak, aby se mi přidával řádek vždy pod nově přidaný řádek pomocí makra... umím akorád makro, kde se mi přidá řádek, vždy na pevně danou oblast (např: A5)... já potřebuji makro naprogramovat tak, že když kliknu, tak se mi přidá řádek pod měsíc leden a tam napíšu únor.. pak kliknu znovu na makro a aby se mi pod měsícem únor vytvořil další prázdný řádek a já tam mohl napsat březen a měsíc prosinec aby se mi automaticky posouval dolů...

přikládám soubor, díky...

[cmuch]

Třeba takto

Kód: Vybrat vše

Sub VlozRadekPodOznaceny()

    Selection.Offset(1, 0).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

[hormonek]

píše mi to makro nelze spustit.. není pravděpodobně k dispozici v tomto sešitu... a přitom mam makra povolené... můžete to prosím nahrát zpátky s již upraveným makrem?

[cmuch]

Nejspíše je špatně navolené makro tomu tlačítku.

[hormonek]

díky, stejně to není přesně to, co jsem chtěl... mám namysli jen klik na makro, přidání řádku pod a můžu vyplnovat atd... každopdně děkuji..

[cmuch]

Tak nahraď řádek v makru tímto

Kód: Vybrat vše

Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove