Macro que me rellene las filas vacías
Estimado Dante:
Tengo la macro que gustosamente me ayudaste para igualar las cantidades a uno.
Quisiera ver, si con un código de macro, luego que iguala las cantidades, se pueden rellenar las filas vacías con macro.
Actualmente lo vengo haciendo con F5\especial\celdas en blanco\luego =CTRL+Enter.
Quisiera saber si esa operación la puede hacer una macro, que reconozca las filas vacías y las llene. Teniendo en cuenta que las columnas cantidades ya estas llenas, según
la macro que iguala a uno.
1 respuesta
Respuesta de Dante Amor
1
Te anexo la macro actualizada
Sub IgualarCantidades()
'Por.Dante Amor
Application.ScreenUpdating = False
For i = Range("F" & Rows.Count).End(xlUp).Row To 2 Step -1
If Cells(i, "F") > 1 Then
n = Cells(i, "F")
Rows(i).Copy
Rows(i + 1 & ":" & i + n - 1).Insert Shift:=xlDown
Range("F" & i & ":F" & i + n - 1) = 1
End If
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "Terminado", vbInformation
End SubSaludos.Dante Amor
