Número de página y total de páginas

hola, Olga Yaneth !

... insertar el numero de pagina y total de paginas del libro en una celda de la hoja.
Existe una funcion para hacerlo?

-> te refieres a 'numerar' la impresion EN UNA CELDA 'en especifico' ?
a) 'esa' celda 'corresponderia' a cada hoja en la salida a la impresora ?
[p.e. la celda en la esquina superior/inferior izquierda/derecha/centro DE CADA HOJA] ?
b) 'esa' celda es parte de las filas/titulo superior en la configuracion de la hoja ?

-> si te refieres a la opcion 'a'...
una solucion [la mas 'sencilla' -creo-] seria 'obligar' [usando encabezados] a que la numeracion 'caiga' EN 'esa' celda
[probablemente 'ajustando' los margenes de los encabezados y/o agregando algun/os salto/s de linea a 'la seccion']

-> si te refieres a la opcion 'b'...
[suponiendo que la celda EN el titulo donde quieres la numeracion es 'E5']
en un modulo de codigo 'normal' ==Sub ImprimirPorPaginas()
Dim Pagina As Integer, Paginas As Integer
Paginas = ExecuteExcel4Macro("Get.Document(50)")
With ActiveSheet
For Pagina = 1 To Paginas
.Range("e6") = "Pag. " & Pagina & "/" & Paginas
.PrintOut From:=Pagina, To:=Pagina
Next
End With
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Héctor Miguel, muchas gracias. Funciona perfecto!

;)

"Héctor Miguel" escribió:

hola, Olga Yaneth !

> ... insertar el numero de pagina y total de paginas del libro en una celda de la hoja.
> Existe una funcion para hacerlo?

-> te refieres a 'numerar' la impresion EN UNA CELDA 'en especifico' ?
a) 'esa' celda 'corresponderia' a cada hoja en la salida a la impresora ?
[p.e. la celda en la esquina superior/inferior izquierda/derecha/centro DE CADA HOJA] ?
b) 'esa' celda es parte de las filas/titulo superior en la configuracion de la hoja ?

-> si te refieres a la opcion 'a'...
una solucion [la mas 'sencilla' -creo-] seria 'obligar' [usando encabezados] a que la numeracion 'caiga' EN 'esa' celda
[probablemente 'ajustando' los margenes de los encabezados y/o agregando algun/os salto/s de linea a 'la seccion']

-> si te refieres a la opcion 'b'...
[suponiendo que la celda EN el titulo donde quieres la numeracion es 'E5']
en un modulo de codigo 'normal' ==> Sub ImprimirPorPaginas()
Dim Pagina As Integer, Paginas As Integer
Paginas = ExecuteExcel4Macro("Get.Document(50)")
With ActiveSheet
For Pagina = 1 To Paginas
.Range("e6") = "Pag. " & Pagina & "/" & Paginas
.PrintOut From:=Pagina, To:=Pagina
Next
End With
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hola Olga.
Creo tener una inquietud similar a la tuya:
Un una determinada columna, en las celdas de la misma y correspondientes a
la página en que están contempladas, quiero escribir el n° de página, de modo
que tengo una columna con el dato de la pag en que se imprimirá.

"Olga Yaneth" escribió:

Hola. Deseo insertar el número de página y total de páginas del libro en una
celda de la hoja. Existe una función para hacerlo? Gracias

hola, Gabriel !

Olga hizo su consulta en diciembre de 2005...
y existe una propuesta con fecha 19 de diciembre de 2005

comentas si la has perdido de vista ?
y/o por que cuelgas tu consulta de un mensaje tan... *antiguo* ?
[en lugar de iniciar uno nuevo y *fresco*] :D

saludos,
hector.

Hola Olga.
Creo tener una inquietud similar a la tuya:
Un una determinada columna, en las celdas de la misma y correspondientes a la pagina en que estan contempladas
quiero escribir el n° de pagina, de modo que tengo una columna con el dato de la pag en que se imprimira.

"Olga Yaneth" escribio:
Hola. Deseo insertar el numero de pagina y total de paginas del libro en una celda de la hoja.
Existe una funcion para hacerlo? Gracias

Hola Héctor Miguel.
Gracias por contestar.-

Mi inquietud es la siguiente:
En una hoja de cálculo, en la que tengo registros con cuatro campos,
columnas A, B, C y D, quiero que cada celda de la columna D ( puede ser otra)
tenga como dato el número de página en que saldrá impresa la misma, y que
cambie si modifico el salto de página correspondiente. En otras palabras,
quiero que el número de página que veo como fondo en pantalla cuando uso
"Vista previa salto de página", esté indicado en las celdas de la columna D,
y que además sea dinámico.-
Lo estoy pensando como una función, y no como una macro que deba
ejecutarse para que aparezcan los datos en esa columna, pero no encuentro
forma.- Usé la propuesta tuya, pero me implica ejecutar la macro, y el valor
que da por resultado no es dinámico, que es lo que necesito ante los posibles
cambios de salto de página si inserto o saco registros a la planilla.-

Saludos.-

"Héctor Miguel" escribió:

hola, Gabriel !

Olga hizo su consulta en diciembre de 2005...
y existe una propuesta con fecha 19 de diciembre de 2005

comentas si la has perdido de vista ?
y/o por que cuelgas tu consulta de un mensaje tan... *antiguo* ?
[en lugar de iniciar uno nuevo y *fresco*] :D

saludos,
hector.

> Hola Olga.
> Creo tener una inquietud similar a la tuya:
> Un una determinada columna, en las celdas de la misma y correspondientes a la pagina en que estan contempladas
> quiero escribir el n° de pagina, de modo que tengo una columna con el dato de la pag en que se imprimira.

>> "Olga Yaneth" escribio:
>> Hola. Deseo insertar el numero de pagina y total de paginas del libro en una celda de la hoja.
>> Existe una funcion para hacerlo? Gracias