Заполнение текстового поля vba

Question

Я новичок в программировании с помощью VBA, и мне нужна помощь в заполнении текстового поля определенным c значением.

У меня на листе несколько столбцов: Services (A), Head of Service (B ) и сотрудника (Имя + Фамилия C). У каждого сотрудника есть свой рабочий лист с различной информацией, служба находится в столбце A, ячейка 60 в профиле рабочего листа.

У меня есть пользовательская форма, которая показывает мне профиль сотрудника, где у меня есть служба, руководитель службы, а также имя и фамилия сотрудника. Я добавил кнопку в пользовательскую форму, чтобы иметь возможность при необходимости менять руководителя службы.

Проблема в том, что когда я это делаю, изменяется только глава службы для текущего профиля, который я посещаю. Я хочу внести изменения для всех сотрудников, работающих в одной службе.

Я использую следующий код:

'''
Private Sub Valider_Click()

If Me.Combox_Nv_Resp = "" Then

    MsgBox ("choisissez un nouveau Responsable")

Else

    Set ws = ActiveWorkbook.Worksheets(Personne)
    fin_col_Resp_Serv = ws.Cells(60, 256).End(xlToLeft).Column
    fin_liste = ws_Liste_Pers.Range("A65536").End(xlUp).Row
    ws.Cells(60, fin_col_Resp_Serv) = Me.Combox_Nv_Resp.Value
    UF_Profil_Edit1.TextBox_Resp_Service = Combox_Nv_Resp.Value

    Unload Me

End If

End Sub

'''