Eduard Caballero

Prueba esto Sub Concentrar_Hojas() Application.ScreenUpdating = False Dim Sig As Long, Eliminar As Boolean If MsgBox("Deseas eliminar las hojas ""concentradas"" al final del proceso?", _ vbQuestion + vbYesNo + vbDefaultButton2, "Favor de...

Pero ya probaste esto, por ejemplo para la primera =SI(A2>0;A2*0,33;"") Lo estoy haciendo en excel 2010 y deja la celda en blanco Pruébalo y me comentas

OK Esto lo haces con la función, buscarv (consultaV en Excel 2010) Seria así, suponiendo que la clave la escribes en la A2 y el rango de datos es A2:C100 en la celda contigua a la clave colocas esto =CONSULTAV(A2;Hoja1!$A$2:$C$100;2;0) aqui devuelve...

Si entendí debes hacer esto For i = 1 To 10 Range("E" & i).Select Next i Esto te seleccionara para cada i la celda 1,2,3,4 Ahora si es simultaneo entonces For i = 1 To 10 Range("E" & i).Select Instrucciones Range("E" & i+1).Select Instrucciones Next...

Cuando una celda está bloqueada o protegida, la misma macro debe desprotegerla, ejecutar sus instrucciones y volverla a proteger. Por ejemplo ActiveSheet. Unprotect "clave" Instrucciones... ActiveSheet. Protect "clave" En tu caso podría ser Private...

De nada, finaliza esto

En un botón active por puedes colocar lo siguiente. Suponiendo que tienes tres procedimientos (uno, dos y tres) coloca entonces Private Sub CommandButton1_Click() Call uno Call dos Call tres End Sub

Coloca lo siguiente en el editor de Visual Basic (Alt+F11) y pegas esto Private Sub Workbook_Open() valor = Range("g2") Range("g2") = valor + 1 End Sub Guardas y prueba

Si entendí seria así en I1 =SI(Buscarv(C2;$C$2:$H$11;6;0)="S";C2*$F$15;0) y arrastras la formula

Yo te recomiendo que coloques un botón para ordenar y coloques este código Sub Ordenando() 'ordena la hoja Orden por la col A en forma ascendente teniendo la primera fila como encabezado Sheets("Hoja1").Range("A1").Select Selection.Sort...