Přeskočit navigaci | Přeskočit na novinky

Nový videokurz na Seduo: Excel pro začátečníky

     

Jste zde: Úvodní stránka » excel » vba-formulare » excel-vba-formular-label-popis

Label (Popis) ve formuláři VBA


... label (popisek) a jeho použítí ve formuláři za pomocí VBA...

Vložit Label

Karta Vývojář - Visual Basic. Menu Insert - UserForm. Z Toolboxu vložíme Label.

MS Excel - formuláře - label

Vlastnosti:

Seznam základních vlastnistí prvku Label (Popis)

  • (Name)
  • Accelerator
  • AutoSize
  • BackColor
  • BackStyle
  • BorderColor
  • BorderStyle
  • Caption
  • ControlTipText
  • Enabled
  • Font
  • ForeColor
  • Height
  • HelpContextID
  • Left
  • MouseIcon
  • MousePointer
  • Picture
  • PicturePosition
  • SpecialEffect
  • TabIndex
  • TabStop
  • Tag
  • TextAlign
  • Top
  • Visible
  • Width
  • WordWrap
MS Excel - formuláře - label - Vlastnosti

(Name)

Pojmenování prvku (můžeme změnit). Ve vzorcích se pak budeme na tento prvek odkazovat. V našem příkladě je Name Label1

Accelerator

Nastaví nebo získá přístupovou (zkratkovou klávesu Alt) klávesu daného ovládacího prvku.

  Label1.Accelerator = "C"
  ZkratkovaKlavesa = Label1.Accelerator

Význam u jiných prvků, ale i u Label jde nastavit.

AutoSize

Specifikuje, zda mění objekt automaticky velikost v souladu se svým celým obsahem. Pokud mění tak velký text zvětší objekt.

Hodnota (True False)

  Label1.AutoSize = False
  AutosizeStav = Label1.AutoSize

BackColor

Vrací nebo nastavuje barva pozadí objektu Label.

  Label1.BackColor = RGB(255, 128, 128)
  BarvaPozadi = Label1.BackColor

BackStyle

Vrací nebo nastavuje styl pozadí objektu Label.

fmBackStyleTransparent (0) Pozadí je průhledné.

fmBackStyleOpaque (1) Pozadí je neprůhledné (výchozí nastavení).

  Label1.BackStyle = fmBackStyleTransparent

BorderColor

Vrací nebo nastavuje barvu okrajů.

  Label1.BorderColor = RGB(254, 127, 127)

BorderStyle

Vrací nastavení nebo změní nastavení okrajů.

fmBorderStyleNone - 0 - nemá viditelný okraj

fmBorderStyleSingle - 1 -

  Label1.BorderStyle = fmBorderStyleSingle

Poznámka ignoruje se pokud je vlastnost SpecialEffect = none

Caption

Varcí Text na objektu Label (Popis) nebo ho nastaví.

  Label1.Caption = "muj text"
  AktualniTextVLabel = Label1.Caption

ControlTipText

Bublinková nápověda. Zobrazí se při najetí nad objekt

  Label1.ControlTipText = "Muj druhý text"
  ControlTipText = Label1.ControlTipText

Enabled

Určuje, zda se může ovládací prvek stát aktivním a odpovídat na události, generované uživatelem. Nebo specifikuje jak je tato vlastnost nastavena.

  Label1.Enabled = True
  EnabledNastaveni = Label1.Enabled

Font

Vrací nastavení fontu nebo nastaví změnu fontu.

  Label1.Font.Italic = True
  Label1.Font.Size = 22
  Label1.Font.Bold = True
  Label1.Font = "Times New Roman"
  velikostFontu = Label1.Font.Size
  typFontu = Label1.Font
  FontJeKurziva = Label1.Font.Italic

ForeColor

Varcí nastavení nebo definuje barvu popředí objektu tj. v našem případě jakou barvu bude mít text.

  Label1.ForeColor = RGB(255, 255, 0)

Height

Vrací výšku objektu nebo jeho výšku nastaví.

  Label1.Height = 20
  Vyska = Label1.Height

HelpContextID

  

Left

Umístění objektu od levého okraje. Nebo zjištění jak je umístěn objekt.

  umistenileft = Label1.Left
  Label1.Left = 12

MouseIcon

Přiřazení ikony por objekt

  Label1.MouseIcon = LoadPicture("c:\mojeIkonka.ico")

MousePointer

Vrací typ ukazatele myši, nebo nastaví ukazatel myši. Hodnoty jsou:

  • fmMousePointerDefault 0 - standartní ukazatel
  • fmMousePointerArrow 1
  • fmMousePointerCross 2
  • fmMousePointerIBeam 3
  • fmMousePointerSizeNESW 6
  • fmMousePointerSizeNS 7
  • fmMousePointerSizeNWSE 8
  • fmMousePointerSizeWE 9
  • fmMousePointerUpArrow 10
  • fmMousePointerHourglass 11
  • fmMousePointerNoDrop 12
  • fmMousePointerAppStarting 13
  • fmMousePointerHelp 14
  • fmMousePointerSizeAll 15
  • fmMousePointerCustom 99
  

Picture

Nastavení obrázek na pozadí.

  Label1.Picture = LoadPicture("c:\mujObrazek.bmp")

PicturePosition

Pozice obrázku relativně k titulku.

  • fmPicturePositionLeftTop - 0 - vlevo od titulku zarovnání s horním okrajem
  • fmPicturePositionLeftCenter - 1 -
  • fmPicturePositionLeftBottom - 2 -
  • fmPicturePositionRightTop - 3 -
  • fmPicturePositionRightCenter - 4 -
  • fmPicturePositionRightBottom - 5 -
  • fmPicturePositionAboveLeft - 6 -
  • fmPicturePositionAboveCenter - 7 -
  • fmPicturePositionAboveRight - 8 -
  • fmPicturePositionBelowLeft - 9 -
  • fmPicturePositionBelowCenter - 10 -
  • fmPicturePositionBelowRight - 11 -
  • fmPicturePositionCenter - 12 -
  Label1.PicturePosition = fmPicturePositionLeftTop

SpecialEffect

Vrací nebo určuje speciální efekty objektu.

  • fmSpecialEffectFlat 0
  • fmSpecialEffectRaised 1
  • fmSpecialEffectSunken 2
  • fmSpecialEffectEtched 3
  • fmSpecialEffectBump 6
  Label1.SpecialEffect = fmSpecialEffectFlat
  Label1.SpecialEffect = 6
   StavSpecialEfekt =Label1.SpecialEffect

TabIndex

Vrací nebo udává pozici jednoho objektu v pořadí karet formuláře.

  Label1.TabIndex = 0

TabStop

Nabývá hodnot TRUE, FALSE.

  

Tag

Doplňkové informace o objektu.

  

TextAlign

Zaroznání textu. Vpravo, vlevo, na střed. Nabývá hodnot:

  • fmTextAlignLeft - 1 - Zarovnani vlevo
  • fmTextAlignCenter - 2 - Zarovnání na střed
  • fmTextAlignRight - 3 - Zarovnání vpravo
  Label1.TextAlign = fmTextAlignCenter
  Label1.TextAlign = 1
  jakZarovnano = Label1.TextAlign

Top

Umístění objektu od horní okraje. Nebo zjištění jak je umístěn objekt.

  umistenitop = Label1.Top
  Label1.Top = 12

Visible

Nastavuje viditelnost objektu, nebo zobrazuje jaký stav má objekt. Nabývá hodnot TRUE, FALSE.

  Label1.Visible = False
  Label1.Visible = True

Width

Vrací šířku objektu nebo jeho výšku nastaví.

  Label1.Width = 110
  Sirka = Label1.Width

WordWrap

Určuje, zda se má obsah ovládacího prvku automaticky zalomit na konci řádku, nebo vrací jeho hodnotu. Nabývá hodnot TRUE, FALSE.

True - Text se zalamuje (výchozí nastavení). False - Text se nezalamuje.

  StavWordWarp = Label1.WordWrap

Ke stažení

Hotový příklad ke stažení: Formulář Label (popis) - ukázky použití soubor ve formátu 

*.xls

Závěr

Popis vlastnosti objektu Label máme za sebou :)

Článek byl aktualizován: 01.11.2014 14:02

Odměna

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.


Pavel Lasák

Pavel Lasák - autor webu

Microsoft Office (Word, Excel, PowerPoint) se věnuji od roku 2006. Své vědomosti a zkušenosti dávám k dispozici na různých školeních a konzultacích, ale také na tomto webu. K dispozici na tomto webu je mnoho návodu, tipů a triků včetně desítek různých šablon.

   Pavel Lasák LinkedIn Profil    Pavel Lasák Google+ Profil    Pavel Lasák facebook Profil    Pavel Lasák twitter Profil

Doporučte tento článek přátelům

Pokud vám článek pomohl, případně si myslíte, že může pomoci i někomu dalšímu, budu rád když jej sdílením doporučíte přátelům - děkuji:



Komentáře


Tonda

Přidáno: 21.05.11 10:53

Ahoj, super článek. Nemáš k dispozici popis k ComboBox. Díky Tonda

Pavel Lasák

Přidáno: 21.05.11 17:36

To Tonda: Díky. Na dalších prvcích formuláře se pracuje. Přidal jsem TextBox, další již brzo :) ....

Pavel Lasák

Přidáno: 31.05.11 18:01

To Tonda: Tak jsem již napsal článek o použití ComboBox (Výběrového pole) ve formuláři VBA. Třeba není úplně pozdě :)

václav

Přidáno: 12.09.12 16:08

jde nějak zajistit aby se mi ve formuláři vedle textboxu (kde je číslo) zobrazil popis (label) který je v seznamu na jiném listě a kterému je přazeno číslo z textboxu? děkuji

Pavel Lasák

Přidáno: 12.09.12 18:39

To václav: jde do Caption se přiřadí příslušná hodnota Label1.Caption = ....

václav

Přidáno: 13.09.12 06:36

ale to budu mít napevno,ne? já potřebuji aby když v texbox budu mít např. 2 tak label by byl např. "popis 1" a když texbox přpíšu na 4 tak label bude mít hodnotu: "popis 2" ty popisy by se brali z jiného listu kde by k nim byla přiřazena právě čísla v texboxu...

Pavel Lasák

Přidáno: 13.09.12 18:48

to václav: využít třeba Select Case http://office.lasakovi.com/excel/vba-teorie-zaklady/select-case-excel-vba/ nebo podmínky if then http://office.lasakovi.com/excel/vba-teorie-zaklady/if-then-elseif-else-podminka-excel-vba/

Milan

Přidáno: 09.05.16 15:35

Chcel by som v makre Exceli urobit dinamicke pridelenie Label...nejako to mi nejde...da sa to vôbec urobit v exceli? Skusal som to asi takto: mam vo Form definovane Label-y s menom D1...D10 napisal som : for n=1 to 10 d(n).caption = "text" next dakujem za odpoved milan


Přidání nového komentáře

Poznámka: Z časových důvodu není v mých sílách zodpovědět všechny dotazy. Děkuji za pochopení.




(vlož číslo padesátpět)

Z bezpečnostních důvodu dočasně nemůžete použít HTML značky, kromě <code> a </code> (pro vkládání VBA kódu). Děkuji za pochopení.
Děkuji, za Vaše komentáře.

Za obsah komentářů neodpovídám, jelikož jsou komentáře publikovány ihned po jejich napsání čtenářem. Toto nemohu nijak ovlivnit. Přesto si vyhrazuji možnost jakýkoli neslušný komentář smazat bez udání důvodu. V komentářích si tykáme. ;-)






Sdílejte

Pomohl Vám návod?
Sdílejte na Facebooku, G+
LinkedIn...

Nové články


Newsletter

Přihlaste se odběru novinek a získejte:
Ebook zdarma -
10 kroků ke zvládnutí (Word, Excel, PowerPoint)
Šipka Kniha 3D Více o ebooku ...

TOPlist Licence Creative Commons webarchiv rss XML

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 - 2016 | 11077

Tento web zatím neprošel jazykovou korekturou. Beta verze redakčního systému.