Respuesta
en
Microsoft Excel
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
Microsoft Excel
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 =...
Respuesta
en
Microsoft Excel
a
Fórmula para que funcione la función y con ese ejemplo
Respuesta
en
Microsoft Excel
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.
Respuesta
en
Microsoft Excel
a
Cómo puedo inactivar rangos de celdas?
Respuesta
en
Microsoft Excel
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
Microsoft Excel
a
¿Cómo Imprimir Agrupando en excel?
Respuesta
en
Microsoft Excel
a
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...
Respuesta
en
Microsoft Excel
a
No me aparecen 2 columnas en el listbox
Respuesta
en
Microsoft Excel
a