Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  41 42 43 44 45 46 47 48 49   další » ... 156
Automatické vloženie hodnôt (5.10.2017 16:36)

pantalone2 napsal/a:

Tak nakoniec som to vyriešil, trebalo to cez VLOOKUP.

Si šikovný. Ja by som na to neprišiel.

zobrazit / skrýt listy (4.10.2017 13:44)

For Each list In Worksheets
If list.Name <> Worksheets("KALKULACE").Name Then list.Visible = False
Next list

zobrazit / skrýt listy (4.10.2017 13:04)

No zrejme treba k tlačítku "skrýt" priradiť aj makro.

Odeslání aktivního listu přes Lotus notes 9 (3.10.2017 17:55)

Zrejme treba postupovať podľa príručky alebo návodu.
Nevieme verziu excelu ani ako ten list vyzerá.

chyby v datech (3.10.2017 11:03)

A ako to z toho prístroja prenášaš do excelu?

Vypsat hodnoty z více buněk (2.10.2017 10:07)

Ako ťa to napadlo písať to do riadkov? To sú vyplnené iba dva riadky? A stĺpcov je ako maku?

zjištění jména souboru při ukládání (29.9.2017 14:18)

A čo tak použiť funkcie RIGHT, MID, FIND, INSTR, INSTRREW, prípadne SPLIT?

VBA kopírování na poslední volný řádek (21.9.2017 21:54)

A povedal si že vzorce nechceš kopírovať? A je problém to preformátovať po tvojom? To ti všetko treba urobiť ako na podnose?

Public Sub kopy()
Worksheets("hárok2").UsedRange.Copy
Worksheets("hárok1").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

Exel tabulka vypočtu cen (21.9.2017 21:24)

@elninoslov
Myslím, že by sa mal venovať niečomu inému-jednoduchšiemu.
Alebo nech si pozrie knihu o programovaní VBA pre excel. Tam sa možno niečomu priučí.

Exel tabulka vypočtu cen (21.9.2017 20:54)

Na to sa nedá ani pozerať.
Napríklad, čo je toto za vzorec?
=B3*VLOOKUP(A3;tblData;4;FALSE)-(B3*VLOOKUP(A3;tblData;4;FALSE))*G3
Prečo nie takto?
=B3*VLOOKUP(A3;tblData;4;FALSE)*(1-G3)

Když zadám do buňky b nebo c do buňky d zapsat (20.9.2017 22:10)

Do bunky D3 daj vzorec a skopíruj ho dolu
=IF(B3<>"";"B"&COUNTA($B$3:B3);IF(C3<>"";"C"&COUNTA($C$3:C3);""))
Do češtiny si to snáď preložíš.
IF=KDYŽ
COUNTA=POčet2

Predcasne ukoncenie cyklu (20.9.2017 21:57)

@xlnc
On nepotrebuje vyskočiť z cyklu. On sa iba takto "zrozumiteľne" vyjadruje.
On potrebuje iba preskočiť tých 5 riadkov za LOOP

Inak ten cyklus je naozaj úžasný. Toto by som určite ani nevygooglil.
A tá podmienka tb.leght < 199 je naozaj intuitívna.

Ale hlavne že mu to funguje. 2

VBA kopírování na poslední volný řádek (20.9.2017 21:33)

Neviem, načo si tam skopíroval zbytočnosti.
toto skopíruje z hárku2 do hárku1

Public Sub kopy()
Dim oblast As Range
Set oblast = Worksheets("hárok2").UsedRange
oblast.Copy Worksheets("hárok1").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
End Sub

Odemčení struktury (12.9.2017 13:35)

StavrosJorgos napsal/a:

Zajímavé, používám vrzi ex.2017,...

2017? To už budú každý rok dávať novú verziu excelu?

každá ntá buňka v řádku do sloupce (3.9.2017 15:31)

mepexg napsal/a:

netypujem
=OFFSET(List1!$A$1;(COLUMN()+1)*5-6;IF(ROW()=1;0;(ROW()-1)*7))
Ešte by sa dalo údaje transponovať a nepotrebné stĺpce (1.-4. = A-D,6-9,...) zmazať; vyfiltrovať prvý a každý 8. riadok.


A načo je tam ten IF?
IF(ROW()=1;0;(ROW()-1)*7)
veď stačí
ROW()-1)*7

Inak "páčia" sa mi takéto zadania.
Vraj každá ôsma bunka. Ale nenapíše kde sa začína prvá bunka, či v prvom stlpci alebo ôsmom. Aby pridal prílohu to ho samozrejme ani nenapadne. Nemáme čarovné gule, iba obyčajné 5


Strana:  1 ... « předchozí  41 42 43 44 45 46 47 48 49   další » ... 156

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