[ad_1]
やあみなさん。
System.Drawing を使用して、イメージをプロジェクトにインポートしました。
画像をインポートして、その 10 行目のすべての黒いピクセルを見つける必要があります。
しかし、画像の読み込み時にエラーが発生します。
つまり4行目。
何か助けてください。
PS: 両方にチェックを入れました System.drawing.dll と 診断コンテンツ プロファイル ライブラリ 参照で。
私が試したこと:
以下は私のコードです:
VB
Private sampleImage As Bitmap Public Sub ImageLoading() Dim sampleFileName As String sampleFileName = ThisWorkbook.Path & "\Sample.bmp" sampleImage = New Bitmap(Image.FromFile(sampleFileName)) Dim c1 For x1 = 1 To 1080 c1 = sampleImage.GetPixel(x1, 10) If c1 = 0 Then debug.print ("Pixel " & x1 & " is Black.") Next x1 end sub
解決策 1
システムへのアクセスがなければ、おそらくそれほど多くのことを助けることはできませんが、問題を引き起こしているのはマクロの場所であると推測されます.
マクロがワークブック自体ではなく (たとえば) personal.xls にある場合、 ThisWorkbook.Path
画像を含むアクティブなワークブック フォルダーではなく、personal.xls が含まれているフォルダーを返します。
デバッガーを使用して、実際のフォルダー パスを調べることから始めます。 sampleFileName
画像を読み込もうとする直前に、それを画像への「実際の」フォルダーパスと比較します。
[ad_2]
コメント