投稿日 | : 2005/02/10(Thu) 07:21 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^3: ピクチャークリップの画像をエクセルに貼り付ける方法 |
> Clipboard.SetData PictureClip1.Clip後にエクセルシートを手動で開いて、セルを
> 選択してからマウスを右クリックして「貼り付け」を指定すると画像が貼りつかないのは
> 何故でしょうか?
別に問題なく貼り付けできますが、勿論ペイント等にも貼り付けできます。
Private Sub Command1_Click()
PictureClip1.ClipX = 0
PictureClip1.ClipY = 0
PictureClip1.ClipHeight = PictureClip1.CellHeight
PictureClip1.ClipWidth = PictureClip1.CellWidth
Clipboard.Clear
Clipboard.SetData PictureClip1.Clip
End Sub