Macro a todo libro .xls abierto
Oie diculpa la molestia, jejeje, lo que pasa es que me gustaria saber como aplicar una macro sencilla pero a todos los libros de excel que tenga abiertos en LA HOJA DE "TOTALES", que viene siendo la segunda hoja, esta es la rutina:
Sub incremento_de_metal_y_1_de_operatin()
If Range("L69").Value = "" Then
Cells(71, 7).Value = "=(SUMIF(Bom!F:F,""metal"",Bom!M:M))*(1+L69)"
Cells(69, 11).Value = "Metal increase:"
With Cells(69, 12)
.Value = 0.35
.NumberFormat = "0%"
End With
If Cells(43, 4).Value < 0.49 Then
Cells(43, 4).Value = Cells(43, 4).Value + 0.01
End If
Columns("K:K").EntireColumn.AutoFit
End If
Calculate
End Sub
Es practicamente reemplazar formulas y valores...
Bueno, de antemano gracias XD.
Sub incremento_de_metal_y_1_de_operatin()
If Range("L69").Value = "" Then
Cells(71, 7).Value = "=(SUMIF(Bom!F:F,""metal"",Bom!M:M))*(1+L69)"
Cells(69, 11).Value = "Metal increase:"
With Cells(69, 12)
.Value = 0.35
.NumberFormat = "0%"
End With
If Cells(43, 4).Value < 0.49 Then
Cells(43, 4).Value = Cells(43, 4).Value + 0.01
End If
Columns("K:K").EntireColumn.AutoFit
End If
Calculate
End Sub
Es practicamente reemplazar formulas y valores...
Bueno, de antemano gracias XD.
Respuesta de newmodel
1
¿Creo qué esta es la anterior que habéis enviado es correcto?
Ya te respondí amigo!
Ya te respondí amigo!
