Excel VBA質問箱 IV

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

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


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

14097 / 76807

←次へ　｜　前へ→


	【68210】Re:InputBoxメソッドのD.Box位置について

ichinose - 11/2/15(火) 6:11 -


	引用なし

	パスワード

おはようございます。

UO3さん、grokさん、ご協力ありがとうございます。

>環境はXP+Excel2003です。
>今回提供いただいたtest1も、この環境で実行しますと
>A1は1000となりました。
なるほど・・・。

>いやーこういうのを目にしてしまうと、ますますSendKeysを使う気が
なくなってきますね。（＾＾）
そうですねえ！！

この結果だけだと、WinXPの動作に関係がある　ということなのでしょうかねえ・・・。

一緒に記述すれば、よかったのですが、もう一つご協力お願いできますか？
Sendkeysには、ここまでに記述したSendkeysステートメントと

Application.Sendkeysメソッド
WshのSendkeysメソッド

が私が知っているものですが・・・・、

Sub test2()
　　With Range("a1")
　　　 .Value = ""
　　　 .Select
　　　 Application.SendKeys "abc{ENTER}"
　　　 .Value = 123
　　End With
End Sub
Sub test3()
　　With Range("a1")
　　　 .Value = ""
　　　 .Select
　　　 With CreateObject("WScript.Shell")
　　　　　AppActivate Application.Caption
　　　　　.SendKeys "abc{ENTER}"
　　　 End With
　　　 .Value = 123
　　End With
End Sub

上記の二つでも結果は、同じですか？

Win2000&Excel2002では、どれも同じ結果で最後は、abcが表示されました。

4 hits

▼

【68181】InputBoxメソッドのD.Box位置について あまがえる 11/2/10(木) 10:33