Příspěvky uživatele


< návrat zpět

To zjistím takhle. To by problém nebyl. V MSO 2007 to chodí, ale už ne v MSO 2003 3

Sub ZobrazitPocetStranek()
Dim PocetStranek As Integer
Dim list As Worksheet
PocetStranek = 0
For Each list In Worksheets
PocetStranek = PocetStranek + (list.HPageBreaks.Count + 1) * _
(list.VPageBreaks.Count + 1)
Next list
Range("bStCelk") = PocetStranek
End Sub

Jak prosím zadám číslování stran do konkrétní buňky? Jde mi to jen do záhlaví a zápatí...


Uživatelské menu

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

Menu

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje