1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.

Подскажите программу-нумератор

Тема в разделе "Софт", создана пользователем prisoner, 28.07.09.

  1. prisoner

    prisoner Активный участник

    967
    0
    Необходима программа для нумерации бланков. Чтобы нумеровала листы в определенном диапазоне (напр. от 00001 до 10000). Скажете Excel - но нет, мне необходимо, чтобы можно было на одном листе сразу в неск. местах ставить номера (заранее определенных координатами).
    Может кто сталкивался, поможет...
     
  2. WindMan

    WindMan Активный участник

    12.309
    154
    А все же чем Excel с макросом не подходит? Хоть в каждой клетке номера ставьте.
     
  3. prisoner

    prisoner Активный участник

    967
    0
    Научите!:shuffle:
     
  4. WindMan

    WindMan Активный участник

    12.309
    154
    blnk.jpg

    Вот макрос:
    -----------------------------------------
    Sub Set_Number()
    'С какого по какой нумеровать
    For i = 1 To 10000
    'Записываем в значение в ячейку
    Range("B1").Value = i
    'Печатаем i-й номер
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
    'Переходим к следующему номеру
    Next i
    End Sub
    -----------------------------------------
     
  5. prisoner

    prisoner Активный участник

    967
    0
    WindMan,
    спасибо!