Ciao a tutti,
stavo cercando di scrivere una macro in vba che faccia questa operazione:
in una colonna di un foglio excel nel quale sono presenti alcune celle vuote (anche più di una consecutiva) vorrei fare in modo che in una data selezione di celle nella colonna, venga incollata nella prima cella vuota la cella precedente fino alla fine della selezione.
Mi spiego meglio: data una colonna così fatta:
a1
a2
a3
vuoto
vuoto
a6
vuoto
vuoto
a7
la macro devrebbe rendere la selezione in questo modo:
a1
a2
a3
a3
a3
a6
a6
a6
a7
Ecco il mio tentativo non funzionante:
Sub Copia_Cella_prec_Incolla_seg()
Dim Rowcount As Integer
Dim N As Integer
Set Area = Selection
Rowcount = Selection.Rows.Count
For N = 1 To Rowcount Step 1
If Cells(N, 1).Value = "" Then
Cells(N - 1, 1).Select
Selection.Copy
Cells(N, 1).Select
Selection.PasteSpecial Paste:=xlPasteValues
Else: N = N + 1
End If
Next N
End Sub
Grazie mille per l'aiuto