はじめまして
ユーザコントロール(ocx)の作成についてどなたかご教授願います。
ユーザコントロールに貼り付けたテキストボックスをユーザコントロールの
サイズが変更されたときにテキストボックスのサイズを変更したいです。
ユーザコントロールの Resize イベントに下記のようにコードを記述してみましたが
うまくいきませんでした。
実行すると「実行時エラー13、型が一致しません。」とエラーが出力されます。

Private Sub UserControl_Resize()
    Dim UC As UserControl
    Set UC = Me
      
    Text1.Height = UC.ScaleHeight
    Text1.Width = UC.ScaleWidth
End Sub

こんにちは、じゃんぬ です。

> 実行すると「実行時エラー13、型が一致しません。」とエラーが出力されます。

肝心な「どこで」が書いてありません。

>     Set UC = Me

ここで起きますか?
であれば、エラーの通りです。
そしてこれらを確認できるのは、貴方だけです。

お騒がせてすみません。 m(_ _)m
自己解決しました。