Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  10 11 12 13 14 15 16 17 18   další » ... 231

To je triviálne. Len je dobré priložiť prílohu s príkladom. Na akom mieste dáta sú, v akom formáte, koľko pod sebou, do akej šírky, podľa ktorého stĺpca sa určuje začiatok a koniec, v ktorom stĺpci je ANO/NE, kopírovať celé bunky aj s formátom, ale iba hodnoty ... Toto nie je hra "uhádni na čo myslím". Pre vloženie prílohy sa musíte zaregistrovať.
A čo tie dáta po skopírovaní, ostanú alebo sa z pôvodného umiestnenia zmažú, veľa otázok.

=SUMPRODUCT($A$1:$A$3;--(COUNTIF(OFFSET($B$1:$D$1;ROW($A$1:$A$3)-1;);H1)>0))
=SOUČIN.SKALÁRNÍ($A$1:$A$3;--(COUNTIF(POSUN($B$1:$D$1;ROW($A$1:$A$3)-1;);H1)>0))

Dá sa to napr. aj naindexovať s tým, že počíta s rozširovaním dátumov vpravo aj riadkov dole. Vzorce treba natiahnuť na dostatočnú veľkosť. Možno by bolo ale lepšie napísať to v PowerQuery.

To predsa nebude problém. Ak máte dátumy na rovnakých riadkoch, pridajte si stĺpec Index, vyfiltrujte iba potrebné riadky. Ďalšie potrebné dáta dajte načítať v US formáte. Budete mať z toho automaticky normálny dátum, normálne ceny, normálne čísla. To je ťažko keď nedáte príklad.
Tá DB to exportuje do súboru? Môžete priložiť taký súbor (alebo iba časť) so zmenenými bezcennými dátami? Ak to PQ ťahá rovno z DB, bez prestupného súboru. Tak to načítajte, a také hrubé dáta sem postnite ako obyč. Tabuľku. Pokúsime sa Vám na ňu namontovať také PQ, ktoré to umravní, a budete mať použiteľné dáta. Samozrejme dodajte príklad toho, aký výsledok z priloženej Tabuľky požadujte. V PQ nie som zrovna doma, ale toto by sa dalo ...

PS: 3 strany, niekoľko žiadostí o prílohu, a nič ... to nie je dobre 7

O PQ ste sa doteraz nezmienil! Veď tie dátumy umravnite rovno v PQ. A je po starostiach. A to s tým prvým riadkom mi nejde do hlavy. Ak v dátach prvý riadok nieje vôbec, tak sa dá v PQ vynechať. Ale na to treba 2 prílohy priložiť : zdrojový súbor, a požadovaný výsledok. Dáta skráťte a anonymizujte.

Tak ak nemôžete neustále prispôsobovať dáta, tak prispôsobte vzorec, aby hľadal textodátum. Takéto niečo hľadá dd.mm.yyyy (to "yyyy" tam ale nadávajte !) ak tam nemáte "0" tak dajte vo vzorci d.m.
=HLOOKUP(TEXT(C3;"dd.mm.")&YEAR(C3);List1!$C$2:$AG$33;MATCH(B3;List1!$B$3:$B$33;0)+1;FALSE)
=VVYHLEDAT(HODNOTA.NA.TEXT(C3;"dd.mm.")&ROK(C3);List1!$C$2:$AG$33;POZVYHLEDAT(B3;List1!$B$3:$B$33;0)+1;NEPRAVDA)

Veľkosť aktuálneho rozsahu je možné tiež zisťovať aj vzorcom. A ten pohodlný (pardon "pohodový") zamestnanec už nemusí urobiť ani prd 1
Na to je ale potreba priložiť prílohu, ako sú dáta presne umiestnené, offsetované, aby sa dal urobiť vzorček...

Mne sa to viac opticky pozdáva s pridaným ďalším bielym riadkom. Nemôžem si pomôcť. Ale kľudne Vám tam nechám len tie čierne.
Každopádne stále tu bude jeden problém. Posunul som hlavičku a pätu tak, aby ste to videl. Mrknite, kde začína a kde pokračuje posledná tbl. Toto je riešiteľné asi iba kontrolovaným usporadúvaním jednotlivých tabuliek v makre. Kde bude tlačiť makro, nie Vy (!), lebo si musí najskôr rozmiestniť tabuľky, potom skontrolovať vyjdené zlomy strán, a posúvať ich aby tabuľka, ktorej vychádza na stranu iba hlavička, začala na ďalšej.
Ak je ale určenie "pripináčkovanie na vývesku", tak je to jedno.

Aha, neviem kam som pozeral a prečo som si myslel, že to má byť samostatne na stranách. OK, takže oddeľovací riadok je ten čierny alebo mám pridať ďalší?

"JirkaJH" napsal/a:

...upravovat to nějak ručně je hrozný opruz...

Práveže nič neupravujete, nemusíte ani zoraďovať.
1. Vyplníte údaje
2. 1 klik na slovo "Viditeľné"
3. Vytlačíte klasicky Ctrl+P alebo Súbor - Tlač alebo máte tlačítko v hornej lište
4. Vyberiete z papierov prípadné prázdne listy (ak kategórie niesú obsadené), tie listy dáte neskôr naspäť do tlačiarne

Mám tu rozrobených už toľko vecí, nechce sa mi ďalšie makro začíbať ... po pravde ...

Napadla ma aj možnosť bez makra. OneClick riešenie. Iba pre aktualizáciu kliknete na "Viditeľné". Radí to vzorcom. A potom tlačíte. Tu je ale problém, že z tlačiarne vyjdú prázdne strany na tabuľkách, ktoré neobsahujú dáta. Sú síce neviditeľné, ale sú tam pevné zlomy strán :(
Nenapadá ma riešenie tohto neduhu, lebo vypočítavaná oblasť tlače nemá v Exceli spoľahlivú životnosť (prepíše ju o chvíľu natvrdo). A ak by sa to urobilo aj cez PowerQuery, alebo plus kontingenčka, nedostanete Vaše rozloženie a formátovanie. Lebo vždy sa dostanete do bodu tlače, keď nebudú sedieť zlomy, výška hlavičky, umiestnenie kategórie...

Napadá niekoho niečo?

Asi fakt jedine makrom...

PS: Odhesloval som si to, a následne zahesloval, list s heslom zmazal, všetky makrá tiež.

Maticový vzorec (Ctrl+Shift+Enter):
=INDEX(Ceník!$C$2:$C$8;MATCH(1;(Ceník!$A$2:$A$8=A2)*(Ceník!$B$2:$B$8=B2);0))
=INDEX(Ceník!$C$2:$C$8;POZVYHLEDAT(1;(Ceník!$A$2:$A$8=A2)*(Ceník!$B$2:$B$8=B2);0))

alebo normálny, ale iba pre prípad, že sú zoskupené IČ aj Kódy:
=INDEX(Ceník!$C$2:$C$8;MATCH(B2;OFFSET(Ceník!$B$1;MATCH(A2;Ceník!$A$2:$A$8;0);;COUNTIF(Ceník!$A$2:$A$8;A2));0)+MATCH(A2;Ceník!$A$2:$A$8;0)-1)
=INDEX(Ceník!$C$2:$C$8;POZVYHLEDAT(B2;POSUN(Ceník!$B$1;POZVYHLEDAT(A2;Ceník!$A$2:$A$8;0);;COUNTIF(Ceník!$A$2:$A$8;A2));0)+POZVYHLEDAT(A2;Ceník!$A$2:$A$8;0)-1)

EDIT:
Ešte ma napadol jeden normálny nematicový, keď nemusia byť zoskupené, ale musí byť dodržané, že IČ a Kód nie sú nikdy rovnaké, a dvojica sa v cenníku vyskytuje iba 1x:
=INDEX(Ceník!$C$2:$C$8;MATCH(2;MMULT(COUNTIF($A2:$B2;Ceník!$A$2:$B$8);{1;1});0))
=INDEX(Ceník!$C$2:$C$8;POZVYHLEDAT(2;SOUČIN.MATIC(COUNTIF($A2:$B2;Ceník!$A$2:$B$8);{1;1});0))

Vlastnosť UserForm-u
ShowModal = False

=INDEX(Ceník!$B$1:$H$1;;MATCH(B2;OFFSET(Ceník!$B$1:$H$1;MATCH(A2;Ceník!$A$2:$A$8;0););0))
=INDEX(Ceník!$B$1:$H$1;;POZVYHLEDAT(B2;POSUN(Ceník!$B$1:$H$1;POZVYHLEDAT(A2;Ceník!$A$2:$A$8;0););0))

Prípadne o kúsok kratší:
=LOOKUP(B2;OFFSET(Ceník!$B$1:$H$1;MATCH(A2;Ceník!$A$2:$A$8;0););Ceník!$B$1:$H$1)
=VYHLEDAT(B2;POSUN(Ceník!$B$1:$H$1;POZVYHLEDAT(A2;Ceník!$A$2:$A$8;0););Ceník!$B$1:$H$1)

Ja neviem chlapi. Napadlo ma takéto UDF. Vyznačil som tam jednu chybu, ktorú neviem eliminovať. Skúste:
Public Function GET_ANIMALS(Text As String, Mesto As String) As String
Dim S() As String, C() As String, i As Long, x As Long, PocetC As Long, PocetS As Long, bValidA As Boolean

S = Split(WorksheetFunction.Trim(Text), WorksheetFunction.Trim(Mesto) & ": ")
If UBound(S) = 0 Then Exit Function
S = Split(Split(S(1), ": ")(0), " a ")
PocetS = -1

For i = 0 To UBound(S)
C = Split(S(i), " ")
PocetC = -1
bValidA = False

For x = 0 To UBound(C) Step 2
If x + 1 <= UBound(C) Then
bValidA = (IsNumeric(Left(C(x), 1)) And Not IsNumeric(Left(C(x + 1), 1))) Or (Not IsNumeric(Left(C(x), 1)) And IsNumeric(Left(C(x + 1), 1)))
Else
bValidA = False
End If

If bValidA Then
PocetC = x + 1
Else
If PocetC = -1 Then PocetC = 0
Exit For
End If
Next x

If PocetC > -1 Then
ReDim Preserve C(PocetC)
S(i) = Join(C, " ")
PocetS = PocetS + 1
Else
Exit For
End If
Next i

If PocetS > -1 Then
ReDim Preserve S(PocetS)
GET_ANIMALS = Join(S, " a ")
End If
End Function


Strana:  1 ... « předchozí  10 11 12 13 14 15 16 17 18   další » ... 231

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Makro na opakovanou změnu barvy tlačítka

Jiří497 • 26.1. 20:31

Pozvyhledat s vnořeným COUNTIF

Jiří497 • 26.1. 19:36

Makro na opakovanou změnu barvy tlačítka

alois1111 • 26.1. 13:24

Pozvyhledat s vnořeným COUNTIF

majovy-bycek • 26.1. 12:45

Makro na opakovanou změnu barvy tlačítka

alois1111 • 26.1. 12:32

Makro na výmaz hodnoty pouze v modře podbarvené

Anonym • 26.1. 11:29

SVYHLEDAT (generovaná cesta oblasti vyhledávaní)

eLCHa • 26.1. 10:05