Dante Amor

Si te refieres a una multilínea en el listbox no es posible. Podrías agregar el comentario pero concatenando el comentario al nombre, algo como Listbox1. List(listobox1.listcount - 1, 1) = listbox2. List(listbox2. Listindex, 0) & textbox1 Nota:...

Nota: Una cosa que debes tener en cuenta cuando haces una pregunta en un foro ... las personas a las que solicitas ayuda no saben absolutamente nada acerca de tus datos, absolutamente nada sobre cómo están en el libro de trabajo, absolutamente nada...

Ya existen varias respuestas sobre el tema: Consulta por filtros entre fechas Excel: Macro para filtrar entre dos fechas obtenidas de dos celdas Filtrar entre dos fechas con variables Excel VBAExcel: Macro para filtrar entre dos fechas obtenidas de...

Prueba lo siguiente: Sub test() Sheets("Hoja1").range("H:H").Copy Sheets("Hoja2").range("A1") End Sub

Esto es un simple ejemplo Sub test() Dim pt As PivotTable Set pt = ActiveSheet.PivotTables("tablaD1") pt.RepeatAllLabels xlRepeatLabels End Sub Pero solamente está disponible en excel 2010 en adelante. Si tu libro es versión anterior o está guardado...

H o l a Rodolphe Pottier y bienvenido a TodoExpertos, Prueba lo siguiente, cambia "B3" por la celda donde tengas el monto Sub MuestraIva() MsgBox Range("B3").Value * 0.21 End Sub

H o l a CRISTIAN CAMILO CASTAÑEDA BURGOS, bienvenido TodoExpertos. Puedes describir brevemente cómo identificas cuáles son nuevos y cuáles son antiguos. Si es posible Explica con un ejemplo real o con imágenes.

H o l a Sandra, bienvenida a TodoExpertos! Revisa si lo siguientes es algo como lo que necesitas: Como buscar resultados con múltiples palabras parciales, ¿de una tabla de datos en Excel?

En excel: =(B2-A2)*24

Prueba lo siguiente: Sub CopiarValores() Dim a As Variant, b As Variant, lr As Long, i As Long, j As Long, k As Long lr = ActiveSheet.Range("A:E").Find("*", , xlValues, , xlByRows, xlPrevious).Row a = Range("A1:E" & lr).Value2 ReDim b(1 To UBound(a,...