Jump to content

RandalHP

Members
  • Content Count

    150
  • Joined

  • Last visited

Everything posted by RandalHP

  1. Quería expresar un formato de celda "Superscript" como fórmula. Para incluirla dentro de una fórmula que estoy creando para transformar un texto. Ejm: Sin fórmula: Rank 1 Con fórmula: Rank 1 Creo que al final esto no se puede lograr. Muchas gracias por la aclaración. Ss.
  2. Que tal, me podrían apoyar con la creación de una función para aplicar "Superscript" lo estoy intentando pero no me esta dando ningún resultado: Function SUPERSCRIPT(x As String) As String SUPERSCRIPT = Font.Superscript = True End Function No tengo mucho conocimiento de VBA. Por eso acudo a su ayuda. De antemano gracias y hasta luego... Ss.
  3. Me queda muy claro. Gracias! Creo que me explique mal (las disculpas de caso). No quería ampliar tanto este asunto. Solo necesitaba el código correcto para la operación que estoy necesitando ejecutar. (Que es algo que siempre hago de forma manual "Copy & Paste") por esto recurro a una macro de evento. Los codigos que me están proporcionando me estan sirviendo mucho, en especial el ultimo que mando @Gerson Pineda. Pero la solución final a mi proceso, es para cuando se escribe 2 en cualquier celda de la columna "E" en el rango "R:V" se copie de arriba para abajo. Al parece
  4. No, no. Pertenece a la misma hoja de trabajo. Coloque el el Destination:=Worksheets("Sheet1") para no afectar otras hojas. Ss.
  5. Al final llegué a esta conclusión: Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Address(0, 0) = "E6" Then If .Value = 2 Then Range("R5:V5").Copy Destination:=Worksheets("Sheet1").Range("R6:V6") End With End Sub Que necesito cambiar o agregar para que cuando pase lo mismo en la E7 y subsiguientes pase lo mismo. (Siempre y cuando este campo sea 2) Ss.
  6. Estoy intentando, pero no sale algo estoy haciendo mal... Adjunto Excel con el código... Cuando escribo en E7 o E8 no pasa nada tampoco... Copiar_Texto_PrivateSub.xlsm
  7. Entiendo. Esta bien *Si la celda "E6" varia. E7, E8... También aplicará la regla? Ss.
  8. Me funciono, pero cuando quiero seleccionar un rango no funciona se elimina todo. Lo tengo de la siguiente manera: Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Address(0, 0) = "E6" Then If .Value = 2 Then Range("R6:V6") = Range("R5:V6") End With End Sub Ahora, cuando es para todo un rango. Ejm: (E7, E8, E9, etc.) y copie sus respectivos campos como debería ir... Ss.
  9. Buenas tardes, Me podría ayudar a crear un "Private Sub" para copiar un rango de celdas según el criterio de otra. Ejm: Si la celda (E6 = 2) entonces los valores de la celda (R5 se copian a R6). Adjunto un archivo para poder efectuar el proceso. Gracias de antemano. Ss. Copiar_Texto_PrivateSub.xlsm
  10. La fórmula final quedó de esta manera: Text.Upper(Date.ToText([FECHA],"dd-MMM-yy","en-US")) y el resultado fue el deseado! Muchas gracias por tu apoyo!!! Ss.
  11. Este es el resultado final: Tendré que agregar un "Upper" para solucionar el problema? Ss.
  12. Listo, solucione el problema. Tenía que cambiar el formato de la columna antes de aplicar el nuevo formato. Pero he notado que sigue saliendo el mes en minúscula, no habrá manera de que se vuelva mayúscula. Ss.
  13. Buendia amigo, mira intente agregar la columna con la fórmula proporcionada, y me está dando error... Te adjunto el excel con la modificación. Ss. Formato-Fecha.xlsm
  14. Si, no habría problema. El texto lo reconoce bien!
  15. "enmascarar" te refieres a transformar esa columna en el formato deseado. El objetivo es llegar a ese formato de fecha en el reporte, ya que, este se procesa en un sistema que solo acepta el formato de fecha que menciono, y no el "standar" que todos conocemos. Intente cambiarlo modificando esa columna pero no llegó al formato deseado. Utilice (Separar, modificar, reemplazar, unir, etc.) Ss.
  16. El formato de fecha que me has proporcionado es el que necesito, pero como lo puedo agregar en un proceso de PQ... Ss.
  17. @Gerson Pineda Doc. a los años. Mira lo que pasa es que estoy transformando una información (Un reporte) y una de las columnas que necesito transformar es de la fecha que te comente. Ahora, veo que ese formato personalizado me da el formato de fecha que estoy buscando (Como puedo hacer que el mes salga en mayúscula?). Habrá una manera de poder incluir este formato en un proceso de PQ... Agradecere tu ayuda! Ss.
  18. Estimados, Buenas tardes, tengo un tema que quiero darle solución he intentado varias maneras pero ninguna me da el resultado deseado. Tengo un archivo el cual, dentro de una tabla, tiene un formato de fecha el cual es "standar" (01/01/2020). Ahora, con el PQ me gustaria pasarlo al siguiente formato (01-JAN-20), este último formato al parecer es de un idioma extranjero, el cual, no ubico en mi PQ (Cuenta con una versión en inglés "Microsoft Office 365 ProPlus"). Si alguien me pueda echar una mano con este percance se lo agradeceria mucho! PD: Adjunto un excel con el formato
×
×
  • Create New...

Important Information

Privacy Policy