いつもお世話になっております。VB6.0SP6 WindowsXp sp2での質問です。
こちらのMsFlexGridのソースのサンプルを元に改造したフォームがあります。
(サンプル大変参考になりました。ありがとうございます。)
改造したフォームのうちMsFlexGridに関連する部分を再利用可能に
して他の画面でも使いたいと思いクラス化をしようとしましたが、
うまくいきません。

--SpreadSheet.cls-------------
Option Explicit
Dim obj_msflexgrid As msflexgrid
Public Property Let grid(pro_Grid As msflexgrid)

End Property
Public Property Get grid() As msflexgrid
Set grid = obj_msflexgrid.Clone

End Property
----------------------------------


--Form1-------------
Option Explicit

Private Sub Form_Load()
Dim flexgrid As Object

Set flexgrid = Controls.Add("Spreadsheet.grid", "msgrid")


End Sub
----------------------------------

とやってみましたがだめでした。(クラスの文字列が不正ですとでます)

別に再利用できればクラス化でなくてもいいのですが、モジュールにFunction
として書くと行き来する変数が非常に多くなってしまい(腕のせいもありますが)
Form内に残るコードもかなりあり、かえって再利用性、可読性がさがり、コピペ
以下になってしまいました。
なにかいい方法はないでしょうか。

ひょっとして下記と同じでしょうか？
hhttp://tinyurl.com/bpvvj

> ひょっとして下記と同じでしょうか？
> hhttp://tinyurl.com/bpvvj

お返事ありがとうございます。ご指摘の書き込みはこちらは投稿前に拝見して試してみました。
このとおりですと、すっぴんのMsFlexGridはちゃんとロードできるのは確認しました。
私が投稿したときに書いたのはそれをもとにしたつもりです。

折角御返事いただいたのに大変恐縮ですが、私がやりたい事はすっぴんのMsFlexGirdではなく
カラムやらなんやらをあらかじめ追加したものを別の場所でとっておき、再利用したいのです。
動的にロードするのが主目的ではありません。不可能ということも含めまして、できましたら
再び御返事を賜りたいと存じます。よろしくお願いします。

ええっと、自分のやりたいことがOCX化らしいことが判明しました。
たとえば、こちらにアップロードされているMsFlexGridのサンプル
ですが、あのままの機能でひとつのOCXとしてなればいいのではないかと。
もう少し調べてみます。

> ええっと、自分のやりたいことがOCX化らしいことが判明しました。
> たとえば、こちらにアップロードされているMsFlexGridのサンプル
> ですが、あのままの機能でひとつのOCXとしてなればいいのではないかと。
> もう少し調べてみます。

と調べていたところ、クラス化の方向でいい資料が見つけられました。
やった！＼(^_^)／
お手数おかけしました。ありがとうございました。