Příspěvky uživatele


< návrat zpět

Prenos riadku na základe splnenej podmienky (6.10.2016 17:36)

Sub makro()

'Skopíruje 9buněk od kurzoru doprava
ActiveCell.Offset().Resize(, 9).Copy

Range("A1").Select
Do Until ActiveCell = ""
ActiveCell.Offset(1).Select
Loop
ActiveCell.PasteSpecial xlPasteAll
ActiveCell = ActiveCell.Offset(-1).Value + 1
End Sub


Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje