Příspěvky uživatele


< návrat zpět

Strana:  « předchozí  1 2 3 4 5 6 7 8 9   další » ... 44

Nějak nechápu co po nás chceš? 4

Tý jo, takhle naštvat elnina, to jsem ještě neviděl. 8 Je to stále stejná písnička.

DÁVEJTE TY PŘÍLOHY!!!

Mě ale funkce SUMIFS v příloze funguje. Dívala jste se na to? Problém jste měla se sloučenými buňkami. Proto jsem to celé předělal!

Tak?

Makro jsem upravil, ale nezkoušel. Taky jsem udělal pár úprav v tabulce, snad to navadí.

Kdyby si sem hodila vzor, tak ti to nastavíme bačkůrko. 5

Trochu jsem si hrál. 5

A nešlo by to jen takhle jednoduše?

Private Sub ComboBox1_Change()

Dim POCET As String
Dim RADEK As String
Dim wsDATA As Worksheet
Set wsDATA = Worksheets("data")

On Error Resume Next

POCET = Cells(Rows.Count, "A").End(xlUp).Row
RADEK = WorksheetFunction.Match(ComboBox1.Value, wsDATA.Range("A4:A" & POCET), 0) + 3

If ComboBox1.Value = "" Then wsDATA.Range("A1").Resize(POCET, 6).Interior.ColorIndex = xlNone: Exit Sub

wsDATA.Range("A1").Resize(POCET, 6).Interior.ColorIndex = xlNone
wsDATA.Range("A" & RADEK).Resize(1, 6).Interior.ColorIndex = 6

End Sub

To je ale široký pojem. Dá se ledasco, ale takhle naslepo, těžko říct. 8

Něco jsem našel v PC, to jsem dělal před lety, třeba to pomůže.

Ty píšeš o dovolených, ale poslala jsi nám stravenky. 4

Pokud chceš poslat tabulku s makrem, musíš ji dát do ZIP nebo RAR.

Tak to jedině, že by sis překopíroval tabulku na jiný list jako zdrojová data.

Ach jo, tak si to zase vyplodím sám no. 6

Jde to, chceš to do toho obrázku dokreslit?

Třeba takhle?


Strana:  « předchozí  1 2 3 4 5 6 7 8 9   další » ... 44

Uživatelské menu

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

Menu

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

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.

On-line nástroje