P

Héctor Miguel escribió:

> ... no le veo diferencias con el funcionamiento sin este codigo.

=> 'efectivamente', es... [solo] una forma de 'asegurarte', en el caso de que...
... SI [los de la oficina] 'se meten' con los encabezados y pies de pagina,
NO 'echen a perder' la numeracion :))

No, no creo que toquen los encabezados.
(Tal vez, incluso no creo que sepan ni dónde encontrarlos)

Pero lo que tampoco van a hacer es seleccionar varias hojas antes de
darrle a imprimir.

Bueno, no te preocupes, seguiré revisándo los encabezados manualmente,
aunque me hubiera gustado que fuera automático, para pasárle la
plantilla a otros compañeros.

Yo se qué tengo que revisar cómo están antes de enviarlo, pero si se lo
paso a otros, es posible que se despisten y los envíen mal.

(Acabo de tener una idea, voy a investigar y luego comento)

He vuelto a mi idea original
Pero creo que no se hacerlo.

A ver qué os parece el siguiente organigrama para antes de imprimir


1. Contar el número de páginas que tienen determinado nombre
Ese es el total de páginas = N

2. Ver si la hoja que se va a escribir tiene ese patrón en su nombre

Si no lo tiene, ahí acaba todo
Si lo tiene, se busca el segundo caracter por la derecha en el nombre de
la hoja. Ese es el número de página = X

Estos valores se pueden llevar al encabezado, o en el peor de los casos,
en una fórmula que ubicamos en una celda dentro de la hoja.

¿puede ser viable esta idea?

hola, Santi !

... el siguiente organigrama para antes de imprimir
1. Contar el numero de paginas que tienen determinado nombre. Ese es el total de paginas = N
2. Ver si la hoja que se va a escribir tiene ese patron en su nombre
si no lo tiene, ahi acaba todo
3. Si lo tiene, se busca el segundo caracter por la derecha en el nombre de la hoja. Ese es el numero de pagina = X
4. Estos valores se pueden llevar al encabezado, o en el peor de los casos, en una formula ... en una celda dentro de la hoja.
¿puede ser viable esta idea?

1.- N = total de paginas = resultado [impreso] de un 'conjunto' de hojas 'pre-determinadas' ... OK [no hay problema]
2.- X = total de paginas = resultado [impreso] de CADA hoja del 'conjunto' para 'sumarse' al conteo 'inicial' de la siguiente [?]
3.- se necesita que... INDEPENDIENTEMENTE de cual[es] hoja[s] imprima[n] en la oficina =>y su orden<= ...
==> la numeracion 'correspondiente' [en cada hoja] siga siendo 'la correspondiente' ??? <=4.- 'considerando' que... la 'paginacion' [y el numero de paginas 'resultante'] DEPENDE de...
[algunas 'opciones' DEL USUARIO y las veces que -posiblemente- las cambie 'antes' de imprimir] :((
- como: si la cambia la resolucion... o los margenes... o [lo que sea que 'afecte' el resultado 'final'] :o|
[tengo que insistir en que]... NO 'queda' otra alternativa que... usar codigo en el evento '_BeforePrint' del libro :((

- ¿cual es el 'patron' [en el nombre] de las hojas que necesitan esa paginacion?

saludos,
hector.

Héctor Miguel escribió:

1.- N = total de paginas = resultado [impreso] de un 'conjunto'
de hojas 'pre-determinadas' ... OK [no hay problema]

Número total de hojas que cumplen un patrón
El patrón es llamarse "Nombre (X)"

2.- X = total de paginas = resultado [impreso] de CADA hoja del
'conjunto' para 'sumarse' al conteo 'inicial' de la siguiente [?]

Es el número que hay en el nombre de la hoja, que va entre paréntesis

3.- se necesita que... INDEPENDIENTEMENTE de cual[es] hoja[s] imprima[n]
en la oficina =>y su orden<= ...

Exacto. Si quieren imprimir "sólo" la hoja que se llama "Nombre (3)" en
un libro que tiene cinco hojas con ese patrón (más otras que no encajan
en el patrón), debe imprimirse como "página 3 de 5".

No te compliques con márgenes y especificaciones de impresora, porque
para evitar eso ya les pongo cada página a imprimir en una hoja excel
diferente, evitanto ese problema.

Aunque no tengo ni idea de cómo hacen para imprimir, supongo que van
hoja por hoja, pulsando en cada una de ellas el botón imprimir.

4.- 'considerando' que... la 'paginacion' [y el numero de paginas 'resultante']
DEPENDE de... [algunas 'opciones' DEL USUARIO y las veces que
-posiblemente- las cambie 'antes' de imprimir] :((
- como: si la cambia la resolucion... o los margenes... o [lo que sea
que 'afecte' el resultado 'final'] :o|
[tengo que insistir en que]... NO 'queda' otra alternativa que...
usar codigo en el evento '_BeforePrint' del libro :((

- ¿cual es el 'patron' [en el nombre] de las hojas que necesitan esa paginacion?

Yo creo que no hace falta complicarse tanto.

Dime si hay una función (la estuve buscando pero no la encontré, aunque
es básico que exista), una función que devuelva el nombre de la hoja
activa.

Con esa función, al menos, ya tengo el número de la página, pues es
fácil extraer lo que va entre los paréntesis, que es el número de esa
página.

Para obtener el total de páginas, necesito una función que me diga el
número de hojas que tiene un libro.
Seguramente, con esa función, pueda contar las que coinciden con el
patrón, y en el peor de los casos, les mando un libro sólo con las hojas
de ese informe, y el resto de hojas (que las incluí yo en el mismo
libro) se las mando en otro libro diferente, de forma que el total de
páginas sea igual al total de hojas del libro, que será más fácil de
contar.

Aunque supongo que si existe esa función, no me será difícil discernir
entre qué nombres de hojas cumplen el patrón y cuáles no.

Muchas gracias por tu preocupación, Héctor... pero creo que el problema
es más sencillo de lo que lo estás abordando.

El código que me enviaste es útil... pero si hace lo mismo que sin
código, y sigue dependiendo de que en la oficina para imprimir
seleccionen todas las páginas a la vez... entonces no resuelve el
problema, por dos motivos...

Uno, porque no lo van a hacer
y otro... porque tal vez en ocasiones necesiten imprimir una sola
página, y en ese caso, la paginación como conjunto no sirve.

Si existen esas dos funciones que he comentado, creo que habré resuelto
el problema.

Muchas gracias, por supuesto

hola, Santi !
_________
[finalmente]... 'me llega'... 'algo de luz' [solo para tratar de 'desenrredar' este 'enredo'] ...
[yo] 'entiendo' por pagina... la pagina [o las paginas] IMPRESA[S] ya sea de una hoja de calculo o de todo un libro
[tu] le has dado el mismo 'significado' a pagina que a hoja de calculo [al menos... en lo que a 'este' libro se refiere]
[yo] ahora entiendo 'el porque'...
[tu] te 'has encargado' de que 'cuando se imprima' cada hoja... 'quede ajustada' a una sola pagina [uuhfff] ;)
¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨¨

Yo creo que no hace falta complicarse tanto.

estoy de acuerdo contigo en que no debemos 'complicarnos' tanto [una mala costumbre que se me ha 'pegado'] :((
y al parecer... lo unico que necesitas es lo siguiente...

Dime si hay una funcion ... que devuelva el nombre de la hoja activa.

=> usa la propiedad 'Name' ... 'aplicada' a un objeto 'Sheet' o... 'Worksheet'
=>'Sheet' incluye hojas de graficos, macros de Excel4, etc. y... 'Worksheet' SOLO hojas de calculo< p.e. ActiveSheet.Name o... Worksheets(3).Name o... Sheets(3).Name

Para obtener el total de paginas, necesito una funcion que me diga el numero de hojas que tiene un libro.

=> usa la propiedad 'Count' para contar los objetos 'Sheet' [o 'Worksheet'] de un objeto 'Workbook'
p.e. ActiveWorkbook.Sheets.Count o... ActiveWorkbook.Worksheets.Count

Muchas gracias por tu preocupacion, Héctor... pero creo que el problema es mas sencillo de lo que lo estas abordando.
El codigo que me enviaste es util... pero si hace lo mismo que sin codigo, y sigue dependiendo de que en la oficina [...]
Si existen esas dos funciones que he comentado, creo que habre resuelto el problema.

creo que las funciones que necesitas quedan expuestas en este mensaje :))
y... si llegara a ser necesario 'recurrir' al codigo... siempre se podran hacer adecuaciones [segun necesidades] ;)
saludos,
hector.