{quote}{login=GIG_ant}{date=28.09.2011 05:06}{thema=}{post}макрос, см.файл{/post}{/quote}  
Спасибо ОГРОМНОЕ за помощь!!! Все работает

Всем добрый день.  
Прошу помощи в таком вопросе:  
Есть таблица с диапазонами чисел вида:  
№с              №по            кол-во  
0585691601 0585691606 6  
0576343917 0576343923 7  
0578796953 0578796959 7  
В результате нужно получить список этих номеров вида:  
0585691601  
0585691602  
0585691603  
0585691604  
0585691605  
0585691606  
0576343917  
0576343918  
0576343919  
0576343920  
0576343921  
0576343922  
0576343923  
0578796953  
0578796954  
0578796955  
0578796956  
0578796957  
0578796958  
0578796959  
Файл очень большой, мучаюсь, руками заполняю.  
Подскажите, если можно на пальцах, как можно автоматизировать процесс?  
Заранее благодарен (образец файла прикрепил)

{quote}{login=Казанский}{date=09.11.2010 06:04}{thema=}{post}Или так  
 
Sub tt()  
Dim a As Range  
For Each a In Range([A2], [A1].End(xlDown))
   With Range("I" & Rows.Count).End(xlUp).Offset(1)  
       .Value = Val(a)  
       .DataSeries xlColumns, xlDataSeriesLinear, xlDay, 1, .Value + a(, 3) - 1  
   End With  
Next  
End Sub{/post}{/quote}  
Спасибо большое.  
А формулы нет подходящей?

Вложил табличку, которую надо преобразовать

Добрый день.    
Прошу помощи со следующим вопросом:  
Есть таблица со списком бланков формата  
№с - №по - количество  
0001-00032 - 32  
0125-0126 - 2  
4555-4655 - 101 итд.  
Можно ли сделать из него список номеров, идущих по порядку в 1 столбце вида  
0001  
0002  
0003  
...  
0125  
0126 итд  
Заранее благодарю