Dante Amor

Dante Amor

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

Respuestas en Microsoft Excel

Respuesta en y en 1 temas más a

Ejecutar macro si alguna celda en el rango cambia

[Hola Abraham Valencia, la situación en tu ejemplo, es que cualquier fórmula actualizada en la hoja, sin importar el rango, siempre va a entrar al If, ya que miRango siempre está dentro del Range("C2:C20") Set miRango = Range("C2:C20") If Not...
Respuesta en y en 1 temas más a

Como se puede pasar todos los datos del listbox1 a la hoja

Prueba el siguiente código: Private Sub CommandButton1_Click() Dim sh As Worksheet Dim lr As Long Set sh = Sheets("Hoja1") lr = sh.Range("A" & Rows.Count).End(3).Row + 1 With ListBox1 sh.Range("A" & lr).Resize(.ListCount - 1, .ColumnCount).Value =...

Fórmula para que funcione la función y con ese ejemplo

Pon la siguiente fórmula en la celda C4 y la copias hacia abajo. =SI(O(B4={"Cadete";"Secretaria"});$E$2;$F$2) En la celda E2 debes poner 3,000 y en la celda F2 1,500, así como lo tienes en tu ejemplo. Cambia en la fórmula el punto y coma ( ; ) por...
Respuesta en y en 3 temas más a

Excel cambia los números largos vba

Antes de ejecutar la macro cambia el formato de las celdas a texto. Puede ser en la misma macro, después de esta línea: A. Cells. Clear Pon esta línea: A.Cells.NumberFormat = "@" --- Prueba y comentas.

Cómo puedo inactivar rangos de celdas?

Para eso debes proteger la hoja. Realiza lo siguiente: 1. Selecciona todas las celdas. 2. Cambia el formato de celdas - Selecciona la pestaña Proteger, desmarca las casillas Bloqueada y Oculta - Presiona aceptar 3. Selecciona las celdas que quieres...
Respuesta en y en 1 temas más a

Realizar resumen sin celdas vacías

Te paso la macro actualizada: Sub Resumen_ejercicios() ' ' Resumen_ejercicios Macro ' Range("O2:O49").SpecialCells(xlCellTypeConstants).Copy Range("P2").PasteSpecial Paste:=xlPasteValues Range("$P$2:$P$49").RemoveDuplicates Columns:=1, Header:=xlNo...
Respuesta en a

¿Cómo Imprimir Agrupando en excel?

Tengo varias macros similares. La siguiente agrupa por la columna F y crea una nueva hoja. Podrías adaptarla, en lugar de crear la hoja, que imprima. Split Data based on Value in Row | MrExcel Message Board Split data in sheets (sheets typically...

Error en sintaxis bucle WHILE.

La macro se ejecuta si en las celdas E3, E4, E5, etc tienen valor. Falta agregar la fila en la instrucción Range: Prueba lo siguiente: Sub PruebaLoop() Dim fila As Integer fila = 3 While Cells(fila, "E").Value <> "" Range("E" & fila).Value = True...

No me aparecen 2 columnas en el listbox

Me parece que te faltó el código para el botón "AGREGAR". También indica cómo se llama el listbox de la izquierda y cómo se llama el de la derecha.

Como pasar texto a mayúsculas sin la fórmula mayusc

Puede ser con una macro: Sub Mayusculas() Dim c As Range Dim lr As Long lr = Range("B:F").Find("*", , xlValues, xlPart, , xlPrevious).Row For Each c In Range("B1", Range("F" & lr)) c.Value = UCase(c.Value) Next End Sub Comentas si es lo que necesitas.