Ve spolupráci se SEDUO jsem vytvořil několik videokurzů:
... vlastní a jednoduché, ne ty složité státní...
Zobrazení ovládacího panelu pro MS Excel verze 97 a 2003 zobrazíte v menu Zobrazit/Panel nástrojů a zaškrtnete Formuláře
Při práci v MS Excel 2007 a 2010 naleznete v kartě Vývojář (Developer), Skupina Ovládací prvky (Controls), Vložit (Insert). Pro MS Excel 2007 (2010) je uspořádání prvků trochu jiné, ale funkce je stejná.
K dispozici máme tyto prky:
PopisekText přidaný k listu nebo formuláři a poskytující informace o ovládacím prvku, listu nebo formuláři.
Skupinový rámečekRámeček s popiskem, který seskupuje související ovládací prvky (např. přepínače nebo zaškrtávací políčka).
Příkazové tlačítko Tlačítko, které při stisknutí spustí makro (pokud mu bude přiřazeno).
Zaškrtávací políčko Políčko, které zapíná nebo vypíná příslušnou možnost. Na listu nebo ve skupině může být současně zaškrtnuto více políček.
Přepínač - Prvek, pomocí kterého je vybírána jedna ze skupiny možností ve skupinovém rámečku. Ve skupinovém rámečku lze zapnout pouze jeden přepínač. Přepínače se používají v případě, kdy je přípustná pouze jedna z několika možností.
Seznam - Rámeček obsahuje seznam položek z kterých si můžeme vybítrat.
Pole se seznamem - Rozevírací seznam. Položka vybraná v seznamu je zobrazena v textovém poli.
Posuvník - Ovládací prvek, pomocí kterého se posunuje seznam hodnot klepnutím na šipku posuvníku nebo přetahováním jezdce posuvníku. Seznam je možné posunout o jednu stránku klepnutím mezi jezdec a šipku posuvníku.
Číselník - Tlačítko se šipkami nahoru a dolů, které můžete připojit k buňce. Klepnutím na šipku nahoru hodnotu zvýšíte, klepnutím na šipku dolů hodnotu snížíte.
Včetně příkladů, bude obsahem dalšího připravovaného článku.
Článek byl aktualizován: 19.09.2020 11:06
Ušetřil vám tento web čas, peníze? Pomohl vyřešit problém? Jste ochotni poskytnout symbolickou odměnu na další rozvoj? Vybrte si formu odměny, která vám vyhovuje.
Microsoft Office (Word, Excel, Google tabulky, PowerPoint) se věnuji od roku 2000 (od 2004 na této doméně) - V roce 2017 jsem od Microsoft získal prestižní ocenění MVP (zatím jsem jediný z ČR v kategorií Excel). Své vědomosti a zkušenosti dávám k dispozici i on-line ve videích pro SEDUO. Ve firmách školím a konzultuji, učím na MUNI. Tento web již tvořím přes 15 let. Zdarma je zde přes 1.000 návodu, tipů a triků, včetně přes 250 různých šablon, sešitů.
Přidáno: 26.07.11 16:03
Dobrý den, chtěl jsem se zeptat zda jde udělat ve VBA samostatně spustitelná aplikace aniž by se mi spustil excel, tj. buď program s příponou exe a nebo to obejít tak že spustím soubor xls,ale excel se otevře pouze na pozadí a přímo se zobrazí formulář vytvořený v VBA. Děkuji Jan Doutnáč
Přidáno: 26.07.11 17:50
Zkuste aplikaci http://exceltoexe.com/
Přidáno: 27.07.11 09:34
Děkuji za rychlou odpověď, musím uznat že vaše stránky mě velice mile překvapily. Ještě bych se rád zeptal, jak bude vypadat příkaz ve VBA který by minimalizoval excel, tedy pokud by to šlo tak že se excel minimalizuje a zůstane aktivní pouze formulář. Děkuji Jan Doutnáč
Přidáno: 04.03.12 19:45
To Jan Doutnáč: Třeba takto:
Sub Minimalizace()
ActiveWindow.WindowState = xlMinimized
VasFormular.Show
End Sub
Přidáno: 04.04.13 09:56
Dá se prosím na formu zobrazit klasické 3 ikonky vpravo nahoře s funkcemi : minimalizace, maximalizaxe, zavřít ? Používám Excel 2007 v prostředí Windows 7 a nemám jak minimalizovat form tak aby zůstal dole na liště a já ho mohl kliknutím "zvednout". Díky za pomoc
Přidáno: 04.04.13 16:51
To Milano: Jde o fomrulář vytvořeny ve VBA?
Přidáno: 04.04.13 19:07
Ano souhlasí, je to form vytvořený ve VBA. Vygooglil jsem jak přidat ty malý ikonky (Viz kód dole). Ono to funguje, ale zavře se mi jen form a nezavře se mi sešit, který form otevřel.
V modulu je tenhle kód:
Option Explicit
Private Declare Function _
FindWindowA Lib "USER32" _
(ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Private Declare Function _
GetWindowLongA Lib "USER32" _
(ByVal hWnd As Long, _
ByVal nIndex As Long) As Long
Private Declare Function _
SetWindowLongA Lib "USER32" _
(ByVal hWnd As Long, _
ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Sub FormatUserForm(UserFormCaption As String)
Dim hWnd As Long
Dim exLong As Long
hWnd = FindWindowA(vbNullString, UserFormCaption)
exLong = GetWindowLongA(hWnd, -16)
If (exLong And &H20000) = 0 Then
SetWindowLongA hWnd, -16, exLong Or &H20000
Else
End If
End Sub
Sub ShowForm()
Autocentrum.Show
End Sub
na Formu otevírám další sešit, do kterýho zapisuju do buněk hodnoty z formu.
Kód na formu vypadá takhle:
Private Sub UserForm_Initialize()
Call FormatUserForm(Me.Caption)
ComboBox1.AddItem "Hotovost"
ComboBox1.AddItem "CCS"
ComboBox1.AddItem "Platební karta"
ComboBox1.AddItem "Faktura"
Workbooks.Open Filename:="c:\Zličín\data.xlsx"
Sheets("data").Select
End Sub
Díky za pomoc
Přidáno: 18.04.13 11:43
Děkuji moc za úvod do problematiky. Mám Office 2010 a nenašel jsem hlubší editaci textového pole než ve "starších formulářích" (zde je už ale jiný vzhled oproti standardním) - jde mi o podmínku zadat číslo do 10 znaků. Předem děkuji za pomoc, Karel
Přidáno: 23.03.14 13:41
jakým zpusobem mohu v Excel 2003 zmenit barvu pozadí a font čísla u takto vytvoreneho pole se seznamem: Sub test1() ActiveSheet.DropDowns.Add(0.05, 0.05, 242.25, 39).Select With Selection .ListFillRange = "$K$1:$K$5" .LinkedCell = "$K$6" .DropDownLines = 5 .Display3DShading = False End With End Sub
Přidáno: 10.11.14 09:30
Dobrý den, nevím, kde tady bych umístil svou otázku, tak se případně omlouvám. Je možné nevybrat objekt a změnit mu vlastnost za pomoci Tabindexu? Nebo by mi pomohlo, jak lze změnit číslo položky (Item(i)) u objektů? Nebo jak lze měnit název objektu dle proměnné(třeba commandbutton1-5) a tím bych mohl změnit vlastnost u požadovaného prvku? Moc děkuji, Honza
Přidáno: 14.01.16 11:56
Dobrý den, chtěl bych se zeptat, jakým způsobem je možné zajistit odeslání (přesun) dat vyplněných ve formuláři na listu excelu do souhrnné tabulky všech zadaných údajů v dalším listu. Např. údaje z osobního dotazníku se budou zaznamenávat v přehledné tabulce samostatného listu. Děkuji Michal
Pomohl Vám návod? Sdílejte na Facebooku, G+ |
||
LinkedIn... |
Stránky o MS Office (Excel) produktu společnosti Microsoft. Neslouží jako technická podpora.
| Email na autora: pavel.lasak@gmail.com | Copyright © : Pavel Lasák 2004 - 2024 |