Saltar al contenido

JSDJSD

Exceler C
  • Contador de contenido

    2440
  • Unido

  • Última visita

  • Días con premio

    236

Todo se publica por JSDJSD

  1. Si nadie contesta ante, mañana te lo miro
  2. La posible solución te la he dado con el archivo anterior, no vi el nuevo que habías subido, pero bueno puedes adaptarlo perfectamente, no es difícil
  3. Esta parte no es difícil, inténtalo y si no lo consigues coméntalo Cemento.xlsm
  4. El archivo Propuesta25122024.xlsm
  5. Te entendí bien, pero me quede a medias, únicamente hacia lo que pedias cuando ponías directamente el NHC y no cuando lo buscabas con la lupa, prueba ahora y comenta
  6. Private Sub UserForm_Initialize() Dim hoja As Variant For Each hoja In Sheets If hoja.Name <> "Alta" And hoja.Name <> "Auxiliar" And hoja.Name <> "ddTraDa.hoja" Then ComboBox8.AddItem hoja.Name End If Next TextFechaReg = Format$(Date, "dd/mm/yyyy") End Sub Cambia en tu formulario Private Sub UserForm_Initialize() por este y solamente te cargara las hojas que necesitas actualmente, cuando añada nuevas que quieras incluirlas debes cambiar el código a tus necesidades.
  7. Tal cual veo tu archivo en el formulario MC-Agregar registros, en el comobox Nombre(nomHoja) solamente deberías cargar Berel y Romta, bueno míralo y comentas.
  8. Prueba y comenta Propuesta27102024.xlsm
  9. Private Sub ComboBox8_Change() Dim vhoja As String vhoja = ComboBox8.Text Me.txtCons = Application.WorksheetFunction.Max(Sheets(vhoja).Range("A:A")) + 1 End Sub registro consul.xlsm
  10. Si está configurado así, como tendría que ser?
  11. Por cierto en la columna D donde pone PDF no tienes que poner nada se hace automáticamente al escoger el pdf Propuesta27102024.xlsm
  12. Prueba ahora a ver que tal¡¡
  13. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If SaveAsUI Then MsgBox "La opción 'Guardar Como' está deshabilitada", vbExclamation Cancel = True End If End Sub Prueba y comenta
  14. Nueva versión pruébala y comentas Propuesta27102024.xlsm
  15. Te lo he modificado según tus instrucciones pero te aseguro que te dará pie a confusiones, considero que no es la manera correcta de hacer las búsquedas, pero bueno pruébalo y me dices Propuesta27102024.xlsm
  16. Te dejo el archivo modificado Propuesta27102024.xlsm
  17. Prueba y comenta, puedes tener los libros cerrados pero deben estar en la misma ruta que el archivo Cemento
  18. Te dejo el archivo para que lo pruebesPropuesta27102024.xlsm
  19. Mañana te lo comparto para que lo pruebes
  20. También añadimos para que puedas modificar los datos de la hoja MAPAS desde el mismo formulario en concreto los campos Peticionario, Realizado Revisión y Observaciones
  21. Mira a ver si esto se ajusta más o menos a lo que buscas.
×
×
  • 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.