エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
エクセルに貼り付けた画像の拡大・縮小方法
昔投稿したコードですが、xl2010でも動きましたので再度アップします。 シートにサムネイル画像を生成し... 昔投稿したコードですが、xl2010でも動きましたので再度アップします。 シートにサムネイル画像を生成し、元画像へのハイパーリンクを張ります。画像をクリックするとブラウザで元画像を開きます。 シートの行幅、列幅を適当に広げてから実行しないと、重なってしまいます。寸法を決めるところは手抜きです。 自動記録に毛の生えた様なコードで、時間がかかります。画像1ファイルの処理に100msec(Celeron2.4GHz)、1枚あたりのファイルサイズは元画像の1/100程度でした。(1500×1000程度の画像) Sub test() Dim FSO As Object Dim fileList As Object Dim myfile As Object Dim i As Long, j As Long Set FSO = CreateObject("Scripting.FileSystemObje