Andy Machin

Usa la fórmula SUMIF, suma si. Me vas a disculpar pero uso el Excel en ingles, no estoy seguro cual sera la traducción de la fórmula al español, supongo que sea =SUMASI o algo así, tu prueba. =SUMIF(Ene! B6:B200,"<>Compras", Ene!E6:E200) Andy M.

La propiedad .List no admite mas de 10 columnas, para eso vas a tener que usar un Array de dos dimensiones y se te va a complicar un poco. Luego cargas la propiedad .List con el array, todo de una. Pero si el rango que vas a cargar es dinámico...

Vale, este es el código, según entiendo: Sub CrearArray() On Error GoTo ErrHandler Dim vFileList() As Variant Dim iCount As Integer Dim iList As Integer Dim RecordName As String With Filtrado.ListBox1 For iList = 0 To .ListCount - 1 If...

Es más sencillo hacerlo así: =TEXTO(D5, "0\:00") Funciona para ambos, 3 y 4 dígitos. Andy M.

¿Un InputBox no te sirve? Así: Dim numero As String Numero = InputBox("Escriba un numero", "Numero", "0") Los inputbox devuelven un string, luego puedes convertirlo a integer si quieres, o declararlo integer desde el comienzo y validarlo en el...

Y sí, FileSystemObject probablemente sea tu mejor opción. A ver, puedes usar esta función: Sub DoFolder(Folder) Dim SubFolder For Each SubFolder In Folder.SubFolders DoFolder SubFolder Next Dim File For Each File In Folder.Files 'cambia el...

Te hice los códigos lo mas básico posible según lo que entiendo en tu pregunta. Asumo que tienes 3 TextBox, y 2 Botones. (Uno para pasar los datos a la celda y otro para imprimir y guardar) En el botón de pasar los datos a la celda, usarías este...

No, esa no es la sintaxis correcta. Te voy a dar la idea (que también te sirve a la hora de crearlos) En genera, para renombrar una forma, lo harías así: Sub RenombrarShape() ActiveSheet.Shapes(1).Select Selection.Name = "NombrePersonalizado" End Sub...

Ya te habíamos dicho que eso no se puede hacer. Puedes sortearlo con la siguiente Macro, pero probablemente llegara un momento en que ya no te sirva o requieras procesos mas avanzados, este es muy simple, y ya verás como lo ejecutas. Sub...

Disculpa, no tuve eso en cuenta a la hora de escribir las macros. Lo he actualizado, puedes descargar la version actualizada aquí: Libro demo version 2 Lo que hice fue declarar la hoja como una variable global, de esa forma si en el futuro cambias el...