Respuesta
en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
y en 1 temas más
a
¿Cómo hago en VBA para seleccionar celda o rango de celdas estando abierto un combobox?
Respuesta
en
Microsoft Excel
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
Microsoft Excel
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
VBA
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.
Respuesta
en
Microsoft Excel
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
Microsoft Excel
y en 2 temas más
a