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-listy-bunky » ohraniceni-bunek-borders-excel-vba

Ohraničení buněk (Borders) - kódy Excel VBA


Jak pomocí kódu VBA nastavovat ohraničení buněk umístění, styl, barvy, tloušťka čar...

Úvodem

Microsoft Excel logo

Pro přehlednost je článek rozdělen na kapitoly, které se týkají nastavování formátu buněk. K dispozici je zatím:


Ohraničení buňky (Borders) - teorie

Než se pustíme do programování tak se seznámíme s možnostmi, co lze v Excel VBA pro ohraničení buněk využít:

Umístění

Přesná specifikace umístění ohraničení (čáry):

  • xlDiagonalDown
  • xlDiagonalUp
  • xlEdgeRight
  • xlEdgeTop
  • xlInsideHorizontal
  • xlEdgeBottom
  • xlInsideVertical
  • xlEdgeLeft

poslední neméně důležitá, pokud nechcete mít ohraničení žádné:

  • xlNone

Graficky

Ohraničení buňky (Borders) Microsoft Excel

Typ čáry

K dispozici je 6 základních typů (stylů) čar:

  • xlContinuous
  • xlDot - tečkovaná
  • xlDashDotDot - čerchovaná
  • xlDash - čarkovaná
  • xlSlantDashDot - čerchovaná posunutá
  • xlDouble - dvojitá

Tloušťka

K dispozici jsou tři tloušťky čar Weight

  • xlThin
  • xlMedium - střední podobně jako steak ;)
  • xlThick

Předpřipravené čáry

Ohraničení buňky (Borders) - styl čáry Microsoft Excel

Na první pohled se může zdát, že typu čar je v Excel více, ale jde o kombinaci typu čáry a její tloušťky.

Základní teorií máte za sebou. Můžeme teorií vyzkoušet prakticky.


Barva

Barvy fungují stejně jako u pozadí, barvy písma atd. Takže na výběr je nepřeberné množství.

  • Color RGB(150, 150, 150)
  • ColorIndex
  • ThemeColor

Ohraničení buňky

JAk na ohraničení prakticky

Jak nastavit ohraničení (borders) buňky pomocí VBA v Excelu pro horní linku?

Range("B32").Select With Selection.Borders(xlEdgeTop) .LineStyle = xlDouble .Weight = xlThick .ColorIndex = xlAutomatic End With Range("B32").Select With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .Weight = xlHairline .ColorIndex = xlAutomatic End With

Odstranění ohraničení:

Potřebujeteli ohraničení odstranit

Selection.Borders(xlDiagonalDown).LineStyle = xlNone Selection.Borders(xlDiagonalUp).LineStyle = xlNone Selection.Borders(xlEdgeLeft).LineStyle = xlNone Selection.Borders(xlEdgeTop).LineStyle = xlNone Selection.Borders(xlEdgeBottom).LineStyle = xlNone Selection.Borders(xlEdgeRight).LineStyle = xlNone Selection.Borders(xlInsideVertical).LineStyle = xlNone Selection.Borders(xlInsideHorizontal).LineStyle = xlNone

Nebo pro oblast buněk B18:C25

Range("B18:C25").Select With Selection.Borders .LineStyle = xlNone End With Selection.Borders(xlDiagonalDown).LineStyle = xlNone Selection.Borders(xlDiagonalUp).LineStyle = xlNone

Barva ohraničení:

Ohraničení můžete přiřadit i barvu. Například využitím

.ThemeColor = 6

nebo

.ColorIndex = 8

nebo

.Color = RGB(150, 150, 150)

Pro oblast B41:C41 a šedou barvu ;)

Range("B41:C41").Select With Selection.Borders .LineStyle = xlContinuous .Weight = xlThin .Color = RGB(150, 150, 150) End With

Podrobněji v samostatném článku.

Microsoft Excel VBA - stahuj logo

Ke stažení

Soubor Ohraničení buněk - praktické příklady - Excel VBA soubor ve formátu *.xlsm ke stažení zdarma. Soubor využívá makra (pro Excel 2007 a novější).


Další související články:

Pokud už máte buňku (oblast) označenou můžete s touto oblasti dále pracovat například:

Závěrem

Máte svůj oblíbený kód, které ještě není uveden. Můžete se pochlubit v komentářích.

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

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 zatím nejsou

Můžete být prvními co zanechají smysluplný komentář.







Sdílejte

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

Nové články

25.03.2017:
ROUNDUP, ROUNDDOWN - zaokrouhlování

07.04.2017:
Řazení Excel - bug - problém

09.04.2017:
Podmínkové funkce Excel - bug - problém


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 - 2017 | 4935

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