Variable Fecha en Macro

[Anonymous]

Buen día,

Tengo una variable con la fecha máxima de un campo, quiero agregarla a una macro para colocarla en un disparador al entrar a la hoja en cuestión, pero no logro hacerlo, esta es la macro.

Sub FechaPago
ActiveDocument.ClearAll (true)
ActiveDocument.Fields("Fecha_Pago"). Select ActiveDocument.GetVariables ("vFechaPago")
End Sub

La variable funciona bien, es esta:

=max({1}Fecha_Pago);

Donde podría tener el problema?

Saludos

[JoaquinLazaro · Accepted solution]

Hola Ricardo:

Una posibilidad es usar el tipo de acción Seleccionar y acción Seleccionar en Campo en tu disparador.

En la caja Campo introduces Fecha_Pago

En la caja Buscar Cadena de Texto introduces la expresión que necesites; por ejemplo, Today() o Max(Fecha_Pago) ... presta atención al formato de fecha en tu tabla y la que te devuelve el sistema en la función today

Saludos

Joaquín

[alexdataiq]

Yo también sugeriría hacerlo con Triggers como menciona Joaquín, pero si deseas hacerlo con macros esto debe de servir:

Sub FechaPago
  ActiveDocument.ClearAll (true)
  ActiveDocument.Fields("Fecha_Pago").Select ActiveDocument.Variables("vFechaPago").GetContent.String
End Sub

También como menciona Joaquín debes revisar tú formato de fecha, si tú campo Fecha_Pago viene en formato "fecha", por ejemplo "2016-05-27" pero tú variable vFechaPago te lo devuelve en formato numérico "42548" entonces deberías usar MaxString:

vFechaPago = MaxString({1} Fecha_Pago)

Saludos

[Anonymous]

Muchas gracias, es justo lo que necesitaba

[Anonymous]

También funciona perfecto en la macro, muchas gracias por la ayuda.

[JoaquinLazaro]

Perfecto, hasta pronto