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

Příspěvky uživatele

Skús či vyhovuje.

Tak niečo takéto som ešte nevidel. To si vymyslel úplne sám?

Skontroluj si hranice v tabuľke. Ten tvoj vzorec sa "nedá" čítať.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo chyba
a = Split(Target)
a(0) = UCase(a(0))
For i = 1 To UBound(a)
a(i) = WorksheetFunction.Proper(a(i))
Next i
Target = Join(a)
chyba:
End Sub

Asi to celkom nefunguje

Tak niečo takéto

MsgBox ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1

MsgBox ActiveSheet.UsedRange.Column + ActiveSheet.UsedRange.Columns.Count - 1

Cells(ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1, ActiveSheet.UsedRange.Column + ActiveSheet.UsedRange.Columns.Count - 1).Select

No ja mám v excel 2010 poslednú bunku AFD1048576

Ale ak si myslel poslednú použitú bunku, tak napríklad takto

Selection.SpecialCells(xlCellTypeLastCell).Select

Alebo

MsgBox Selection.SpecialCells(xlCellTypeLastCell).Address

Alebo makrom.
Vyznač bunky ktoré potrebuješ "naformátovať" a spusti makro.
Predtým vymaž prípadné medzery. Funkcia TRIM.

..

=INDEX(A1:D8;MATCH(15;A1:A8;0);MATCH(0,01;A1:D1;0))

Tak tam pridaj "="

=(D5-C5)-(F5-E5)*((F5-E5)>=1/48)-(H5-G5)

=(D5-C5)-(F5-E5)*((F5-E5)>1/48)-(H5-G5)

=YEAR(TODAY())-A1

takto?

alebo tam daj takýto vzorček
=INDEX($B$2:$B$11;MATCH(A2-0,01;$B$3:$B$11;1)+1;1)+1&" : "&INDEX($B$2:$B$11;MATCH(A2-0,01;$B$3:$B$11;1)+2;1)

MATCH=POZVYHLEDAT

alebo
=K1-KDYŽ(J1="";I1;J1)

píš do A1

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje