Dante Amor

Dante Amor

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

Respuestas en VBA

Respuesta en y en 1 temas más a

Cómo eliminar archivos de una carpeta en VBA

Cambia en esta parte "C:\Users\Luis\Documents\curso de excel\luis\" Por el nombre de tu carpeta, por ejemplo: "C:\trabajo\libros\" Prueba y me comentas. Si te envía un error dime qué error te aparece y en qué línea de la macro se detiene. . 'S...
Respuesta en y en 4 temas más a

Modificar datos en un libro protegido

Si el libro está protegido, no es necesario mostrar la hoja para actualizar sus celdas. Tampoco es necesario desproteger el libro. Por ejemplo, abre un libro nuevo, crea una hoja nueva llamada "Hoja2", oculta la hoja, protege el libro. Corre la...
Respuesta en y en 3 temas más a

Equivalente en VBA para las siguientes funciones de condición

Ejecuta la siguiente macro Sub Macro3() ' ' Por.Dante Amor ' u = Range("A" & Rows.Count).End(xlUp).Row Range("D4:E" & u).FormulaR1C1 = "=IF(ISNUMBER(RC[-2]),IF((RC[-2])>R3C8,""PROXIMO A VENCER"", ""VENCIDO""),"""")" Range("F4:G" & u).FormulaR1C1 =...
Respuesta en y en 2 temas más a

Buscar por VBA una fecha y situar el cursos allí

Pon el siguiente código en los eventos de tu libro Private Sub Workbook_Open() 'Por.Dante Amor Set h = Sheets("Hoja1") Set b = h.Columns("A").Find(Date, lookat:=xlWhole) If Not b Is Nothing Then h.Select b.Offset(0, 1).Select End If End Sub . 'S...
Respuesta en y en 1 temas más a

¿Cómo hago en VBA para seleccionar celda o rango de celdas estando abierto un combobox?

Puedes utilizar el RefEdit Control Entra al menú de VBA, en Herramientas, Referencias, busca Ref Edit Control y activa la casilla. Presiona Aceptar Entra a tu userform, en el menú de VBA, Herramientas, Controles adicionales, Busca RefEdt. Ctrl y...
Respuesta en y en 1 temas más a

Facilitar macro vba registrar por contrato

Va la macro para la respuesta Sub Registro_Por_Contrato() ' ' Por Dante Amor ' ' Application.ScreenUpdating = False Set h1 = Sheets("contratos") Set h2 = Sheets("resultado") h2.Rows("2:" & Rows.Count).Clear ' Call Ordenar(h1) ' ant1 = h1.Cells(2,...
Respuesta en y en 2 temas más a

Duda sobre formato fechas en vba (dd/mm/aaaa)

Realiza las siguientes pruebas: Ya estás convirtiendo en fecha el textbox FechaEntrega, ya no debe ser necesario darle formato Range("A12") = CDate(form_AltaConductor.FechaENTREGA) Prueba y me comentas . 'S aludos. Dante Amor. Recuerda valorar la...
Respuesta en y en 2 temas más a

Hacer la búsqueda de una forma diferente, trate de utilizar código WorksheetFunction.VLookup no me sirvió para lo que quiero.

Otra opción es utilizar el método Find( ) Por ejemplo: Private Sub buscar_Click() 'Por.Dante Amor ' If id.Value = "" Then MsgBox "Introduce un ID" id.SetFocus Exit Sub End If ' 'establece en el objeto b el resultado de buscar en la columna A Set b =...
Respuesta en y en 2 temas más a

Macro que al hacer doble click me lleve a la hoja que contenga dato

Pon la siguiente macro en los eventos de tu hoja. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'Por.Dante Amor If Not Intersect(Target, Range("I:I")) Is Nothing Then If Target.Value = "" Then Exit Sub For Each h...
Respuesta en y en 2 temas más a

Pasar de tabla a Matriz en Excel vba.

Te anexo la macro, se requieren 3 hojas, en la hoja1 van tus datos, en la hoja2 quedarán los resultados y la hoja3 es temporal, la requiere la macro. Sub Tabla_Matriz() ' ' Por Dante Amor ' ' Application.ScreenUpdating = False ' Set h1 =...