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

Příspěvky uživatele

Tak si tam daj toto.
Function výsledok(a As String) As Double
a = Replace(a, ",", ".")
výsledok = Evaluate(Right(a, Len(a) - 2))
End Function

Treba si dať povoliť makrá.

Najjednoduchšie vymaž tú medzeru alebo použi toto

WBEL.
A čo by to malo podľa teba vypísať v tomto prípade?
"jankohraško" a "hraškojanko"?
hraško alebo janko?

Alebo medzi týmito?
"xypetr" a "petrxyz"
a tu xyz alebo petrz?

Poprípade
"123jablko" a "456789jab$lko!!!"

=MOD((ČÁST(A1;7;5)-ČÁST(A1;1;5))*1440;1440)

Máš pravdu. Toto je k ničomu.
A ten súbor v exceli nemôžeš priložiť?

V excel 2010 si otvor ten súbor.xls. Potom ho ulož ako typ súboru excel 2010 so zapnutými makrami.
A môžeš pracovať. Samozrejme musíš mať povolené makrá.

="Zpráva ze dne " & TEXT(TODAY();"dd.mm.yyyy")

Čo je to "šablóna"?
A nedal by sa priložiť aj súbor, aby bolo vidieť, o čo ide?

No neviem, či to má byť takto.

Klikni pravým tlačítkom na bunku s komentárom a vyber možnosť zobraziť komentár.

Nech sa páči.

možno takto?

Sub Pridat_radek()

'Přidá řádek pod poslední plný
Range("A9").End(xlDown).Activate
ActiveCell.EntireRow.Insert
ActiveCell.Offset(1, 0).EntireRow.Copy
Selection.PasteSpecial Paste:=xlPasteFormulasAndNumberFormats, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
riadok = Selection.Row + 1
Range(Cells(riadok, 1), Cells(riadok, 13)).ClearContents
Range("A9").Select
Application.CutCopyMode = False
End Sub

No ak si vymeníš vzorce napríklad
=B22+B23+B24+B25
za
=SUM(B22:B25)
alebo česky
=SUMA(B22:B25)
Tak by to malo fungovať

Alebo takto?

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje