Cómo introducir variables en encabezado y pie de página

Hola Raul,

Prueba lo siguiente:

..LeftHeader = Format(.Parent.Range("A1"),"dd/mm/yyyy")
..LeftFooter = Format(.Parent.Range("B1"),"dd/mm/yyyy")

Saludos,
KL

"Raul_S" wrote in message
news:
> Hola KL:
>
> Pregunto por que cuando meto una fecha en A1 o B1 me la pone en formato
> general en vez formato fecha????
> Habría forma de formatearla????
>
> Saludos Raul_S
>
>
> "KL" wrote:
>
>> Hola Joel,
>>
>> Tendras que usar macros para esto. Por ejemplo si depositas el siguiente
>> codigo en cualquier modulo VBA de tu libro, solo tienes que llamar el
>> Macro2
>> mediante un boton, o pulsando Alt+F8, seleccionando el nombre del macro y
>> pulsando Ejecutar. Tambien puedes asignarlo a un evento (p.ej.
>> Workbook_BeforePrint) depositando el codigo en el modulo VBA del libro
>> (EsteLibro o ThisWorkbook):
>>
>> Sub Macro2()
>> With ActiveSheet.PageSetup
>> .LeftHeader = .Parent.Range("A1")
>> .LeftFooter = .Parent.Range("B1")
>> End With
>> End Sub
>>
>> o
>>
>> Private Sub Workbook_BeforePrint(Cancel As Boolean)
>> With ActiveSheet.PageSetup
>> .LeftHeader = .Parent.Range("A1")
>> .LeftFooter = .Parent.Range("B1")
>> End With
>> End Sub
>>
>> Saludos,
>> KL
>>
>>
>> "Joel" wrote in message
>> news:eD$
>> > Hola a todos!
>> >
>> > Tengo un archivo en el que quiero que en el encabezado y el pie de
>> > página
>> > me aparezca el valor de una celda en concreto pero no sé cómo hacerlo.
>> > Gracias por adelantado. Un saludo,
>> >
>> > Joel.
>> >
>>
>>
>>