こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

マクロ組んだエクセルをCDに焼き違うパソコンでCDを開きマクロボタンを押すとエラーがでます.

マクロ組んだエクセルをCDに焼き、別のパソコンでCDをあけようとするとマクロが起動しなくなります。

エクセルのマクロを押すとデスクトップのフォルダ〔指導要綱〕の中のフォルダ〔大阪府〕の中のフォルダ〔能勢町〕へいきフォルダ〔能勢町〕の中にPDFがたくさん入ってるんですがその一覧が出るというマクロ

Sub ボタン49_Click()
'
' ボタン49_Click Macro
' マクロ記録日 : 2010/2/18 ユーザー名 : masako-m
'
Shell "explorer.exe ""C:\Documents and Settings\masako\デスクトップ\指導要綱\091104\大阪府\能勢町""", 3
'

End Sub

自分のパソコンでマクロボタンを押すときちんと能勢町一覧でるのですが、違うパソコンでみようとすると添付画像画面がでます。
どないかして起動させたいのですが。。。

投稿日時 - 2010-02-19 11:18:50

QNo.5688976

すぐに回答ほしいです

質問者が選んだベストアンサー

おや、まぁ、myRangeです。

回答は出てますが、、、、

その別のパソコンで、
"能勢町"のフォルダーを開くと、
アドレスバーに、パスが表示されますよね。
それをコピペしてやれば確実です。

以上です。
 

投稿日時 - 2010-02-19 13:09:08

ANo.3

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(4)

ANo.4

パソコンが変わってもデスクトップまでのパスは
SpecialFolders プロパティで取得できるので

'デスクトップパスを取得
myDesktop = CreateObject("WScript.Shell").SpecialFolders("Desktop")
'デスクトップパス+以降のパス
myPath = myDesktop & "\指導要綱\091104\大阪府\能勢町"
Shell "explorer.exe " & myPath, 3

とすれば良いのでは

投稿日時 - 2010-02-19 15:16:21

ANo.2

>「デスクトップ\指導要綱\091104\大阪府\能勢町」
#1さんが言っているのは、
「C:\Documents and Settings\masako\デスクトップ\指導要綱\091104\大阪府\能勢町」の「\masako\」の部分を
たとえば国母さんのパソコンなら「\kokubo\」に変えろと言うことです。
この場合、国母さんのパソコンのデスクトップに「\指導要綱\091104\大阪府\能勢町'」のファイルが無ければ、当然開きません。


または
1)ファイルをCドライブの下におくとPCが変わっても名前を指定しなくて良くなります。
たとえば「C:\指導要綱\091104\大阪府\能勢町""",」
2)ファイルもCDに入れ、CDから読む様にしてすれば、
どのPCでも使えます。

投稿日時 - 2010-02-19 12:57:21

ANo.1

>C:\Documents and Settings\masako\デスクトップ
この部分(特に\masako)を導入したパソコンの名称に
変えればちゃんと出ると思います。

投稿日時 - 2010-02-19 11:29:12

補足

ご回答ありがとうございます!!やってみましたが無理でした。
マクロを変えるということですよね?

Sub ボタン49_Click()
'
' ボタン49_Click Macro
' マクロ記録日 : 2010/2/18 ユーザー名 : masako-m
'
Shell "explorer.exe ""C:\Documents and Settings\masako\デスクトップ\指導要綱\091104\大阪府\能勢町""", 3
これで自分のパソコンと違うパソコンでもやってみましたが両方
パス'C:\Documents and Settings\masako\デスクトップ\指導要綱\091104\大阪府\能勢町'は存在しないか、ディレクトリではありません。’とエラーの表示が出ます。




End Sub

投稿日時 - 2010-02-19 11:58:33

あなたにオススメの質問