Hola buenas noches, adjunto un archivo excel en el que quiero hacer una cosa. Sin liarme, tengo una hoja llamada "Summary", que contiene una tabla y una columna H dentro de la tabla, en la cual tengo configurada una fórmula con el método de cálculo general, según la información de su fila. Depende de otra persona (ingeniero) que ese método general de cálculo varíe en algún caso particular, y yo tenga que introducir el valor que esa persona me dé. La hoja irá protegida pero esta columna será editable. Necesito un código VBA tal que me recupere la fórmula en las celdas de la columna H que se queden vacías. ¿Por qué? Porque en algún momento pasa que me pueden decir de volver a calcular esa fila con el método habitual. En ese caso mi idea es que yo suprima esos valores "particulares" y me vuelva a realizar el cálculo de la manera general.
señales.xlsm
Por
MANTONIOPM, · publicado
Quiero insertar imágenes desde una carpeta con una macro en un hoja de Excel
este es el código cuando lo ejecuto me marca error 438, a que se debe ese error.
</IniciaCodigo>
Sub fotos()
Dim ImgArray(158) As Variant
Dim x As String
Dim fotos As Long
x = Dir("C:\CL_0121\*.jpg")
Do
fotos = fotos + 1
ImgArray(fotos) = x
x = Dir
Loop Until x = ""
ActiveCell.Value = x
For i = 1 To fotos
Selection.InlineShapes.AddPicture _
Filename:="C:\CL_0121\" & _
ImgArray(i), LinkToFile _
:=False, SaveWithDocument:=True
Next i
End Sub
</ FinCodigo>
Que es lo que esta mal