Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

personalizar encabezado pagina

144 views
Skip to first unread message

SAM S.L

unread,
Jul 23, 2007, 8:00:58 AM7/23/07
to
Hola!

Tengo una hoja de excel en cuyo encabezado pongo la fecha &[fecha] y el
nombre del archivo &[archivo] pero me interesaria poner el nombre SIN la
extension. Es posible manejar el contenido de celdas y/o funciones de VBA
dentro del encabezado o pie de pagina? como? Es posible hacerlo en la
version 2003? o en la 2007? Lo he buscado en la ayuda pero no se encontrar
informacion

Muchas gracias

infinitogool

unread,
Jul 23, 2007, 8:18:54 AM7/23/07
to

"SAM S.L" escribió

Hola SAM
Si en Windows tienes activada la opción "ocultar las extensiones de archivo
para tipos de archivo conocidos" (Opciones de carpeta+ver), en este caso el
nombre que te pone es sin extensión.

Un saludo
infinitogool

SAM S.L

unread,
Jul 23, 2007, 9:58:19 AM7/23/07
to
ok, ya lo he solucionado:

ActiveSheet.PageSetup.RightHeader = "Factura Nº: " +
Worksheets("FACTURA").Range("C3").Value

Ahora me falta poder definir las porpiedades del texto: fuente, color,
tamaño .... y añadir un salto de linea!
"SAM S.L" <SAM...@terra.ES> escribió en el mensaje de noticias
news:%23kWymES...@TK2MSFTNGP04.phx.gbl...

danek

unread,
Jul 23, 2007, 10:12:02 AM7/23/07
to
ActiveSheet.PageSetup.LeftHeader = "&""Arial,Cursiva""&9" & NombreEmpresa &
Chr(10) & Chr(10) & Chr(10) & Chr(10) & FechaActual

Este código lo utilizo para poner el encabezado izdo en arial, cursiva, 9, y
que me añada dos variables que pido con un inputbox (NombreEmpresa y
Fecha...). El Chr(10) es el salto de línea...

"SAM S.L" escribió:

SAM S.L

unread,
Jul 23, 2007, 12:18:10 PM7/23/07
to
ok y muchas gracias

"danek" <da...@discussions.microsoft.com> escribió en el mensaje de noticias
news:EC91865F-E317-4EF4...@microsoft.com...

0 new messages