< návrat zpět

MS Excel


Téma: Číslování stránek rss

Zaslal/a 20.4.2011 9:36

Dobrý den.

Chtěl bych se optat, zda-li je v Excelu možné číslování stránek v rámci listů. Když dám tisknou celý sešit, aby se stránky na listě jedna očíslovaly od 1 do "X" a stránky na listě 2 navázaly na číslování a pokračovaly.

Zároveň opakuji svůj minulý nezodpovězený dotaz:
"Chtěl bych se optat, zda-li je v Excelu (2007) možné schovat buňky při tisku. Tzn. obsah buněk nebude při tisku zobrazen, ale nedojde k žádnému posunu okolních buněk a formátování zůstane zachováno. Obdobně jako u programu Calc (openoffice)."
Děkuji.

S pozdravem Kadel

Calc (viz. atributy buňky): http://officir.ic.cz/chipop05/02/ooc_format_cisla.html

Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

Strana:  « předchozí  1 2
icon #004771
Poki
Tady je makro, ktere nastavi Oblast (ktera nema byt videt pri tisku) na bilou barvu pisma, pak zobrazi nahled (nebo vytiskne) a nastavi oblast zpet na cernou barvu pisma:

Sub TISK()
'colorindex = 2 'bila
'colorindex = 1 'cerna

Dim Barva As String
Barva = 2

Set Oblast = Range("B2,D4:F7,G2:H9") 'oblast, ktera nema byt videt pri tisku

'nastaveni Oblast na bilou barvu pisma
Oblast.Font.ColorIndex = 2

ThisWorkbook.PrintPreview 'nahled pred tiskem
'ThisWorkbook.printout 'tisk

'nastaveni Oblast na cernou barvu pisma
Oblast.Font.ColorIndex = 1

End Subcitovat
#004772
avatar
2 podle mého názoru se jedná o jedno a totéž. Polud mi to PDFCreator rozkouskuje, tak stačí dát kousky do fronty a spojit je v jeden dokument a číslování potom funguje na výbornou.
To Poki: Ne vše můžeme dělat na firemních strojích, ale díky za zajímavý tip. PDF995 vypadá dobře 4citovat
#004773
avatar
Díky za makro. Jen bych se chtěl optat, jak se dá měnit ten color index, pokud bych písmo nechtěl bílé?citovat
icon #004774
Poki
Pokud nechcete bile, neni nic lehciho nez definovat jinou barvu.
Problem u ColorIndex je, ze ma jen 56 barev (zakladni barvy), takze pokud budete potrebovat (kvuli pozadi listu) jinou barvu, bude lepsi nepouzit ColorIndex, ale jen Color, takto: ? ActiveCell.Font.Color.
Pokud tedy budet mit vybranu bunku, ktera bude mit takovou barvu, jakou potrebujete, postaci do Immediate okna ve VBE napsat vyse zmineny kod a dostanete cislo, ktere potom nastavite (pozor na ten ColorIndex, radeji pouzijte Color).citovat
#004775
avatar
O.K. takhle mi to už stačí 2 Děkuji.citovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vyhledání buněk a kopírování do druhého listu

matusup • 15.5. 10:13

Relativní cesta - zdroje Power Query

elninoslov • 15.5. 9:44

Relativní cesta - zdroje Power Query

Alfan • 15.5. 8:46

Přidat dny

Baja • 15.5. 8:17

Vyhledání buněk a kopírování do druhého listu

elninoslov • 15.5. 8:15

Přidat dny

elninoslov • 15.5. 8:11

Vyhledání buněk a kopírování do druhého listu

matusup • 15.5. 7:25