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 4 temas más a

Problemas con métodos de búsqueda

Te anexo la macro completa. Tuve que crear la macro nueva, para tener un orden de archivos y hojas. Al inicio de la macro se establecen los libros que se van a utilizar; después se solicita que se abra el libro variable. De preferencia mantén abierto...
Respuesta en y en 3 temas más a

Como crear un Backup automático (Macros)

Te anexo un ejemplo, cambia la ruta y el nombre por los que desees Private Sub Workbook_Open() ruta = "C:\respaldos\" nombre = "backup " & Format(Date, "dd-mm-yyyy") & ".xlsm" ThisWorkbook.SaveCopyAs ruta & nombre End Sub [Sal u dos, no olvides valorar.
Respuesta en y en 4 temas más a

Enviar correos con distintos destinatarios, cuerpos y adjuntos al mismo tiempo (MACROS).

Para desaparecer el flash intenta lo siguiente: Antes de esta línea aplication.visible=true Escribe la línea Application.ScreenUpdating = False
Respuesta en y en 4 temas más a

Como crear un TEXTBOX calculadora automático

En los textbox se almacenan los datos como texto, por eso los tienes que convertir a valor numérico, una forma sería con la función CDbl, por ejemplo: Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean) If IsNumeric(TextBox1.Value) Then...
Respuesta en y en 1 temas más a

Extraer números aleatorios de un rango variable, para algunas celdas y si cumplen ciertas condiciones con VBA

Te anexo la macro 2 Sub aleatorio_2() 'Por Dante Amor Dim num As New Collection On Error Resume Next fila = ActiveCell.Row ini = Columns("Q").Column 'columna inicial fin = ini + Cells(fila, "AF").Value - 1 'columna final col = Columns("AH").Column...
Respuesta en y en 1 temas más a

Actualizar fórmulas especificas por vba y no toda la hoja

Bien, como vamos a poner los 6 números aleatorios utilizando una macro, entonces ya no es necesario las fórmulas que tienes en las columnas A a F, tampoco serán necesarias las fórmulas de las columnas AG a AL Pon la siguiente macro en un botón. Sub...
Respuesta en y en 1 temas más a

Buscar el ultimo registro vba

[H o l a Te regreso el código actualizado: Private Sub Combobox_equipo_Change() On Error Resume Next Set h = Sheets("Base de datos") If OptionButton1.Value = True Then registro = xlNext Else registro = xlPrevious End If Set b =...
Respuesta en y en 4 temas más a

Automatizar un valor preestablecido pero dinámico a un textbox. (Macro Excel)

Para qué es le Userform2, ¿para consultar? Después de crear el COD1, ¿cierras el Userform1? Puedes poner una imagen de la hoja de excel donde estás almacenado: COD1, DATO1, DATO2, DATO3, FECHA1 y NUMERO1
Respuesta en y en 3 temas más a

Como hacer Userforms con textbox obligatorios

Una opción es poner las validaciones en el commandbutton. Por ejemplo: Private Sub CommandButton1_Click() 'Validaciones If TextBox1.Value = "" Then MsgBox "Captura un texto en el textbox1" TextBox1.SetFocus Exit Sub End If txt1 = TextBox1.Value For i...
Respuesta en y en 2 temas más a

Jerarquía en selección de datos automática por VBA

Te anexo el código: Private Sub TextBox1_Change() Call Resultado_Grado End Sub Private Sub TextBox2_Change() Call Resultado_Grado End Sub Private Sub TextBox3_Change() Call Resultado_Grado End Sub Private Sub TextBox4_Change() Call Resultado_Grado...