PowerPoint のスライド毎に画像を貼り付けていくマクロ 2007-01-27-1 数百枚ある写真を 1 枚 1 枚 PowerPoint に貼り付けていくという気の遠くなる作業を頼まれたので作成. Option Explicit Public Sub addPhotoParPage() Dim i As Integer Dim strPath As String Dim objFileSystem As Object Dim objFolder As Object Dim objFile As Object strPath = BrowseForFolder() If strPath = "" Then Exit Sub End If Set objFileSystem = CreateObject("Scripting.FileSystemObject") Set objFold
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く