Příspěvky uživatele


< návrat zpět

Strana:  « předchozí  1 2 3 4 5 6 7 8 9   další »

ThisWorkbook.Sheets(Array("leden", "unor")).Copy

Do podmíněného formátování nastavit formát # ##0

Mám zato, že do vlastního formátu funkce nejde dát.
Takže s podmíněným formátováním je to zřejmě nejjednodušší cesta.

http://wall.cz/index.php?m=topic&id=1695

https://proexcel.cz/generator-menu-vlastni-commandbar/

tahle varianta?

je v tom chyba
správně by asi mělo být

NE(JE.PRÁZDNÉ($B$1:$B$20)) * ( ($B$1:$B$20)<>hodnota )

Není mi jasné odkud se bere "hodnota"
do příkladu jsem dal napevno "5"

...
'když bude v ActiveCell jakýkoliv text
ElseIf WorksheetFunction.IsText(a) Then
...
...
Else
'a až zde umístit výpočet
c = a * b * 1000
i = MsgBox(Format(a * 1000, "#,##0" & " €") & " = " & Format(c, "#,##0.00" & " Kč"))
...

Takto?

v definovaných názvech je ve funkci POSUN
pevně jednička -

POSUN('Dynamický graf'!$A$1;Scroll;0;Zoom;1)
tj. první sloupec vpravo od A

Nejdřív naformátovat oblast (prázdnou), pak vkládat hodnoty. Bez naformátování /pokud může/ převede na datum.
Z číselné klávesnice vkládá ".,"
z písmenné (vedle "M") jen čárku.

vypadá to na dvě věci:
čárku nezadávat z číselné klávesnice
vybranou oblast naformátovat - Formát buněk - číslo

pro vybranou danou oblast začínající na C13..D22
=NE(JE.PRÁZDNÉ($C13))

Mám zkušenost, že se mi to děje při kopírování především vlastností.

Nebude to tím, že

Private Sub Worksheet_SelectionChange
je jen pro List1
a po Obnovit zůstane aktivní List2 ?

Funkce TISKARNA
vrací název tiskárny bez cesty.

Funkce TISKARNA2 je sloučení všeho dohromady do jedné funkce. Výsledek stejný, méně přehledný.


Strana:  « předchozí  1 2 3 4 5 6 7 8 9   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse