Private Sub setMnuHeader()
        Me.mnuInsertSignature1.Text = getHeader(1)
        Me.mnuInsertSignature2.Text = getHeader(2)
        Me.mnuInsertSignature3.Text = getHeader(3)
        Me.mnuInsertSignature4.Text = getHeader(4)
        Me.mnuInsertSignature5.Text = getHeader(5)
        Me.mnuInsertSignature6.Text = getHeader(6)
        Me.mnuInsertSignature7.Text = getHeader(7)
        Me.mnuInsertSignature8.Text = getHeader(8)
        Application.DoEvents()
    End Sub