Luis Mondelo

Te mando la solución con este ejemplo ¡ATENCION! Es una fórmula matricial para poder aceptarla tienes que pulsar CONTROL + SHIFT + ENTER =SUMA(SI(IZQUIERDA(D4:D12;2)="59";1)) recuerda finalizar la consulta

Mándame el archivo excel con los datos para poder ayudarte mejor [email protected]

Ok, te mando la solución pero antes unas preguntas: ¿La información empieza desde A1 hacia abajo siendo la primera fila los encabezados? ¿En qué hoja de los archivos está la información? ¿En la primera hoja? ¿Está esa hoja la primera de todas?

Te paso mi solución: Esta macro sería para el botón de convertir a positivo Private Sub CommandButton1_Click() If TextBox1.Value < 0 Then TextBox1.Value = TextBox1.Value * -1 End If If TextBox2.Value < 0 Then TextBox2.Value = TextBox2.Value * -1 End...

La sentencia correcta para buscar de forma exacta ese dato sería así en este ejemplo: Set busca = sheets("hoja1").range("a1:a1000").find("deneb",lookin:=xlvalues,lookat:=xlwhole) En este ejemplo estamos buscando en la hoja1 y en el rango A1:A1000 el...

Ok, te preparo una solución y te la mando.

Mándame el archivo con los datos y un ejemplo pequeño para poder ayudarte mejor [email protected]

Prueba con esta macro: Sub ejemplo() 'por luismondelo Range("d65000").End(xlUp).Offset(1, 0).Value = "end" Range("d1").Select Do While ActiveCell.Value <> "end" If ActiveCell.Row = 1 Then GoTo salto If ActiveCell.Value = 1 And ActiveCell.Offset(-1,...

Mándame el archivo con los datos para poder ayudarte mejor [email protected]

Te propongo arreglarlo con una pequeña macro que hará el trabajo por ti. -Tenemos tus doce hojas ordenadas cronológicamente. -Ejecuta esta macro y todo solucionado. Sub ejemplo() 'por luismondelo For x = 2 To Sheets.Count Sheets(x).Select...