ＶＢＡで共有設定を変更したい。



パソコントラブル解決・過去ログTOP  >  ログTOP

◇-ＶＢＡで共有設定を変更したい。-龍一郎(3/4-16:42)No.949
　┗Re:ＶＢＡで共有設定を変更したい。-龍一郎(3/5-12:25)No.954
949ＶＢＡで共有設定を変更したい。龍一郎 3/4-16:42

OS名：Windows98
パソコン名：NEC PC9821Xa20
ソフト名：NT4.0 EXCEL97

こんにちは。

何をしたいかと言うと、現在OSがNTなのですが、ログインすると自動的にA，Bドライブが共有になってしまうので
それを自動的に”共有しない”にしたいのです。
でそれをEXCELのVBAを使って自動的に行おうと頑張っています。
下に示すマクロで
エクスプローラー、ドライブ選択、ファイル、プロパティー、でプロパティー変更のダイアログボックスまではいけるのですが、
その先が実際のキー入力はCTRL＋TABなのですが、これがSENDKEYで入力できません。HELPには”＾（｛TAB｝）”
のように書いてあるのですが・・・
判る人いませんでしょうか。よろしく御願いします。
PCはNEC　PC−9821Xa20です。


Sub SENDKEYTEST()
Dim ReturnValue
ReturnValue = Shell("A:\WINNT\explorer.exe", 1)
AppActivate ReturnValue
SendKeys "{TAB}", True
SendKeys "%", True
SendKeys "%", True
SendKeys "F", True
SendKeys "R", True 'ここまでは動く
SendKeys "^({TAB})", True　’←ここが動かない。
End Sub


954Re:ＶＢＡで共有設定を変更したい。龍一郎 3/5-12:25
記事番号949へのコメント
龍一郎さんは No.949「VBAで共有設定を変更したい。」で書きました。
>OS名：Windows98
>パソコン名：NEC PC9821Xa20
>ソフト名：NT4.0 EXCEL97
>
>こんにちは。
>
>何をしたいかと言うと、現在OSがNTなのですが、ログインすると自動的にA，Bドライブが共有になってしまうので
>それを自動的に”共有しない”にしたいのです。
>でそれをEXCELのVBAを使って自動的に行おうと頑張っています。
>下に示すマクロで
>エクスプローラー、ドライブ選択、ファイル、プロパティー、でプロパティー変更のダイアログボックスまではいけるのですが、
>その先が実際のキー入力はCTRL＋TABなのですが、これがSENDKEYで入力できません。HELPには”＾（｛TAB｝）”
>のように書いてあるのですが・・・
>判る人いませんでしょうか。よろしく御願いします。
>PCはNEC　PC−9821Xa20です。
>
>
>Sub SENDKEYTEST()
>Dim ReturnValue
>ReturnValue = Shell("A:\WINNT\explorer.exe", 1)
>AppActivate ReturnValue
>SendKeys "{TAB}", True
>SendKeys "%", True
>SendKeys "%", True
>SendKeys "F", True
>SendKeys "R", True 'ここまでは動く
>SendKeys "^({TAB})", True　’←ここが動かない。
>End Sub
>

解決してしまいました。失礼いたしました。
>

パソコントラブル解決・過去ログTOP  >  ログTOP  >  ＶＢＡで共有設定を変更したい。

A1.本ページは参考になりましたか？　又はアドバイスがありますか？
解決　参考になった　参考にならなかった　アドバイスする

A2.何度目の訪問ですか？
初めて来た　　　数度目(２〜４)　５回以上来ている　　 管理人:

A3.何か一言どうぞ(アドレスは書くことができません)

A4.アドレスがあればどうぞ(１つまで)


↑↑↑↑よろしければ押してください↑↑↑↑

何か一言(本ページで参考になったならないを含めて残してあります)
◎：解決　○：参考になった　×：参考にならなかった　！：アドバイスあり

参考回数投稿日時何か一言
(社)日本お助け隊
人間関係のトラブルの相談にのります。
電話相談無料。
和魂カウンセラー認定講座
和魂カウンセラー認定をしています。
全国イベントスケジュール
イベントが登録でき申込みできます。無料。