Změna šířky a výšky na palce

Deana zajímá, jak změnit šířku sloupce a výšku řádku z pixelů na palce. Chtěl by v Excelu vytvořit štítky, které jsou zadány v palcích.

Než se pustíme do možných způsobů řešení tohoto problému, je třeba upozornit, že Excel používá zvláštní způsob výpočtu výšky řádků a šířky sloupců. Výška řádku se totiž počítá úplně jinak než šířka sloupce.

Výška řádku se neměří v pixelech, ale v bodech. Pixel je relativní měrná jednotka vztahující se především k zobrazovacím zařízením, jako jsou monitory a tiskárny. Pokud je něco široké 50 pixelů, tato velikost sama o sobě nic neznamená, aniž bychom věděli, kolik pixelů je zařízení schopno zobrazit na výšku.

Body jsou však dobře definované – na jeden palec připadá přibližně 72 bodů, takže výška řádku 72 by znamenala výšku jednoho palce. Jednoduché, že?

Nyní uvažujme šířku sloupce, která není určena ani pixely, ani body. Místo toho se udává v šířkách znaků jakéhokoli písma, které používáte. Pokud je například váš standardní styl nastaven na Courier 10, pak šířka sloupce 12 znamená, že se do daného sloupce vejde přesně 12 znaků. Změňte použité písmo a najednou se změní i šířka sloupce, takže se do něj stále vejde 12 znaků.

Ano, tento přístup je opravdu hloupý. Také velmi ztěžuje něco takového, jako je navrhování štítků v Excelu. Možná se vám podaří navrhnout něco, co bude fungovat ve vašem systému (po hodně pokusech a omylech), ale pokud pak sešit přepošlete kamarádovi, je velká pravděpodobnost, že v jeho systému fungovat nebude. Proč? Protože způsob, jakým se písmo vykresluje v jeho systému, se může zcela lišit od toho, jak se vykresluje ve vašem systému.

Nejlepší způsob, jak se vypořádat se štítky, je upřímně řečeno, udělat je ve Wordu. Data pro štítky můžete mít v pracovním listu Excelu, ale pro vytvoření vlastních štítků použijte sloučení pošty ve Wordu. Nástroje, které jsou k dispozici pro štítky, jsou mnohem jednodušší a mnohem přesnější než to, co můžete udělat v Excelu.

Pokud to bezpodmínečně musíte udělat v Excelu, pak byste měli přepnout do zobrazení Rozložení stránky. (Zobrazte kartu Zobrazení na pásu karet a klepněte na nástroj Rozložení stránky ve skupině Zobrazení sešitu). Na obrazovce se tak zobrazí vodorovná i svislá pravítka, která můžete použít jako vodítko při nastavování výšky řádků a šířky sloupců.

Práce v zobrazení Rozložení stránky má ještě jeden zajímavý vedlejší efekt: Pokud zobrazíte kartu Domů na pásu karet a použijete příkazy pro nastavení výšky řádku a šířky sloupce (z nástroje Formát), všimnete si, že obě hodnoty jsou uvedeny v palcích. Na absurdní šířku sloupce s počtem znaků se vrátí, až když se přepnete zpět do Normálního zobrazení.

Pokud dáváte přednost nastavení výšky a šířky pomocí makra, mohlo by pro vás být poučné makro WidthHeightInches.

Sub WidthHeightInches() Dim Temp As String Dim RInch As Single Dim CInch As Single Dim WPChar As Double Dim c As Range Dim r As Range Temp = InputBox("Row height in inches?") RInch = Val(Temp) If RInch > 0 And RInch <= 2 Then Temp = InputBox("Column width in inches?") CInch = Val(Temp) If CInch > 0 And CInch <= 3 Then For Each c In ActiveWindow.RangeSelection.Columns WPChar = c.Width / c.ColumnWidth c.ColumnWidth = ((CInch * 72) / WPChar) Next c For Each r In ActiveWindow.RangeSelection.Rows r.RowHeight = (RInch * 72) Next r End If End IfEnd Sub

Pamatujte, že šířky sloupců jsou určeny počtem číslic, které se do buňky vodorovně vejdou. Jádro tohoto makra zjišťuje šířku jedné číslice v bodech. Udělá to tak, že vydělí šířku sloupce v bodech (vlastnost .Width) šířkou sloupce ve znacích (vlastnost .ColumnWidth). Z této hodnoty se pak vypočítá, o kolik znaků by měl být sloupec široký, aby měl požadovanou šířku.

.

Napsat komentář

Vaše e-mailová adresa nebude zveřejněna.