VB EPPlus を使って、シェイプ(円)を描きたい への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 ロト君  (社会人) 投稿日時 2020/3/6 11:00:49
るきお さん。返信ありがとうございます。

書かれていらっしゃるコードを基にVB化出来ました。
ありがとうございます。

ライセンスについてもありがとうございます。
別途、調べて置きます。

ありがとうございます。
投稿者 るきお  (社会人) 投稿日時 2020/3/6 08:15:38
打ち間違えました。
訂正します。

EPPlusはGPUライセンス

EPPlusはGPLライセンス
投稿者 るきお  (社会人) 投稿日時 2020/3/6 08:13:31
これで〇を描けますよ。

Using fileStream = IO.File.Create("C:\temp\exceltest.xlsx")
    Using excelFile As New ExcelPackage(fileStream)
        Using sheet = excelFile.Workbook.Worksheets.Add("MySheet1")
            Using shape = sheet.Drawings.AddShape("円", eShapeStyle.Ellipse)

                shape.SetPosition(3, 0, 3, 0)
                shape.SetSize(400, 400)
                shape.Border.Fill.Color = Color.Blue
                shape.Border.Width = 20
                shape.Fill.Color = Color.Transparent

                excelFile.Save()
            End Using
        End Using
    End Using
End Using


吹き出しもやろうと思ったんですが、上のサンプル作るのに私は時間をかけすぎました。
C#についての情報がわかっているのならば、質問時に書き込んでもらうなど、もっと回答者が時間を使わないで回答できるようにしていただければその分、回答に費やする時間も増やせます。次回からよろしくお願いします。

パット見たところでは吹き出し機能はないようにも見えますが…。(ちゃんと見てはいません。)

それからEPPlusはGPUライセンスなので、配布するときはご注意ください。
(このライセンスのせいで業務では使用しにくいんです。)

投稿者 ロト君  (社会人) 投稿日時 2020/3/5 20:00:53
ASD さん 返信ありがとうございます。

http://www.carlosag.net/Tools/CodeTranslator/
や、
https://dobon.net/vb/dotnet/links/convertcs2vb.html
で、調べてみましたが、なかなか分かりません・・・。
投稿者 ASD  (社会人) 投稿日時 2020/3/5 18:43:29
https://dobon.net/vb/dotnet/links/convertcs2vb.html

上記サイトを参考にC#からVB.NETへ変換してください。
投稿者 ロト君  (社会人) 投稿日時 2020/3/5 16:54:28
環境:
VB2019
EPPlus
↑Excelに出力用

内容:
データ出力epplusを使ってExcelに出力します。
その際、任意の場所に〇を付けたいのですが、上手くシェイプが使えません。

ネットで調べましても、#Cについてしかないようですので、どなたか教えてもらえると有難いです。

〇以外にも吹き出しの出し方なども教えて頂きたいです。

宜しくお願い致します。