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

Excel, Macros. Actualizar datos copiados

Te anexo la macro actualizada Sub programarMacro() tiempo = Now + TimeValue("00:00:05") Application.OnTime tiempo, "miMacro", , True End Sub ' Private Sub miMacro() k = Range("C" & Cells.Rows.Count).End(xlUp).Row If k = 15 Then Range("C3").Delete...
Respuesta en y en 2 temas más a

Celda igual a otra celda de ultima hoja activa

No conozco alguna función que te permita saber cuál es el nombre de la última hoja de tu libro. Lo que puedes hacer es ejecutar una macro. Por ejemplo, con la siguiente macro te pone en la celda A10 el dato de B13 de la última hoja. Sub Poner_Dato()...
Respuesta en y en 2 temas más a

Macro para copiar datos de una hoja a otra y que ordene los nuevos datos

Te anexo la macro Sub Copiar_De_Compras_A_BD() ' Por Dante Amor ' Set h1 = Sheets("COMPRAS") 'Origen Set h2 = Sheets("BD") 'Destino h2.Rows("9:9").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove h2.Range("B9").Value = h1.Range("D6")...
Respuesta en y en 3 temas más a

Llenar listbox en excel sin duplicados

Te anexo el código: With Me.ListBox1 .ColumnCount = 1 .ColumnWidths = "60pt" Set h = Sheets("Base") For i = 2 To h.Range("AO" & Rows.Count).End(xlUp).Row If WorksheetFunction.CountIf(h.Range("AO" & i & ":AO2"), h.Cells(i, "AO")) = 1 Then .AddItem...
Respuesta en y en 2 temas más a

Con respecto a ocultar a algunas columnas en especifico

Si solamente quieres revisar la fila 8 y si la celda está vacía, por ejemplo, si la celda B8 está vacía, entonces que oculte la columna B. Ejecuta la siguiente macro Sub OcultaColumnas() 'Por.Dante Amor Application.ScreenUpdating = False...
Respuesta en y en 2 temas más a

¿Cómo definir un rango para utilizarlo en un combobox?

Tu duda sobre esta línea: 83: Me.ComboBox2.RowSource = "Clave!AC2:AC" & Rows.Count ----------> Esta instrucción es la que quiero Quedaría resuelta así: 83: Me.ComboBox2.RowSource = "Clave!AC2:AC" & Sheets("Clave").Range("AC" &...
Respuesta en y en 2 temas más a

Excel. Fórmula de SUBTOTALES obviando valores de error.

Supongo que estás utilizando la función Subtotales( ) para sumar o contar con filas filtradas. Te anexo un ejemplo para sumar los datos filtrados de la columna C. En la columna C se encuentran celdas con error. La fórmula matricial descarta las...
Respuesta en y en 1 temas más a

VBA, Tomar Datos De más de una celda y Enviarlos a un TextBox, enviar Datos de una Columna de Celdas y ponerlos en un ComboBox.

En la imagen no se ve en cuál fila empiezan los datos, voy a suponer que empiezan en la fila 3 Tampoco se ve en cuál columna está el ID, voy a suponer que es la columna A Pon el siguiente código en tu userform Private Sub CommandButton1_Click()...
Respuesta en y en 2 temas más a

Macro que permita elegir al usuario un rango diferente cada vez

Por supuesto que es relevante si existe un filtro, y que bueno que lo mencionaste, de esa forma te puedo dar un ejemplo. La macro te permite seleccionar un rango de celdas. Por default se posiciona en la celda D1 para iniciar la selección. Puedes...
Respuesta en y en 3 temas más a

Volcado de información de formularios en distintas hojas excel según una condición. [Macro] [Código]

Puedes poner las celdas de cada campo de tu "formulario" Y también me dices cuál celda va en cuál columna de la hoja destino. Por ejemplo: Hoja formulario celda B4 (campo zona) hoja destino columna A Hoja formulario celda B5 (campo Región) hoja...