はじめて投稿させていただきます。

リッチテキストボックスにセルの内容を読み込んで参照したいのですが、そのときに
書式設定も反映させたいのです。

セルの内容を取得するときに、Valueプロパティで取得するとセルの書式が取得できません。
Charactersプロパティを使って1文字づつ書式設定を取得して反映させてみたのですが、
速度があまりにも遅く、使い物になりません。
一度に書式ごと取得する方法など、方法がありましたら御教授お願いします。

開発環境はVB6SP5+W2KSP4、Excelのバージョンは10(XP)です
よろしくお願いします。

書式でも色々ありますが、（ふりがな等）表示している文字に関する書式なら
下記で簡単に取得できますが、すべてではありません。（個別の文字色等は取得できない）
Private Sub Command1_Click()
    If Clipboard.GetFormat(vbCFRTF) Then
       RichTextBox1 = Clipboard.GetText(vbCFRTF)
    End If
End Sub

教えて頂いた方法を試してみたところ。以下で完璧に仕様を満たすことができました
    objXlSheet.Cells(1, 1).Copy
    RichTextBox.SelRTF = Clipboard.GetText(vbCFRTF)

文字色も取得できましたです。

本当にありがとうございました。

> 文字色も取得できましたです。

１文字づつカラーを変更した場合とかは取得できない場合があります。
熟語単位くらいで変更した場合は取得できますが。

本当ですね、かなりへこみました；；
もうちょっとがんばってみます。
ありがとうございました。