No tu asi nepôjde o zlučovanie listov, ale iba prepojenie dát. Ale ak chcete pripojiť data z jedného lisťu do druhého, a potom neskor znova, len na prvy voľný riadok.
Urobte peílohu kde bude cca 10riadjo dát, a vysledky alé by mali byť v tej druhej tabulke. Na reálnom príklade sa bude praxovať lepšie.
Zmente v procedúre listu "zaznam"
Private Sub Worksheet_Change(ByVal Target As Range)
riadok
If Not IsNumeric(Bunka.Value) Then
na
If Not IsNumeric(Bunka.Value) Or Right(Bunka.Value, 1) = "+" Or Right(Bunka.Value, 1) = "-" Then
Skúste pridať nejakú krátku prílohu s príkladom (vymyslené dáta).
Presne takto si myslím, že to janci.bris tým nelogickým popisom myslel. Len som nevedel prísť na takýto parádny vzorček. Suprový.
Ja som si to urobil ešte na skúšku aj s pomocnými stĺpcami bez makra. Ale toto nemá chybu.
Do IF si ho už hádam obalí
Pred časom som použil CDO, niečo takéto, tak si to upravte. Máte tam obe verzie aj z formuláru aj z listu.
Nemyslíte Vy náhodou niečo takéto ?
Pokúsil som sa aj o maticové riešenie, ale zatiaľ neúspešne. Problém u VBA zase je, že pri jednoduchšom riešení (Match a polia) nedokáže porovnať tie Vaše "antiznaky".
Ak to myslíte iba takto jednoducho, tak nech sa páči jedno z riešení.
pridajte prílohu, a zajtra sa Vám na to ja alebo hocikto iný mrkneme. Lebo ťahať zase všetky info, či je okolo tabuľky ešte niečo, aká je široká, ako sa volá... Z prílohy to bude snáď jasné. Takže hocikde aj v strede tabuľky ak napíšete niečo do B tak sa všetko pod týmto riadkom posunie dole.
...dokud nepride nejaky cislo vetsi jak nula...
Takto ?
Len doplním, že cez mail sme to ešte máličko upravili. Nemám čas študovať iné metódy, sry :(
Ešte musím zakopnúť o rozpracované veci, čo som tu sľúbil ešte pred mojím "výpadkom" :) ...
Takto jednoducho, ak sa bude jednať o daný príklad. Každú z položiek možno prečítať podľa mena. Ak sa bude jednať o inak napísanú stránku, tak "vyhľadávacie" reťazce treba vo funkcii zmeniť, alebo prispôsobiť funkciu tak, aby boli voliteľné. V každom prípade ich ale musíme poznať (nazretím do kódu).
Len zbrucha, nemam na nič iné čas, a nemôžem z tabletu overiť. Nahraďte
... InStr(Subor, C) ...
Za
... InStr(Left(Subor, 6), C) ...
alebo za
... InStr(Left(Subor, InStr(Subor, "_")-1), C) ...
Pozrite sa na makro v Module2 vo Vami uvedenom súbore, a na makro v Module1 v tom mojom. Nájdite 30 rozdielov
Dosť srandy. Uvidím, možno Vám na to pozriem, ale nejako mi to nejde do hlavy. Asi sa na data zle pozerám, ale ako ste vypočítali počet 21 ks pre DILNA 1 položku M52 (DESTICKY JINE)?
Pre túto dielňu sú tam práce:
A-1,01
B-8,05
D-6,03 (položka M52 obsahuje 3 ks)
D-1,01
Teda výdajka bude 4x3 = 12 ks.
Keď teda môže byť nejaký materiál vo viacerých prácach, je potrebné na výdajku uviesť iba súčet tohto materiálu, bez ohľadu na prácu a Spec ? Iba s ohľadom na dielňu, tak už si matroš rozoberú, kto koľko potrebuje. Dobre som to pochopil?
Ďalej, môže nastať situácia, keď v OHL bude napr. DILNA 1 aj pomedzi inými dielňami?
Môže sa použiť ten filter v OHL, alebo je to len pre Vás, a už tieto "zdrojové" údaje v OHL budú filtrované pre tú výdajku ?
Uvidíme, no ... povedal slepý...
Áno cez Google si takmer vždy nájdem čo potrebujem, ale Vovka má pravdu. On nevraví o riešeniach, ale o popise parametru. A to MUSÍ byť implementované v programe správne. A nieje. Každý PC nieje na nete. A takých vecí je viac nielen v nápovede. MATCH má popis posledného parametru "Typ_zhody" - je jasné čo to je, ale VLOOKUP má ten istý posledný parameter, ktorý nastavuje tiež typ zhody nazvaný "vyhľadávanie rozsahu" ("Range_lookup"), a to je aspoň podľa mňa úplný nezmysel. Tieto veci by mali byť pomenované správne a výstižne. Nápovedu používam minimálne, ale zase som stále na nete, a ak zadám do googlu "excel vlookup msdn", hneď prvý odkaz mi napovie, ale som na nete, niekto nemusí. Riešenie nejakej úlohy je vec iná. To si nájde človek napr. tu
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.