A co takto si najskor urobit z udajov v prvom harku kontingencnu tabulku, kde km zosumujes a az potom budes tuto tabulku spajat s harkom2?



14.1. Pridany subor s upravenou KT a vzorcom:

asi potrebujem praktickú ukážku, lebo nejako nechápem ako to myslíš...

Pokiaľ som dobre pochopil problém, ide o to, aby sa vedľa značky auta zobrazili postupne jednotlive autá s najazdeným počtom KM.

Ak nevyhovuje riešenie cez KTG (Pivot table), dá sa použiť makro, viď prílohu.

Pre názornosť som ponechal v jednom liste, ale možno dať hocikam.

P.

sumár (stav na sklade) za prísl tovar možno urobiť cez funkciu SUMIF (pre komplikovanešie podmienky, pre XL 2007 a viac, cez SUMIFS):


=SUMIF('na sklade'!A:A;A4;'na sklade'!B:B)

Ďakujem, ale ani jedno riešenie je pre mňa asi to pravé. Ivka pri tvojom postupe to zrátalo všetky hodnoty a to je pre mňa zle.
pridala som ešte jeden súbor, kde je presne to čo potrebujem (predchádzajúci bol iba taký príklad).
na jednom hárku je zoznam všetkých materiálov, na druhom je skladová zásoba materiálu. no a v poslednom je iba pár materiálov, ku ktorým potrebujem doplniť údaje z predchádzajúcich dvoch hárkov...

No teraz neviem, Ivke píšeš že nechceš sumár za tovar, ale v príklade píšeš "pod akými všetkými možnými kódmi materiál môže byť a koľko ks je na sklade". Nejdem mudrovať, vyskúšaj priložený príklad "pomoc2-ppa.xls".

ten prvý súbor bol iba taký príklad, ale asi nebol veľmi dobrý. to čo potrebujem naozaj je v tom druhom súbore. a ten tvoj čo si sem dal je úplne super, je tam presne taký výsledok ako som potrebovala. aj keď vôbec neviem ako si to dosiahol, lebo makrá sú pre mňa španielska dedina :-D
ale budem to asi ako takú šablónu používať.
ďakujem, ušetril si mi veľa času a rozčuľovania sa ;-)

Skús použiť funkciu definovanú užívateľom:

Function Vyhladat2(Hladat As Variant, Tabulka As Range, _
Stlpec As Integer, NtyVyskyt As Integer)

Dim i As Integer
Dim iCount As Integer
Dim rCol As Range
SearchColumnNum = 1

For i = 1 To Tabulka.Rows.Count
If Tabulka.Cells(i, SearchColumnNum) = Hladat Then
iCount = iCount + 1
End If

If iCount = NtyVyskyt Then
Vyhladat2 = Tabulka.Cells(i, Stlpec)
Exit For
End If
Next i
End Function

Táto funkcia umožňuje vyhľadať n-tý výskyt. Funkciu doplň do tabuľky na hárku2 do buniek C4 a D4 (a ďalších). Žiaľ, neviem pridať prílohu, takže príklad neuvádzam.

Aj ja mam podobný problém, mám tri tabulky, po dva stlpce - a potrebujem cez vlookup ked mi najde že text z druhej tabulky sa nachadza v prvej, aby vypísalo názov obchodu, ale ide mi o to, že pri prvom sa to zastaví, niektoré sú tam spomenuté viackrát a potrebujem aby mi aj tie vypísalo. Spraviť na to makro? Prikladám prílohu kde som pouzil vlookup.

Analogicky, ako v predošlom prípade. Nedá sa priložit prílohu, založ novu tému. P.

Sub Store_do_riadku()

' Macro recorded 20.4.2014 by PaloPa

Dim xUnq As Range, c As Range, cc As Range
Dim aSh As String, kodSh As String, a As Range, tx As String

aSh = ActiveSheet.Name
kodSh = "všetok mat."

Sheets(aSh).Columns("F:F").ClearContents
Sheets(aSh).Range("F2").Value = "In Stores"

Application.ScreenUpdating = False

Set xUnq = Range(Sheets(aSh).Range("E3"), Sheets(aSh).Range("E60000").End(xlUp))

Sheets(aSh).Activate
For Each c In xUnq
tx = ""
Range("A2:B21").Select
Selection.AutoFilter Field:=1, Criteria1:=c.Text 'napr. "Skoda"
Set a = Range(Range("B3"), Range("B60000").End(xlUp)).SpecialCells(xlCellTypeVisible)
For Each cc In a
If cc.Row > 2 Then
tx = tx & IIf(tx <> "", ", ", "") & cc.Text
End If
Next cc

c.Offset(0, 1) = tx
Range("A2").Select: Selection.AutoFilter
Next c

Range("A2").Select: Selection.AutoFilter

Sheets(aSh).Activate
Application.ScreenUpdating = True
End Sub

Aby sme tu zbytočne nezakladali veľa podobných tém, viete mi prosím poslať prílohu na peto.tomcany@gmail.com ? Budem vďačný. Pozeral som sa na to makro ale stále tam mám niekde chybu, nefunguje to, večer sa na to ešte pozriem.

Poslal som.

Skuste pridat stlpcek "DatZaznamu" a potom to "prefiltrovat"cez KT

Skusil som aj to druhe "pomoc 2" ale neviem ci som to spravne pochopil jeden materal ma viac kodov a ktore mnozstvo teda je to spravne?

"pomoc auta" aj tak to sa da