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

Příspěvky uživatele

ano, lze to. Jen je třeba místo spojnicového použít bodový. Poté ještě vybrat jednotlivé řady a prohodit osy.

radek = radek - (radek + 1) mod 3

Je očekávána hodnota typu string.

ActiveSheet.PageSetup.PrintArea = Range(Cells(a, b), Cells(x, y)).address

Mno nejjednodušší trik, který mne napadá, je propojit checkboxy s oblastí (skrytých) buněk a těm pak najednou přiřadit hodnotu NEPRAVDA. Není třeba VBA.

Pokud chcete použít VBA, pak bych všechny checkboxy přejmenoval, aby začínaly stejně (např. _checkboxXXX) pak lze použít shapes

for each o in activesheet.shapes
if left(o.name,9) = "_checkbox" then o.value = false
next o

Např.

Sub subCopy()
Dim rCell As Range, rArea As Range
Dim I As Integer
I = 0
For Each rArea In Selection.Areas
For Each rCell In rArea.Cells
I = I + 1
ActiveSheet.Cells(I, 1).Value = rCell.Value
rCell.Clear
Next rCell
Next rArea
Set rCell = Nothing
Set rArea = Nothing
End Sub

z mobilu, takze rychly nastrel bez jakehokoliv zabezpeceni

pri prvnim spusteni zakazte makra

toto je navod, nikoliv definitivni reseni
list s uzivateli je treba minimalne skryt a zaheslovat

Nejjednodušší je zaheslovat soubor a heslo oznámit jen uživatelům, kteří mají mít do něj přístup.

Nejspolehlivější je použít vlastnosti systému, respektive složky a nastavení oprávnění.

Mno a dá se použít i VBA a Application.UserName, ovšem toto se dá obejít snadno pomocí zakázání maker nebo vypnutí automatických událostí.

Dovolím si přidat řešení bez použití maticového vzorce

Pro jednoduchos a srozumitelnost jsem použil skryté sloupce.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje