ご回答頂きましてありがとうございます。
思うように動作させることが出来ました。
本当にありがとうございました。
テキスト型にも運用できるようにしていきたいと思い以下のようにコード
を変更してみました。
テキスト型の項目に試してみると、抽出出来たのですが、
この部分だけの変更でいいのか、よく理解できていません。😨
ItmList = ItmList & ",’" & .ItemData(Itm) & “’”
通報 ...
はい、それで大丈夫ですよ(^-^)。😊
😆
ほっと安心できました。
ありがとうございました。☺