Excel VBA質問箱 IV

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

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


10241 / 13646 ツリー ←次へ | 前へ→

【22959】ユーザーフォーム表示後 VBA 05/3/8(火) 22:23 質問[未読]
【22962】Re:ユーザーフォーム表示後 kobasan 05/3/8(火) 23:38 回答[未読]
【22964】Re:ユーザーフォーム表示後 VBA 05/3/9(水) 6:16 お礼[未読]
【22966】Re:ユーザーフォーム表示後 おさる 05/3/9(水) 7:44 発言[未読]

【22959】ユーザーフォーム表示後
質問  VBA  - 05/3/8(火) 22:23 -

引用なし
パスワード
   ユーザーフォーム表示後、セルに直接入力したりマウスでセルを選択したりし
たいのですが、どうすればいいのかわかりません。いろいろやってみたのです
が、どうしてもわからないので
ご教授願います。
ユーザーフォームにボタンを配置しそのボタンを押すとセルに
入力できるようにしました。こんな感じです。
Sub ボタン1_Click()
ActiveCell.Value = 0.5
ActiveCell.Offset(0, 1).Select
End Sub
そのアクティブセルをマウスで指定して入力したいのです。

【22962】Re:ユーザーフォーム表示後
回答  kobasan  - 05/3/8(火) 23:38 -

引用なし
パスワード
   ▼VBA さん:今晩は
>ユーザーフォーム表示後、セルに直接入力したりマウスでセルを選択したりし
>たいのですが、どうすればいいのかわかりません。いろいろやってみたのです
>が、どうしてもわからないので
>ご教授願います。
>ユーザーフォームにボタンを配置しそのボタンを押すとセルに
>入力できるようにしました。こんな感じです。
>Sub ボタン1_Click()
>ActiveCell.Value = 0.5
>ActiveCell.Offset(0, 1).Select
>End Sub
>そのアクティブセルをマウスで指定して入力したいのです。

ユーザーフォームを表示するとき、vbModelessを下記のように
指定するとできます。

  UserForm1.Show vbModeless

試してみて下さい。

【22964】Re:ユーザーフォーム表示後
お礼  VBA  - 05/3/9(水) 6:16 -

引用なし
パスワード
   UserForm1.Show vbModelessで無事解決しました。
ありがとうございました。

【22966】Re:ユーザーフォーム表示後
発言  おさる  - 05/3/9(水) 7:44 -

引用なし
パスワード
   マルチだったのね・・・。

10241 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free