MSFLEXGRIDで選択範囲の削除

肥田式  2005-08-14 23:38:20  No: 124141  IP: [192.*.*.*]

MSflexgridにおいてマウスで複数範囲をドラッグします。
そして（イベントは他のものでもいいのですが）例えばキーダウンイベントに
            Case vbKeyDelete
            MSFlexGrid1.Clip = ""
上のように記述しても一番左上のセルしか消去できません。
msgbox MSFlexGrid1.Clip 
ちなみに上記のように記述すると選択範囲全体が取得できるのですが、、

選択範囲全体を削除するにはどうしたらよいでしょうか。
宜しくお願いします。

編集 削除
魔界の仮面弁士  2005-08-15 09:01:13  No: 124142  IP: [192.*.*.*]

> MSFlexGrid1.Clip = ""
> 上のように記述しても一番左上のセルしか消去できません。

ヘルプにもありますように、Clipプロパティは、Tab/Cr区切りで
設定するものですから、たとえば、3列2行の範囲をクリアしたいなら、
    .Clip = vbTab & vbTab & vbCr & vbTab & vbTab
のように書かなければなりません


> 選択範囲全体を削除するにはどうしたらよいでしょうか。
「.Text = ""」を使いましょう。
もちろん、FillStyleの設定も忘れずに。

編集 削除
肥田式  2005-08-15 14:07:59  No: 124143  IP: [192.*.*.*]

魔界の仮面弁士さん有難う御座います。
何とかアドバイスを参考にして出来そうです。
やってみます。

編集 削除