Cells(i, 11).Select
Selection.Copy
Cells(x, y).Select
Activesheet.Pastecitovat
Zaslal/a felli 31.1.2011 16:13
Zdravim,
potrebuji makro, ktere mi zkopiruje pouze pozadovanou hodnotu a ne cely radek jako v tom kodu If Cells(i, 11).Value = "ahoj " Then
Rows(i).Select
Selection.Copy
List47.Activate
Cells(Cells(65000, 1).End(xlUp).Row + 1, 1).Select
ActiveSheet.Paste
List19.Activate
Diky
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.