Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

31429 / 76807

←次へ　｜　前へ→


	【50629】Excelのセル内にピクチャを値として入力、表示させる方法

たなか - 07/8/6(月) 10:57 -


	引用なし

	パスワード

Excelのセル内に以下の様な漢字のコードで絵を貼り付けたいのですが、"System.Drawing.Bitmap"の文字列がでるだけです。
修正方法をご存知であれば、どのようにコードを修正すればよいかお教え下さい。
また、エクセルシートをソート等しても値が付いてくるように、エクセルシート内の値としてピクチャオブジェクトを表示したいと思っています。
初心者で基礎的な内容かもしれませんが、宜しく教えて下さい。

環境：Excel 2003

'===============================================================
　Dim xlApp As New Excel.Application
　　　　Dim xlBooks As Excel.Workbooks = xlApp.Workbooks
　　　　Dim xlBook As Excel.Workbook = xlBooks.Add
　　　　Dim xlSheets As Excel.Sheets = xlBook.Worksheets
　　　　Dim xlSheet As Excel.Worksheet = xlSheets.Item(1)
　　　　xlApp.Visible = True　
　　　　Dim xlRange As Excel.Range
　　　　Dim xlCells As Excel.Range
　　　　xlCells = xlSheet.Cells

　xlRange = xlCells(4, 2)
　xlRange.Value =　System.Drawing.Bitmap.FromFile("C:\temp\aaa.bmp")
'===================================================================

1 hits

▼

【50629】Excelのセル内にピクチャを値として入力、表示させる方法 たなか 07/8/6(月) 10:57

≪