Jump to content
Sign in to follow this  
Pedro Maias

Variables Públicas

Recommended Posts

Hola buenas tardes, me podrían ayudar con las variable, les explico tengo estas variables que me funcionan bien en varias hojas

       Public Const LO = "Está Cerrado"
       Public Const GA = "78"
       Public Const c = ""
       Public Const P = "Pagado "
       Public Const DV = "Devuelto":
       Public Const PR = "Este mes esta mal"

      Public Const IVA = "+ 21% de IVA"
      Public Const CR = "47"
      Public Const TG = "Total + Gastos"

      Public Const TS = ("=(R26-S39-S40-S41-S42-S43-S44-S45-S46)")

 

Pero esta NO

Public Const DS = ("=Format(Date, "mm-dd-yyyy")"), me da, error de compilación se esperaba:)

y la verdad es que uso esa funcion como unas 70 veces y quisiera ponerla una sola vez en el modulo como tengo las de arriba

me podéis echar una mano en donde me equivoco

Share this post


Link to post
Share on other sites

Lo que hay echo pero se repite muchísimo y es por eso que lo quiero hacer publica, es lo siguiente que al insertar por ejemplo en la casilla A1  un dato pues que en la casilla G8 me ponga la fecha de la introducción de A1

 

esto mas o menos

Public Const A = "50"
Public Const B = 0
Public Const C = "NO Funciona"
Public Const DS = ("=Format(Date, ""mm-dd-yyyy"")")

 

Private Sub CheckBox1_Click()
Range("f4").Value = CheckBox1.Value
If CheckBox1.Value = True Then Range("f4").Value = A Else Range("f4") = B

    If Range("f4") > 1 Then
        Range("f1") = DS ' (Aqui la fecha)
    Else
        Range("f1") = C '(esta pone la celda en vacio)
End If

End Sub

 

Share this post


Link to post
Share on other sites
  1. El código VBA no puede estar contenido en una variable ni en una constante.
  2. La variables y constantes públicas se definen en un módulo.

Por lo tanto:

 Range("f1") = DS 'N0 ES VÁLIDO

Debe ser

 Range("f1") = Format(Date, "dd-mm-yyyy")

 

Share this post


Link to post
Share on other sites

Vale así es como lo tengo y es como funciona, pero como desconozco mucho el vba, pensaba que se podía hacer, pues nada lo dejaremos como esta, daros las gracias por atenderme y si no hay novedad se puede cerrar este tema

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  

×
×
  • Create New...

Important Information

Privacy Policy

Ayuda Excel - Madrid, Madrid, ES - Valorada por 6254 personas - Aprender Excel - Total: 4.7 / 5