Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1381 / 9994

←次へ　｜　前へ→


	【11911】Re:Excelファイルのオートシェイプ上のテキストの値を取得したい

さつき - 11/1/15(土) 13:03 -


	引用なし

	パスワード

雅さん、ご回答ありがとうございます。

>こっちはShapeではなくコレクションを列挙しようとしているのでShapesかと
>思われます。
Shapesに直しましたら、無事動作しました。ありがとうございました。

>試してないんで確証はないですがたぶんOpenのほうは
>「FileName:=FileName」の「FileName:=」が悪さをしていると思います。
ネットで「FileName:=」を使わない下記のような例題があったので貼り付けて実行してみましたが、やはり同じエラーがでました。ファイル形式の変換が悪さしているようです。

Dim WSH　As Object
Dim sDesktop As String
Set WSH = CreateObject("WScript.Shell")
' // Desktop のパスを取得する
sDesktop = WSH.SpecialFolders("Desktop")
　MsgBox sDesktop
' // Desktop 上の Book1.xls を開く
WSH.Run Chr(34) & sDesktop & "\Book1.xls" & Chr(34)
Set WSH = Nothing

552 hits

▼

【11904】Excelファイルのオートシェイプ上のテキストの値を取得したい さつき 11/1/10(月) 17:35