Dante Amor

Dante Amor

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

Respuestas en Programación

Respuesta en y en 2 temas más a

Macro doble click para ir pasando filas a otra hoja

Te anexo la macro actualizada Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'Act.Por.Dante Amor If Not Intersect(Target, Columns("A")) Is Nothing Then If Target.Value = "" Then Exit Sub Set h1 = ActiveSheet Set h2...
Respuesta en y en 2 temas más a

Ejecutar macro a unos minutos de abrirse archivo de excel

Prueba con lo siguiente: Private Sub Workbook_Open() ' Application.ScreenUpdating = False Application.DisplayAlerts = False ThisWorkbook. RefreshAll ' 'Espera un minuto DoEvents Application. Wait Now + TimeValue("00:01:00") DoEvents ' Sheets. Copy...
Respuesta en y en 2 temas más a

Buscar un valor de una columna, y usar el valor de otra columna pero de la misma fila del valor encontrado.

Revisa el siguiente vídeo para utilizar la función BuscarV https://www.youtube.com/watch?v=_WxfHXzQxLU&t=37s Con la función obtienes la cantidad, ya con ese valor se lo puedes restar a la existencia Prueba y me comentas
Respuesta en y en 2 temas más a

Macro-Importar .txt a .xls con mismos formatos!

No puedo poner la macro, no sé qué pasa con tu usuario que no me permite poner las macros. Te anexo las imágenes . 'S aludos. Dante Amor. Recuerda valorar la respuesta .
Respuesta en y en 1 temas más a

Extraer un registro de Varios Contratos

Envíame tu archivo con los ejemplos explicados y del resultado que esperas. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “maximop”
Respuesta en y en 2 temas más a

Pasar archivo .txt a excel con macro

Te anexo la macro para leer todos los archivos txt de una carpeta Sub Importar_Archivos() 'Por.Dante Amor Application.ScreenUpdating = False Set h = ActiveSheet h.Cells.Clear ruta = "C:\Prueba excel\" 'ruta = "C:\trabajo\libros\" ' fila = 1 arch =...
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

¿Cómo puedo hacer un macro que me haga un consolidado de varios libros de excel que contiene varias hojas?

En un libro crea 2 hojas y les pones por nombre "Valores" y "Resumen" En la hoja "Valores" pon la siguiente información: Asigna la macro al botón: Sub Importar_Datos() ' ' Por.Dante Amor ' ' Set l1 = ThisWorkbook Set h1 = l1.Sheets("Valores") Set h2...
Respuesta en y en 2 temas más a

Macro que guarde solamente los datos en una sola hoja excel

Te anexo la macro actualizada Sub GuardarPDF() ' ' Por Dante Amor ' ' Application.ScreenUpdating = False Application.DisplayAlerts = False ' Set l1 = ThisWorkbook Set h1 = l1.Sheets("Hoja1") 'Primera hoja donde vas a poner el cliente Set l2 =...