• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

Aký je to systém.
Aká verzia excelu?

takto?

=MID(A1;1;LEN(A1)-4)&"/"&LEFT(RIGHT(A1;2);1)

Neviem prečo to takto funguje, ale funguje.
Overenie údajov.

Ale ide to tam skopírovať. Potom už pomôže iba makro.

Veď tabulka má 1048576 riadkov (excel 2010)

Alebo môžeš použiť funkciu SUBTOTAL

Vyfiltruj si potrebnú položku a spočíta ti iba zobrazené.

Nemusíš to takto robiť
stačí do bunky H10 dať vzorec.
=SUMIF(A:A;F10;C:C)
A spočíta ti to.
Samozrejme Jeza.m to chcel vylepšiť, aby bol lepší prehľad. Ale funguje to aj s tými duplicitami.

Ak kopíruješ iba jeden stlpec (A), tak asi takto.

Sub hyperlink()
Application.ScreenUpdating = False
'kód
Application.ScreenUpdating = true
End Sub

Alebo skús toto
Sub hyperlink()
a = 61
r = 4
Set ws1 = Worksheets("objednávky")
Set ws2 = Worksheets("objednávky s materiálem")

' tady to muséme přepnout na druhý list, aby se vložil odkaz, jináč mi to zatím nejde :)
ws2.Activate

Do While ws1.Cells(r, 2) <> ""
Do While ws2.Cells(a, 10) <> ""
If ws1.Cells(r, 2) = ws2.Cells(a, 1) Then
ws1.Hyperlinks.Add Anchor:=Cells(r, 22), Address:="", SubAddress:= _
"'objednávky s materiálem'!B" & a, TextToDisplay:=ws1.Cells(r, 2).Text

ws2.Hyperlinks.Add Anchor:=Cells(a, 2), Address:="", SubAddress:="'objednávky'!V" & r, TextToDisplay:=ws1.Cells(r, 2).Text

Exit Do
End If
a = a + 1
Loop
a = 61
r = r + 1
Loop
' a zase zpět na původní list
ws1.Activate
End Sub

A ako by si to riešil matematicky?
Daj postup a v exceli ti to podľa toho urobím.

V nápovede som našiel toto:

Zmena oddeľovača vo všetkých textových súboroch .csv
1.V systéme Microsoft Windows kliknite na tlačidlo Štart a potom kliknite na položku Ovládací panel.
2.Otvorte dialógové okno na zmenu miestnych a jazykových nastavení.
3.Do poľa Oddeľovač zoznamu zadajte nový oddeľovač.
4.Kliknite dvakrát na tlačidlo OK.
Poznámka Po zmene znaku oddeľovača zoznamu pre daný počítač budú všetky programy používať nový znak ako oddeľovač zoznamu. Nastavenie znaku môžete rovnakým postupom vrátiť na predvolený znak.

kp57:
To máš pravdu, takto by to išlo spustiť. Otázka je, aký kód dať na tie tlačítka PAUZA a STOP. A čo by som počas tej PAUZY mal urobiť? Upraviť niečo v liste?

Vo funkcii SVYHLEDAT to nejde. Pozri si nápovedu po stlačení F1. To číslovanie nie je v žiadnom stlpci. Musel by si si to číslovanie skopírovať napríklad do stlpca "A".
Bez toho pomocného stlpca to ide ako som už uviedol.

Netuším načo by mali slúžiť tlačítka PAUSE a KONEC. Za behu makra sa aj tak stlačiť nedajú.
Možno bude stačiť CTRL+BREAK a potom sa rozhodneš, či prerušiť alebo skončiť.

Skopíroval som to do 2010 a potom naspäť do 2003.
Skús, či to funguje. Ja tu nemám excel 2003.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse