tomasjuve
12.02.14,14:22
ahoj

taka vec mam stlpec v nom nejaky udaj potom prazdne riadky a zase iny udaj a takto dookola. Potrebujem automaticky sposob ako vyplnit cely stlpec tak aby udaj nad sa skopiroval do vsetkych riadkov pod nim az dokym tam nie je novy udaj atd.

dakujem
marjankaj
12.02.14,13:25
Myslíš až po riadok 1048576????
tomasjuve
12.02.14,13:28
neviem co teraz myslis konkretne
marjankaj
12.02.14,13:39
Excel 2010 má 1048576 riadkov. Teda ak chceš vyplniť CELY stlpec.
tomasjuve
12.02.14,13:42
to nie teraz mam subor s ktorym pracujem porozhadzovany len na 400 000 kusy no len dokedy idu data
uko
12.02.14,13:44
napísať manuálne aspoň do troch riadkov - označiť - potiahnuť dodola, pokiaľ potrebuješ
...alebo možno na to je aj nejaká logická funkcia
tomasjuve
12.02.14,13:48
to prepise aj iny udaj
Chobot
12.02.14,14:36
Ja by som to urobil tak, že by som použil nový stĺpec (B) a do neho nakopíroval nasledujúcu funkciu (možno ju niekto ešte vylepší) :

"=IF(ISBLANK(A2);B1;A2)"

Predpokladom je, že v políčku A1 (resp. v prvom poli tabuľky) je údaj a v B1 bude vzorec "=A1".

Potom možno stĺpec A skryť, aby bol bviditeľný len stĺpec B a ostatné.

Výhodou je, že ak kdekoľvek v stĺci A vložíš text, stĺpec B sa automaticky prispôsobí.

Pripojil som aj jednoduchý príklad. Pomôže to?
marjankaj
12.02.14,15:21
Vyplňa to od bunky A1.
Môžeš to v makre zmeniť. Dať tam to SELECTION neodporúčam. To by si sa mohol diviť čo ti to povypisovalo.



Tibor máš pravdu. Bola tam naviac zátvorka. Robil som to v exceli2010 a nechcelo mi to pridať súbor *.xlsm, tak som to skonvertoval do *xls. Ale tam je zase obmedzený počet riadkov na cca 65000.
Už som to opravil, malo by to ísť v obidvoch verziách.
Chobot
12.02.14,15:43
Mne to nefunguje. Vypisuje to syntax error. Nie je tam niekde chyba?
PaloPa
12.02.14,20:59
Používam niečo podobné, pre oselectované bunky:
Sub Vypln_prazdnotu()
Dim x As Variant, xRng As Range, xR As Range
Set xRng = Selection
x = ""

For Each xR In xRng
If Trim(CStr(xR.Value)) <> "" Then
x = xR.Value
Else
xR.Value = x
End If
Next xR
End Sub
tomasjuve
14.02.14,18:01
toto samozrejme pomaha dakujem
arion92
21.02.14,06:10
PaloPa
21.02.14,07:32
Výborné! A to som si myslel že Excel trochu poznám :)
marjankaj
23.02.14,22:39
arion92, díky za tip. Dnes som dostal naexportovaú tabuľku s hromadou prázdnych riadkov. Potreboval som ich vyhodiť. Makro sa mi nechcelo písať, tak som vyskúšal F5.
Označil som stlpec "A", stlačil F5, vybral "špeciálne", zaškrtol "prázdne bunky" a dal "OK".
Potom som dal "odstrániť riadky" a bolo hotovo.