Bez prílohy? Bez makra? Bez hlášky? Bez verzií?
...
Podľa mňa je odpoveď: 42
Triviálne, máte to v maily.
Odomknúť to nie je problém, ale heslo mi to nezobrazí.
Asi sa jedná o xlsm. Prílohu treba zabaliť do ZIP. Ale ako vieme, že ste autorom? Bol zošit FREE ?
Tu to máte zmenené tak, aby to nepoužilo fnc, ktoré Off2021 nemá (HSTACK, TEXTSPLIT, TAKE). Zatiaľ som pomocný stĺpec nepoužil. Čo si pamätám tak automatické "zmaticovenie" vzorca bolo už v 2021 implementované. Mohli by ste to overiť?
EDIT:
A na ten počet tam máte def. názov POC_NAZVOV
Budete si musieť asi radšej pomôcť prevodom. Záleží na kombinácii jazyku Excelu a jazyku systému. Mne to napríklad na SK/SK dáva M/D/YYYY. Combobox uchováva textové hodnoty, a dátum je číslo, ktoré automaticky prevedie na text. Mrknite na prílohu, rieši to tak, že z dátumov urobí texty, a pri vkladaní opačne.
Tie čísla pred "text" sú jedinečné pre všetky názvy? Teda ak začína B2 číslom 01, tak už žiaden iný riadok v B:B nezačína číslom 01?
Na akej verzii Office to bude behať?
Je možné použiť pomocný stĺpec?
O koľko asi pôjde celkovo riadkov?
EDIT:
Pre nový Office je to brnkačka, kvôli pokročilým fnc. Tu je príklad.
=TAKE(SORT(FILTER(HSTACK(CISLA;OBL_NAZEV;IDX_KB);ISNUMBER(CISLA);"");1;1);;-2)
=VZÍT(SORT(FILTER(SROVNAT.VODOROVNĚ(CISLA;OBL_NAZEV;IDX_KB);JE.ČISLO(CISLA);"");1;1);;-2)
Definované názvy:
CISLA:
=INT(INDEX(TEXTSPLIT(OBL_NAZEV;" ";;FALSE);;1))
=CELÁ.ČÁST(INDEX(ROZDĚLIT.TEXT(KB!$B$2:$B$25;" ";;NEPRAVDA);;1))
IDX_KB
=INDEX(OBL_KB;INT((ROW(OBL_KB)-2)/4)*4+1)
=INDEX(OBL_KB;CELÁ.ČÁST((ŘÁDEK(OBL_KB)-2)/4)*4+1)
OBL_KB
=OFFSET(KB!$A$2;;;COUNTA(KB!$A$2:$A$1001)*4)
=POSUN(KB!$A$2;;;POČET2(KB!$A$2:$A$1001)*4)
OBL_NAZEV
=OFFSET(OBL_KB;;1)
=POSUN(OBL_KB;;1)
Príklad načítania zoznamu z iného zatvoreného zošitu. V tomto prípade musí byť v rovnakom adresári ako Váš súbor, a musí mať daný list. Mrk na makro. Použil som ADO. Veľmi jednoduchý je aj iný spôsob. Do dočasných buniek (napr. do skrytého listu) sa vložia "dolovacie" vzorce na bunky rozsahu v zatvorenom zošite, a hneď sa prevedú na hodnoty. Načítanie je potom už triviálne. Oba spôsoby nevyžadujú mať druhý zošiť otvorený, ale samozrejme sa vyžaduje znalosť umiestnenia súboru, jeho názvu, názvu listu, a rozsah.
"skutecnost!E:E" je chyba. Ten 3. parameter určuje číslo stĺpca, z ktorého sa má vrátiť hodnota. Nemôžete tam dať milión buniek s ktovieakou hodnotou. Tam patrí jedno číslo. Vo Vašom prípade 4.
=VLOOKUP(A2;skutecnost!$A$2:$E$667;4;FALSE)
=SVYHLEDAT(A2;skutecnost!$A$2:$E$667;4;NEPRAVDA)
Inak súbor sa hlási ako poškodený. A dajte si pozor na absolútne a relatívne adresovanie. V tomto prípade treba absolútne, a Vy máte relatívne.
abs.
skutecnost!$A$2:$E$667
rel.
skutecnost!A2:E667
A čo tým presnejšie myslíte?
Súvislý / nesúvislý? Viacriadkový / viacstĺpcový? Vopred daná / na základe niečoho počítaná / aktuálne vybraná myšou - oblasť? ... kombinácie ...
V niektorom z prípadov napr. jednoducho takto:
ListBox1.List = Worksheets(1).Range("A1:A4").Value2
ComboBox1.List = Worksheets(1).Range("A1:A4").Value2
V inom pomocou cyklu treba nachystať pole, dá sa aj po jednom prvku... treba upresniť.
Nejaké príklady...
Napr.
Anonymizujte oba druhy súborov a priložte ich. Nemeňte formáty, umiestnenia, názvy listov a pod. Aká je verzia Office, na ktorej to bude bežať? Súbory sú uložené na disku v PC alebo na cloude?
To LEN/DÉLKA a VALUE/HODNOTA dajte preč
=IF(AND(INDEX(preplatok;O1;10)="a";INDEX(preplatok;O1;12)=0);"zaplať";"nie")
=KDYŽ(A(INDEX(preplatok;O1;10)="a";INDEX(preplatok;O1;12)=0);"zaplať";"nie")
Tak?
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.