Sub Makro1()
Set oblast = Range(Selection, Selection.Offset(InputBox("koľko riadkov treba skopírovať?"), 0))
Selection.AutoFill Destination:=oblast
End Subcitovat
Zaslal/a
5.1.2015 22:20Dobrý den,
mám na řádku několik funkcí, které mi ve výsledku generují učitou číselnou řadu (kód).
Potřeboval bych tento řádek automaticky zkopírovat na dalších třeba 1000 řádků a to nějak elegantněji a rychleji, než přetahovat pomocí myši.
Díky za rady
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.