Saltar al contenido

Como adaptar calendario?


Recommended Posts

publicado

Como se puede adaptar este calendario a un archivo para que se pueda ver en todos los equipos en un userform.

Anexo Archivo modelo con userform.

Gracias

publicado

No entiendo que es lo que pretendes.

El formulario contiene un control MonthView, este control debe estar en el equipo en que quieras usarlo.

Este control, junto con el control DTPicker están en el archivo mscomct2.ocx que debe incluirse en \Windows\System32 para Windows xp, que es el SO que yo tengo.

Ya te comenté que no tengo ni idea de estas cosas, a mi esos controles me aparecen desde el primer día.

publicado

Hola Macro Antonio es un gusto poder saludarte gracias por tus apoyos y aportes, mi estimado jcjones como te comenta el maestro Macro Antonio ese control (MonthView) es parte del ocx que te menciona, si en tu maquina en la que deseas trabajar no contiene el control mencionado debes de descargar el ocx y registrarlo (normalmente es en windows 7 o 8 donde tienes que hacerlo) es muy raro que sea windows xp al menos que sea un version lite este modificado pero bueno

el ocx lo puedes descargar des de aquiMEGA

luego descomprimes y lo copias a la siguiente ruta en windows de 32 bits C:\Windows\System32\

en windows de 64 bits la ruta es la siguiente C:\Windows\SysWOW64

una vez realizado esto haces lo siguente en bloc de notas pegas lo siguinete

windows de 32 bits

regsvr32 "C:\Windows\System32\mscomct2.ocx"

windows de 64 bits

regsvr32 “C:\Windows\SysWOW64\mscomct2.ocx”

con esto se solucionara tu problema

saludos

atodos los foristas

publicado

Muchas gracias

Macro Antonio y Asesorcperic, los entiendo, lo que sucede es que en mi equipo no me aparecian estos archivos despues de reinstalar de nuevo el windows XP.

Los descargue y me funciona este calendario, pero resulta que a los compañeros de trabajo cuando les paso el archivo no les funciona y deben de ponerse en la tarea de bajar los archivos.

La idea es que con el calendario de Macro Antonio poderlo colocar en el archivo de trabajo y no tener que estar bajando estos y ademas se pueda ejecutar con el boton del archivo inicial.

No se si me he podido explicar.

Muchas gracias.

publicado

La idea es que con el calendario de Macro Antonio poderlo colocar en el archivo de trabajo y no tener que estar bajando estos y ademas se pueda ejecutar con el boton del archivo inicial.

No se si me he podido explicar.

Lo siento pero no lo entiendo.

¿ A que te refieres con calendario de Macro Antonio ?

Tu archivo solo contiene un formulario con un control MonthView.

publicado

Gracias

Eso era lo que queria, lo unico es se puede dejar fijo en un solo punto y no que donde ponga el mouse este se desplaze.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

  • 109 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR
  • Archivos

  • Estadísticas de descargas

    • Archivos
      188
    • Comentarios
      98
    • Revisiones
      29

    Más información sobre "Cambios en el Control Horario"
    Última descarga
    Por pegones1

    3    1

  • Crear macros Excel

  • Mensajes

    • Private Sub Worksheet_SelectionChange(ByVal Target As Range) ' Asegurarnos de que solo ajustamos las filas a partir de la fila 5 If Not Intersect(Target, Me.Rows("5:" & Me.Rows.Count)) Is Nothing Then Me.Rows("5:" & Me.Rows.Count).AutoFit End If End Sub  
    • El archivo RCI PRUEBA..xlsm
    • Saludos amigos espero estén bien  En la actualidad utilizo la siguiente macro para generar un código alfanumérico continuo que al guardar los datos se copia en la Celdas “B5” de las Hojas 58 (MATRIZ1) y Hojas59 (MATRIZ2) Private Sub CommandButton3_Click()     If Hoja58.Range("B5").Value < 9999 Then Hoja58.Range("B5").Value Hoja58.Range("B6").Value + 1     Else        Hoja58.Range("B5").Value = 1     End If If Hoja59.Range("B5").Value < 9999 Then Hoja59.Range("B5").Value = Hoja59.Range("B6").Value + 1 Else        Hoja59.Range("B5").Value = 1     End If End Sub El código se genera normalmente sin embargo no se copia inmediatamente en las Celdas “B5” sino que aparece en las Celdas “B6” mientras que las Celdas “B5” siempre permanecen en blanco, actualmente el código consta de tres letras y cuatro dígitos (RCI-0000) pero me interesa poderle concatenar el mes y año en formato mm-yy para que el código finalmente quede expresado de la siguiente forma RCI-0000-00-00 Mucho les sabre agradecer la ayuda que me puedan dar RCI PRUEBA..xlsm
    • Saludos amigos espero estén bien  En la actualidad  los datos provenientes de los TextBox 5, 6 y 7 se guardan en las Columnas H, I y O de las Hojas 58 (MATRIZ1) y Hojas59 (MATRIZ2) sin embargo cuando el texto es abundante no se visualiza completamente en las celdas correspondientes de allí que necesito que cada fila se ajuste al tamaño de la celda que contenga mayor cantidad de texto para lo cual he probado con la siguiente macro: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.EntireRow.AutoFit End Sub Sin embargo, dicha macro coloca todas las filas del tamaño del texto que contengan y lo que en realidad necesito es que dicha macro solo se aplique desde la Fila 5 en adelante. Mucho les sabre agradecer la ayuda que me puedan dar RCI PRUEBA..xlsm
  • Visualizado recientemente

    • No hay usuarios registrado para ver esta página.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.