Dante Amor

[ho la xafel : Visita: Cursos de Excel y Macros Por Dante Amor ------ -- Podrías poner ejemplos con una imagen, para ver cómo tienes los datos y qué resultado esperas. ----- -- Mientras revisa el siguiente vídeo, ahí explico cómo funcionan las...

Te paso una macro: Sub separarnumeros() Dim dic As Object Dim a As Variant, b As Variant, cad As Variant Dim i As Long, j As Long, n As Long, x As Long Dim v1 As String ' Set dic = CreateObject("Scripting.Dictionary") a = Range("B2", Range("B" &...

Visita: Cursos de Excel y Macros Por Dante Amor ------ -- Empieza por estos vídeos: https://www.youtube.com/watch?v=PupmVvM16-8&t=6s https://www.youtube.com/watch?v=HfFCtMl189U&t=512s ----- -- Después revisa los siguientes:...

Visita: Cursos de Excel y Macros Por Dante Amor ----- -- Si todavía tienes seleccionado el item en el listbox, entonces puedes comparar cada textbox con su respectiva columna del listbox, algo como esto: Private Sub CommandButton1_Click() 'validación...

[Hola Jose Gacia y bienvenido a TodoExpertos Visita: Cursos de Excel y Macros Por Dante Amor ----- -- Utiliza la siguiente fórmula matricial =SI.ERROR(INDICE(E1:H1,0,K.ESIMO.MENOR(SI(E1:H1<>"",COLUMNA(E1:H1)),2)-COLUMNA($E1)+1), "No existe una...

Visita: Cursos de Excel y Macros Por Dante Amor ----- -- No es recomendable utilizar la instrucción GoTo, no es una forma estructurada de realizar un código. Y no es recomendable realizar demasiados GoTo, no podrás hacer una adecuada revisión, de en...

[Ho la y bienvenida a TodoExpertos. Visita: Cursos de Excel y Macros Por Dante Amor ----- -- Prueba la siguiente macro: Sub GuardarCSV() Dim carpeta As Variant ' With Application.FileDialog(msoFileDialogFolderPicker) .Title = "Selecciona la Carpeta"...

Visita: Cursos de Excel y Macros Por Dante Amor ----- -- En excel: =K.ESIMO.MAYOR(DESREF(C1,6,0,5),1) Cambia las comas ( , ) por punto y coma ( ; ) si lo utilizas como separador de argumentos. Sería conveniente que en tus imágenes se vean las filas y...

Visita: Cursos de Excel y Macros Por Dante Amor ------ -- Prueba así: Sub CerrarTodo() Dim Libro As Workbook For Each Libro In Workbooks If Libro.Name <> ThisWorkbook.Name Then Libro.Close SaveChanges:=True End If Next Libro ThisWorkbook.Close True...

Visita: Cursos de Excel y Macros Por Dante Amor ----- -- Te paso la solución en excel con una macro. Pon tus datos en las columnas A a la D, los resultados quedarán en las columnas F a la J. Es importante que tus datos estén tal y como lo mostraste...