Чёрт побери, и как я сразу не допёр?

Public Sub Vyb_Rab(UF_Name As UserForm)

И всё в порядке!
Огромное спасибо, alex77755

В смысле как объект?
Что-нибудь типа:
Public Sub Vyb_Rab(UF_Name As Object)

И снова здравствуйте!
Возник вопрос, как передать в подпрограмму имя UserForm. Суть такая: имеется ListBox, для его заполнения используется некая подпрограммка, но, так как он входит в состав нескольких UserForm, то имеется необходимость передать имя этой самой UserForm в подпрограмму, для подстановки, собственно, вместо имени.
UF_Name и есть передаваемая переменная, LB_Rab - соответственно ListBox, который необходимо заполнить и A_SRab - массив из которого и берётся список.

Код: (vb)

With UF_Name
    .LB_Rab.ColumnCount = 2
    .LB_Rab.ColumnWidths = "72;"
    .LB_Rab.List() = A_SRab
End With

Может быть кто-нибудь сталкивался с подобной проблемой?

Тогда вопрос некорректен. Вы хотите изменять адреса столбцов изменяя адреса строк, грубо говоря. Могу порекомендовать написать на один раз простенький цикл в VBA, чтобы изменялись буквы в формуле.

Тогда попробуй делать это по кнопке "ПЕЧАТЬ", перед печатью вставить строки с подписями, а после их удалить.

Попробуйте удалить абсолютную ссылку ($).

Как вариант можно попробовать отсчитывать строки и вставлять строку с подписями в нужном месте.

Огромное спасибо всем. Я действительно неверно использовал команды.

Кнопку впихни, где тебе удобно и в её свойствах найди "PrintObject" и присвой значение "False".

Кто-нибудь сталкивался с проблемой выхода из Excel по завершении работы макроса? В Office ХР это происходило по команде Workbooks.Close. А в 7-ке закрывается книга, а Excel остаётся открытым и его приходится закрывать вручную. Может кто подскажет, как обойти эту проблемку.
Не принципиально, но оч-чень интересно.

А как должен запускаться макрос? В книге я его не обнаружил. И формула слишком мелкая, трудно что-либо рассмотреть. По сути программка вроде правильная. Непонятно, только зачем переменной "р" два раза присваивается значение Можно использовать просто "p = Cells(i, j)". Из мелких ошибок - не объявлены переменные "i" и "j", но это сути не меняет.
Попробуйте вставить кнопку и привязать к ней программу:

Код: (vb)

Private Sub CommandButton1_Click()

' Sub calc()
  
' Dim p As Single, s As Single, ss As Single  

' Зачем такие большие переменные? Может лучше так:

Dim p As Integer, s As Integer, ss As Integer, i As Integer, j As Integer

s = 0  
ss = 0  
  
 For i = 3 To 71  
      
    For j = 4 To 10  
    p = 1  
    p = p * Cells(i, j)  
    Next j  
      
    s = s + (p * Cells(i, 3) * Cells(i, 4))  
    ss = ss + (Cells(i, 3) * Cells(i, 4))  
 Next i  
  
Cells(72, 4) = s / ss * 100  
  
End Sub

[Уважаемый EMInvertor.]

Уважаемый EMInvertor.
Как вариант, сделать генерацию пароля, в зависимости от имени машины, но при поставке программы конечному пользователю убрать структурирование, комментарии, максимально запутать генератор паролей (кучу никуда не ведущих ссылок, циклы для галочки, проверки невыполнимых условий с кучей действий по if и т.д.). Нет, если кто захочет, то он продерётся через все дебри и поймёт принцип генерации, но... Но все запоры и замки - это для честных людей, а так как в нашей стране порядка 75%-80% пиратского ПО (Я - ЗА, обеими руками), да и Вы, скажите честно, наверняка пользуетесь пиратским OFFICE, то надеяться на большую выгоду не стоит.
Честные заплатят за пароль, а остальные... Утешьтесь тем, что Вы создали нечто нужное людям и они Вам будут признательны, или нет, в зависимости от удобства и качества написанной Вами программы.

А что, неплохая идея! Сейчас попробовал, вроде всё ясно и понятно, рядом можно краткую инструкцию разместить и сделать так, чтобы после отработки вызванного макроса возврат был на тот же лист. КЛАСС! Сейчас этим и займусь. Огромное спасибо! А ещё скрою-ка я все листы кроме этого, чтобы ручки шаловливые ничего не натворили, а то защита защитой, а бережёного - бог бережёт...

Как вариант возможно, но из практики заметил, что инструкция будет забыта через 10-15 минут работы. Тем не менее - СПАСИБО!

Кто-нибудь сталкивался с вопросом создания комментариев к листам в Excel? В книге более 10 листов (возможно будет и больше), чтобы пользователь не путался нужно или писать оч-чень длинные имена или каким-то образом выводить комментарий при наведении курсора на ярлычок листа. Вариант с выводом MSGBOX или USERFORM при открытии листа не очень подходит, так как для этого нужно открыть лист, а пользователь ещё не знает этот лист ему нужен или другой.