失業小父さんのアフィリエイト実践奮闘記

プロフィール

taboo323

フォローする

カテゴリ

７０代のAI事情をご紹介

(0)

日記/記事の投稿

wordpressに挑戦することに決めました。

2024.06

2023.02.18

chatGPT にてマクロを生成して2390個の写真をダウンロードに成功しました

テーマ：わたしのシルバーウィーク(546)

カテゴリ：エクセルとパソコン

ここにマクロを書きます
”　Sub InsertPictures()

Dim imgURL As String

Dim pic As Shape

For i = 2 To 100

imgURL = Cells(i, 4).Value

If imgURL <> "" Then

Set pic = ActiveSheet.Shapes.AddPicture(imgURL, False, True, Cells(i, 5).Left + Cells(i, 5).Width, Cells(i, 5).Top, -1, -1)

' 画像のリサイズ

pic.LockAspectRatio = msoTrue

pic.Height = Cells(i, 5).Height

pic.Width = Cells(i, 5).Width

' セルの横幅を調整

Cells(i, 5).Offset(0, 1).ColumnWidth = pic.Width / 7

End If

Next i

私はExcelには多少詳しくてもマクロの知識はほとんどありません
でも　マクロは実行されて写真は無事にExcelに格納されました

こんな写真が2390個　全部が　機能性食品です
これを　エクポンで　HTMLサイトに出来たら　もちろん　検索機能もつけないと
検索機能もChatGPTで作って貰わないと　ですね

本当に凄い時代になったものです。
ほとんどマクロの知識がない　私でも　マクロを操れる　私自身が一番吃驚してます。

吃驚　ビックリ　びっくり　です。
マクロに注釈が入っているので　勉強にも　なります。　
本当に　ChatGPT さま様　です。　　　　　　

お気に入りの記事を「いいね！」で応援しよう