ExcelVBAの初歩的な質問です



◇-?Excel VBAの初歩的な質問です-うるるん娘(2005/08/23-22:48)No.285951
 ┣?!Re:Excel VBAの初歩的な質問です...-mmsanta(2005/08/24-06:42)No.286032
 ┗?!Re:Excel VBAの初歩的な質問です...-半端者(2005/08/25-11:49)No.286328

▲このページのトップに戻る
285951Excel VBAの初歩的な質問ですうるるん娘 2005/08/23-22:48

メーカー名:富士通
OS名:WindowsXp HomeEdition
パソコン名:MG50J
ソフト関連:ソフトの使い方がわからない
--
ExcelのVBAでユーザーフォームを使っているのですが、
“次へ”のコマンドボタンで下の様にsheet1への書込みと
UserForm0の終了とUserForm1の開始(開く)事がしたいのですが、
Userform1の開始のプログラムを教えて下さい。
お願いしますぅ!

---------------------------------------------------------

Private Sub NextBtn0_Click()
Worksheets("sheet1").Range("d7") = todayM.Text
Worksheets("sheet1").Range("f7") = todayD.Text
Unload UserForm0
End

End Sub

---------------------------------------------------------

すんごく初歩的な質問なのですが、エクセルのファイルを開いた際
にユーザーフォームを自動的に表示させるにはどうしたら良いので
しょうか?

親切な方へ!宜しくお願いします。m(_ _)m

▲このページのトップに戻る
286032Re:Excel VBAの初歩的な質問ですmmsanta 2005/08/24-06:42

記事番号285951へのコメント
うるるん娘さんは No.285951「Excel VBAの初歩的な質問です」で書きました。
>UserForm0の終了とUserForm1の開始(開く)事がしたいのですが、
>Userform1の開始のプログラムを教えて下さい。
>Private Sub NextBtn0_Click()
> Worksheets("sheet1").Range("d7") = todayM.Text
> Worksheets("sheet1").Range("f7") = todayD.Text
userform1.show ←これ
> Unload UserForm0
> End
>
>End Sub

>すんごく初歩的な質問なのですが、エクセルのファイルを開いた際
>にユーザーフォームを自動的に表示させるにはどうしたら良いので
>しょうか?
標準モジュールに

Sub auto_open()

'Worksheets(1).Select
'Cells(1, 1).Activate
UserForm0.Show

End sub

でどうかな?



▲このページのトップに戻る
286328Re:Excel VBAの初歩的な質問です半端者 2005/08/25-11:49

記事番号285951へのコメント
うるるん娘さんは No.285951「Excel VBAの初歩的な質問です」で書きました。

 この質問日と同日の22:20にも同様の(細かく言えば内容が違っていますが)質問
がついていますが、同じスレ内で質問、回答を続けていくようにしないと、混乱を
生じさせますよ。
 やり方が分からなかったのかなとは思いますが、気をつけて下さい。
 特に、マクロコーディングの問題で回答を求めたいなら、一連の記述の流れが非常
に大事になってきます。また、質疑応答の中から、質問者のレベルが分かってきます
ので、そのレベルに応じた回答も付け易くなるし、回答者側から質問者に確認したい
こともどなたかが一度引き出せれば、他の方は、それを見て理解することができます。



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

A2.何度目の訪問ですか?
初めて来た   数度目(2〜4) 5回以上来ている   管理人:

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

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


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

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

参考回数投稿日時何か一言