従属セルデータを使用したExcel UserFormからの電子メールの送信

Question

従業員は、毎年2回の認証が必要です。従業員名の認証日と今後の認証日は、マスタースプレッドシートに保存されます。このスプレッドシートから、ユーザーフォームを開いて認証日のOutlook予定を送信できます。ユーザーフォームでは、証明書を送信する従業員を選択します。私の質問はこれです：予定の日付はあなたが選んだ従業員によって異なりますか？どのコードを使用すれば、列Bの正しい従業員名をマトリックスで検索し、対応する行の列Hの日付を使用しますか？私はプロセスでここまで現在午前：

Dim Otlk 'As Outlook.Application 
Dim Appt 'As Outlook.AppointmentItem 
Const olAppointmentItem = 1 
Const olMeeting = 1 
    Set Otlk = CreateObject("Outlook.Application") 
    Set Appt = Otlk.CreateItem(olAppointmentItem) 

'30 Day Invite 
With Appt 
    .Subject = Me.Employee1ComboBox.Value & " " & "Cft Certification" 
    .Start = 

Answer 1

ような何か：（あなたが修正する必要があります。レイアウトに関するいくつかの推測を作る）日付を取得するために

'30 Day Invite 
With Appt 
    .Subject = Me.Employee1ComboBox.Value & " " & "Cft Certification" 
    .Start = GetDate(Me.Employee1ComboBox.Value) 

機能

Function GetDate(eName) 
    Dim f As Range, rwNum 
    Set f = ThisWorkbook.Sheets("hidden").Range("namehere").find(_ 
         What:=eName, lookat:=xlWhole) 
    If Not f is Nothing then 
     GetDate = thisworkbook.sheets("master").cells(f.Row,"H").value 
    Else 
     'should never happen 
    End if 
End Function