noexpert

Dante Amor respondió: En estas instrucciones que pusiste Range("A2").Select If Cells(3, 1).Value = "" Then Cells(2, 1) = 1 Else Range("A2", Selection.End(xlDown)).Select Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _ Step:=1, Trend:=False...

Dante Amor respondió: ¿Qué dato vas a poner en el inputbox? Vas a poner un número, ¿por ejemplo 2 y tienes una hoja que se llama 2?