次の方法で共有

マクロでファイル挿入した際の挙動が挿入するファイルによってバラバラまちまちになるのをどうにかする方法

Anonymous
2018-06-25T05:40:02+00:00

https://msdn.microsoft.com/ja-jp/vba/excel-vba/articles/oleobjects-add-method-excel

上記のサンプルコードを参考に下記のコードで実験しています

環境はExcel2013で新規ファイルで行っています

Worksheets(1).OLEObjects.Add FileName:="xxx.csv", _

 Link:=False, DisplayAsIcon:=True, IconLabel:=”Hello”, Left:=40, Top:=40, _

 Width:=150, Height:=10

・上記のパラメーターで試した場合

 csv,xlsm:ファイル名が表示されないアイコンが挿入される

 xlsx,pdf:ファイル名が下に表示されたアイコンが挿入される

・DisplayAsIcon:=Falseの場合

 csv,xlsm:ファイルの中身が表示されたアイコンが挿入される

 pdf:私の環境ではファイル名が下に表示されたアイコンが挿入される

    他の環境ではPDFの最初のページが表示されたアイコンが挿入される

 xlsx:ファイル名が下に表示されたアイコンが挿入される

このような挙動です。

IconLabelの値も全く反映されません。

すべてのファイルで「ファイル名が下に表示されたアイコンが挿入される」状態にしたいのですが、

方法はありませんか?

開発者テクノロジ | Visual Basic for Applications

ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント コメントはありません

2 件の回答

並べ替え方法: 最も役に立つ
  1. Anonymous
    2018-06-26T04:40:28+00:00

    Excel自体の問題かなと思ってこちらを選んだのですが、VBA フォーラムに移動したいと思います。

    誘導ありがとうございました。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません
  2. Anonymous
    2018-06-26T01:52:15+00:00

    ​ba_601 さん、こんにちは。

    マイクロソフト コミュニティのご利用、ありがとうございます。

    マクロでファイルを挿入した際、ファイル名が下に表示されたアイコンが挿入される状態にしたいのですね。

    せっかくこちらに投稿していただいたのですが、基本的な使い方やトラブルの対処法について情報交換を行っているマイクロソフト コミュニティでは情報が集まりにくいかもしれません。。

    今回の内容は Msdn フォーラム内の VBA フォーラムに投稿されるとアドバイスや情報が集まりやすいと思います。

    Msdn フォーラム - Visual Basic for Application (VBA)

    よろしければ、ご利用くださいね。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません