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

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

Label (Popis) ve formuláři VBA

Videokurzy Excel

Ve spolupráci se SEDUO jsem vytvořil několik videokurzů:

... 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: 19.09.2020 11:06

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 - autor webu

Pavel Lasák

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ů.

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


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






Excel


Sdílejte

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

Nové články


Reklama


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 - 2024 |