Ordenar SOLAMENTE la columna A

[mrocf]

Hola! para todos. Con un poco de suerte y viento a favor, lo siguiente podría funcionar bien:

Código PHP:

  With Sheets("Prod_Entrada") 
  If .[a2] <> "" Then 
    With .Range(.[a2], .[a1].End(xlDown)) 
      .Cells(1) = 1: .DataSeries Type:=xlLinear, Step:=1 
    End With 
  End If 
End With  
   

Saludos, Cacho R.