relleno con condicion

Hola:
Tenés que escribir en 1 celda el primer número (ej: 1).
Ahora seleccioná esa celda, y vas a menú Edición (o buscá dentro del último grupo: Modificar si estás en Excel 2007), Rellenar, Series.
En esa ventana, optá por Columna, Lineal, Incremento (1) y en límite ingresá 5 o 26 o lo que fuere. Aceptá y lo tendrás en tu hoja.

Saludos
Elsa
http://galeon.com/aplicaexcel

Bueno, para esto necesitarás una rutina.
Entrá al Editor (con Alt y F11), seleccioná con doble clic la HOJA donde ingresarás los valores (de la lista de objetos en panel a tu izquierda) y allí copiá esto:
Private Sub Worksheet_Change(ByVal Target As Range)
'indicar el rango donde se ingresarán los valores
mirgo = "A2:E2"
If Not Intersect(Target, Range(mirgo)) Is Nothing Then
'si lo ingresado es número se rellena hacia abajo
If IsNumeric(Target) Then
lim = Target.Value
Target.Offset(1, 0) = 1
Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
Step:=1, Stop:=lim, Trend:=False
End If
End If
End Sub

Ajustá el rango donde ingresarás los números,  que yo dejé como A2:E2

Probalo y si esto resuelve tu consulta, no olvides finalizarla.

Saludos
Elsa

http://galeon.com/aplicaexcel