monamuchoのプロフィール

ユーザーフォームがあり、コマンドボタンが準備されています そのコマンドボタンをクリックした場合、処理1～処理3を実行するようにしています Sub CommandButton1_Click() CommandButton1処理1 CommandButton1処理2 CommandButton1処理3 End Sub Private Sub CommandButton1処理1() ・・・ End Sub Private Sub CommandButton1処理2() ・・・ End Sub Private Sub CommandButton1処理3() ・・・ End Sub 処理1→処理2→処理3という流れが進むかと思います 処理1の中にＩｆ～End ifがあり、Ifに合致する場合はメッセージボックスが表示するようになっています 処理3の中に、「ユーザーフォームを閉じる」記載がされています 処理1のIfに合致する場合、メッセージボックスを表示させユーザーフォームを閉じることなく終了したいです つまりIfに合致した場合、その後の処理2、処理3をさせず処理1で終了させればいいのかと思ったのですが、そのようなことはできるのでしょうか？ 処理1でIfに合致する場合、Exit Subとすると処理1は終了するかもしれませんが、その後処理2、処理3に進んでしまうので困っています よろしくお願いします

お世話になります。 Ａ列に番号、Ｂ列に名字、Ｃ列に名前が入力されています（500近いデータがあり、データ量は増減あり） 例 Ａ列　　　　Ｂ列　　　Ｃ列 　1　　　　　阿藤　　　海 2　　　　　加藤　　　 山 3 木村　　　一　 4　　　　　齋藤　　　十三 5　　　　　佐藤　　　まさる ・ ・ ・ 最終行　　渡辺　　　慎吾 ユーザーフォームを使い、名字と名前（2つのテキストボックスに別々に）を入力すると、リストからその人が何番なのか（Ａ列の番号）を教えてくれるようにしたいと思っています。　 そういったことは可能でしょうか？ よろしくお願いいたします。

ExcelVBAのユーザーフォームについて教えて下さい。 マルチページで作成し、アイコンをクリックしてファイルを開くと、マルチページのみが表示される仕様にしました。 <ThisWorkbook> Private Sub Workbook_Open() Application.Visible = False UserForm.MultiPage1.Value = 0 UserForm.Show End Sub そして、マルチページ内にボタンを配置して、そのボタンをクリックすると、マルチページが終了するとともに、マルチページが埋め込まれているExcelファイルを(他のExcelファイルが動作中はそれらは何もしないでそのまま)閉じたいのです。 <UserForm> Private Sub CommandButton_Click () Dim msg As String, title As String msg = "プログラムを終了します。よろしいですか？" title = "終了確認" Dim res As Integer res = MsgBox(msg, vbYesNo + vbInformation, title) If res = vbYes Then Unload Me End Sub と書いてみました。 マルチページの画面はExcelの作業画面なしに開きます。ボタンをクリックするとマルチページが終了します。 ですが、「マルチページが閉じてExcelの作業画面も表示されず、一見終了したように見えるが、タスクマネージャーのプロセスではEXCEL.EXEが動作している」ことがあったり(他にExcelファイルを開いていないときも同様です)、「マルチページ終了後にExcelの何もない作業画面が表示」されます。そのファイルを閉じてもよいのですが、せっかくマルチページで、単独のアプリのようにしているので、マルチページを閉じて、Excelを閉じて…という、二度手間的なことはしたくないと思っています。 マルチページに配置したボタンをクリックしただけで、マルチページを終了させ、マルチページが埋め込まれているExcelのみも正常に終了させることはできますでしょうか？ ご教授頂きたくお願い致します。 ちなみに「×」ボタンでの終了はNGとしています。

添付画像をご覧ください。 「品番」フィールドと「品番の大文字化」フィールドとを比較し、その結果を「判定」に返すクエリを作成しました。小文字を含んだ品番があった場合、判定で1で返すようにしているのですが、「判定」の抽出条件に1を入力して、クエリを実行すると、パラメータの入力が求められてしまいます。 結果としては、判定：1のみを抽出したかったのですが、それがうまくできません。 どうしたらよいでしょうか。。 「品番」フィールド →品番 「品番の大文字化」フィールド →品番大文字化: StrConv([品番],1) 「判定」フィールド →判定: StrComp([品番],[品番大文字化],0)

今、わたしは、ホームページ（htmlファイル）をアップする際に、ホームページビルダー11に付属しているftpツールを活用しています。　どういうソフトかは、http://www.wind.ne.jp/wind/member/suport/builder.htm　をご覧くださいませ。ftpの雰囲気が分かると思います。　しかし、このftpツールですが、使い勝手がとても悪く、また、転送中に切断される事も多く、とても困っています。 一応、自分でもhttp://www.forest.impress.co.jp/library/software/ffftp/　のftpツールを使ってみたのですが、こちらも使用画面が見づらく、ソフトの使い勝手がわたし的にはいまいちでした。 そこでなのですが、お勧めのftpツール（できればフリーソフト）を教えていただけませんでしょうか。 ●個人的には、ftpツールを起動すると、左側がローカル、右側がサーバーというような画面構成が好みです。 ●ホームページを15個くらい管理していますので、ドメインごとの管理がしやすいものが希望です。 以上になります。 お手数おかけしますが、どなた様かアドバイスいただけますと、本当に嬉しいです。