No každý píše tak ako vie. S tým je ťažko niečo urobiť.
Možno ešte tak poradiť, aby sa radšej venoval niečomu inému.
napríklad aj takto
For xx = 1000 To 2 step -1
alebo
If cells(xx, 2) = nn Then
Label257.Caption = aa.cells(xx, 4)
exit sub
end if
Hahaha
lubo napsal/a:
Zaokrouhlování na zadaný počet platných číslic je normálně legitimní požadavek. Překvapuje mne, že Excel to neumí. Někdy se ještě do počtu platných číslic nepočítá vedoucí "1".
=IFERROR(CHOOSE(MIN(INT(LOG(1,74*A1))+1;4);1,74*A1;ROUNDDOWN(1,74*A1;-1);ROUND(1,74*A1;-1);ROUND(1,74*A1;-2));A1)
alebo takto
=IF((A1*1,74)<10;(A1*1,74);ROUND((A1*1,74)-5*((A1*1,74)<100);IF((A1*1,74)<1000;-1;-2)))
prípadne ak v A1 je to už prenásobené
=IF(A1<10;A1;ROUND(A1-5*(A1<100);IF(A1<1000;-1;-2)))
Ale takto jednoducho to zadávateľ asi nechcel. Treba to robiť, čo najviac zložito, aby sa v tom ani autor nevyznal. Asi si niekto robí prdel.
Thomas1971 napsal/a:
Díky všem. Sloupec A je vždy vyplněný.
@Stalker: použil bych tuto verzi, ale nic se mě nepřekopíruje, List2 zůstává prázdný
@Stalker
Ako vieš, že všetky bunky v stlpci "A" sú vyplnené? Možno je celý stlpec "A" prázdny.
Na to ti netreba VBA.
Daj automatický filter, vyfiltruj "hotovo"
A potom iba CTRL+C a CTRL+V.
Makro si môžeš aj nahrať a upraviť.
eLCHa napsal/a:
myslím, že vím co je potřeba
9H7UR1IZ9
Overenie dát
Podmienené formátovanie.
No vzorcami asi ťažko. Keby si tam niečo zadal, tak predsa ten vzorec prepíšeš.
@eLCHa
Tak toto mi uniklo. Ktovie čo myslel pod "nejvyšším" číslom.
A pokiaľ ide o duplicity, tak tiež očakávam dlhú diskusiu. Ale načo bude dávať prílohu. Určite ide o "citlivá data"
@elninoslov.
Nebolo. Musíš tam ešte dorobiť číslo poradia. Teda najväčšie číslo bude 1. v poradí.
Dosť by som sa divil, keby niekto našiel jednoduchšie riešenie ako uviedol Pavlus.
A kedy dáš tú prílohu?
Podľa dostupných údajov problém bude zrejme medzi stoličkou a klávesnicou.
No ešte to skús na inom PC, či to robí podobne.
Merlin99 napsal/a:
TEXTJOINT je presne ono DEKUJI MOC jste mi pomohli díky
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.