大変便利なの見つけたのですが、ユーザーフォームごとにコードをごちゃごちゃ書くのも面倒ですし、標準モジュール用のコードもユーザーフォーム名を指定したりと汎用性にあと一押し欲しかったので微妙に書き換えさせていただきました。

コードユーザーフォーム

UserForm_Initializeイベントに1行加えるだけ

Private Sub UserForm_Initialize()
'～ほかの初期化処理～
  Call ResizableFormShow(Me)
End Sub

コード標準モジュール

Option Explicit

Sub ResizableFormShow(TargetUF As UserForm)
  Dim rfc As ResizableFormClass
  Set rfc = New ResizableFormClass
  Set rfc.Form = TargetUF
  
  '設定を変更した場合はRedrawする
  With rfc
      .Maximize = True  'Default = True
      .Minimize = True  'Default = True
      .Resize = True    'Default = True
      .Redraw           '再描画
  End With
  
End Sub

コードクラスモジュール

ここは元のものから変えてないので転載はやめておきます