Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.752K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 2 temas más a

Escribir valor al lado de celdas no continuas

Prueba lo siguiente: Range("I7:I" & Range("G" & Rows. Count).End(xlUp). Row). Copy Windows("CITI COMPRAS.xlsx").Activate Range("AF6").PasteSpecial Paste:=xlPasteValues Range("AF6:AF" & Range("AF" & Rows.Count).End(3).Row).SpecialCells(2, 23).Offset(,...
Respuesta en y en 1 temas más a

Ordenar datos de una tabla desde un formulario

" Busca la primera línea vacía de la tabla... La idea es que según se graban los datos en la tabla" Yo te sugiero, que en el mismo código, después de guardar los datos en la primera línea vacía, ahí pongas el código para ordenar los datos, por...
Respuesta en y en 1 temas más a

Como cargar un cuadro combinado después de un filtro

Prueba así: celda.offset(0, -2) & " " & celda.offset(0, -1)
Respuesta en y en 2 temas más a

¿Cómo puedo hacer una macro que pueda filtrar, copiar y pegar en otras hojas, en base a la data filtrada?

Ejecuta la siguiente macro para crear una hoja por cada nombre Cambia "base" por el nombre de tu hoja con la base de datos y "A" por la columna donde tienes los nombres. Sub Crea_Hojas() Dim c As Range, sh As Worksheet, ky As Variant ' Set sh =...
Respuesta en y en 1 temas más a

Mostrar y ocultar filas de una hoja según el valor de una celda de otra hoja

Solamente es posible con macros. En la hoja "Base", ¿en las celdas A22 a A27 tienes fórmulas? ¿Quieres qué se muestren o se oculten las filas en automático al cambiar el valor de las celdas A22 a A27? Aquí te ayudo para que puedas instalar la macro,...
Respuesta en y en 2 temas más a

¿Cómo mantener formato en macro que copia hoja en excel?

H o l a, bienvenida al foro! Prueba lo siguiente: Sub Copia() Dim hoja As Worksheet, nueva As String Application.ScreenUpdating = False ' Set hoja = Sheets("Plan de Desarrollo") nueva = hoja.Range("D8") If nueva = Empty Then Exit Sub If...
Respuesta en y en 2 temas más a

No permitir campos vacíos en un formulario userform.

¿La fecha es un textbox? Intenta lo siguiente: Private Sub CommandButton2_Click() ' 'VALIDACIONES If Fecha.Value = "" Then MsgBox "Falta la fecha" Fecha.SetFocus Exit Sub End If If CodRodamientos.Value = "" Then MsgBox "Falta el CodRodamiento"...
Respuesta en y en 2 temas más a

Contar y sumar varios campos a un mismo criterio

No entiendo cómo están tus datos originales. ¿Y en dónde quieres los resultados? ¿O qué elementos tienes en los resultados? Puedes poner imágenes de tus ejemplos. Guarda las imágenes como jpeg. El icono para subir imágenes es este:
Respuesta en y en 2 temas más a

Modificar registros mediante listbox.VBA EXCEL

Supongo que quieres modificar los registros de la hoja "Equipaments", pero solamente si coinciden con lo que tienes en el textbox y combobox. Si es así podrías explicar cuál columna de la hoja se debe comparar contra el textbox y cuál columna contra...