[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2005/03/19(Sat) 19:11
投稿者名:わか
Eメール:
URL :
タイトル:
Excelの指定セルの内容取得(書式共々)
はじめまして、いつもお世話になっています。
いろいろ手を尽くしたのですが行き詰まってしまったので質問させてください。
過去ログの検索漏れだとしたらすみません。

Excelの指定のセルの内容を読み出してリッチテキストボックスに表示し、
編集して保存しようとしています。このときセルにはどんな文字が入っているか
わからず、文字列の一部分が色が変わっていたり書式が違ったりしてもそのまま
リッチテキストボックスに表示したいんです。

こんなこと可能でしょうか・・・宜しくお願い致します。

投稿時間:2005/03/19(Sat) 21:56
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: Excelの指定セルの内容取得(書式共々)
本当は、少しも見ていなかったりして。
ここのExcel&Word関係の[VBとエクセル間でデータのやりとり]を見て下さい。


>文字列の一部分が色が変わっていたり書式が違ったりしてもそのまま
>リッチテキストボックスに表示したいんです。

>  Excelの指定セルの内容取得(書式共々)

タイトルと質問内容が違うような?
簡単な方法ならExcelファイルの必要部分をWordに書式付でコピーして
Wordの方でリッチテキスト形式で保存するのが一番簡単かも勿論一連の操作は
VBから行うのですが。

どちらにしても、ここのExcel&Word関係をじっくりご覧下さい。

投稿時間:2005/03/20(Sun) 01:32
投稿者名:わか
Eメール:
URL :
タイトル:
Re^2: Excelの指定セルの内容取得(書式共々)
> >  Excelの指定セルの内容取得(書式共々)
> タイトルと質問内容が違うような?

説明が下手ですみません。たとえばExcelファイルのA1のセルに
「あいうえお」という文字列があり、その内「いうえ」だけが
赤文字で太字だった場合、リッチテキストボックスにもその通りに
「いうえ」だけが赤文字で太字の「あいうえお」という文字列を
出力させたかったんです。つまりセルの書式じゃなくセル内の
文字一文字ごとの書式というんでしょうか・・・

今ここのExcel&Word関係を参考にさせていただいて、
上の例の「いうえ」だけが赤文字で太字の「あいうえお」の文字列を
下記のようにクリップボードにコピーして貼り付けたところ、
なぜか「いうえ」だけが太字で、色はすべて黒字の「あいうえお」が
貼り付けられました。リッチテキストは何か制限があるのでしょうか・・

    xlSheet.Range("A1").Copy
    RichTextBox1.TextRTF = Clipboard.GetText(vbCFRTF)

投稿時間:2005/03/20(Sun) 07:46
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^3: Excelの指定セルの内容取得(書式共々)
> なぜか「いうえ」だけが太字で、色はすべて黒字の「あいうえお」が
> 貼り付けられました。リッチテキストは何か制限があるのでしょうか・・

だから、Wordに書式付でコピーして下さいと書いたのです。

手作業で実際に試して見て下さい。
Excel上で指定のセルをコピーする→ワードパット上で貼付けを実行して見る
同じくExcel上で指定のセルをコピーする→Word上で貼付けを実行して見る→貼り付けた
Wordの文字をコピーする→ワードパット上で貼付けを実行して見る

これでどうすればリッチテキスト上に[うえお]の部分が赤色で貼り付けられるかが
解ったでしょうか?

投稿時間:2005/03/20(Sun) 11:13
投稿者名:わか
Eメール:
URL :
タイトル:
Re^4: Excelの指定セルの内容取得(書式共々)
なるほど、確かに一度ワードに貼り付けないと全文字の書式(色)まで
もって行ってくれないようです。この方法で実現することができました。
ありがとうございました。

投稿時間:2005/03/20(Sun) 14:36
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
個別に書式を取得する方法
クリップボードを利用しないで個別に書式情報を読み取って移す方法
又、一旦、Excel上でコピーしてクリップボード経由でリッチテキストに貼り付け
カラー情報だけ後で設定する等に使えます。

サンプルは、Excel&Word関係の
Excelの指定のセルの文字列を個別に書式事取得しリッチテキストボックスに表示
をご覧下さい。

 hhttp://www.bcap.co.jp/hanafusa/VBHLP/Excel13.htm

投稿時間:2005/03/21(Mon) 00:11
投稿者名:わか
Eメール:
URL :
タイトル:
Re: 個別に書式を取得する方法
何度もありがとうございました。やりたいことが完全にできました。
本当に助かりました、ありがとうございました!