| |
▼かみちゃん さん：
>こんにちは。かみちゃん です。
>
>>また、ワークシートモジュールでいうところのBeforeDouleClickイベントを、標準モジュールでやるのはどうしたらいいですか。
>
>以下のマクロをどのように起動したいのですか？
>ダブルクリックで起動したいのですか？
>
>Sub MacroStart()
> MsgBox "マクロ処理を開始します" & vbCrLf & _
> "現在のアクティブセルは " & ActiveCell.Address & vbCrLf & _
> "現在の選択範囲は " & Selection.Address
>End Sub
質問に対してきかくにこたえてるか、すみません。
したいことはこうです。
overviewというシートがある。
a列 b列 e列 g列
3行目 Category_a program_a manual_a Teacher_a
4行目 Category_b program_b manual_b Teacher_b
5行目 Category_c program_c manual_c Teacher_c
6行目 Category_d program_d manual_d Teacher_d
いまたとえばb3をダブルクリックするとCategory_a がCnmに、program_aがPnmに、manual_aがMnmに Teacher_aがTnmを経て、ws1すなわちhistoryに転記されるようにしたい、
ひきつづきユーザーフォームが表出され（そこには市販本からコピーしたカレンダーがあります）、使用者が選んだ日付がws1すなわちhistoryに転記されるようにしたい。
たとえばb4をダブルクリックするとCategory_b がCnmに、program_bがPnmに、manual_bがMnmに Teacher_bがTnmを経て、ws1すなわちhistoryに転記される、、、という具合です。
なお前のスレッドで一番最初質問した下記は、途中から聞くのをやめています。すみません。
Dateをyyyy/mm/ddで入力したい ←ユーザーフォームに市販本のカレンダーをつかったことで解決しそう
Time（From)をhh:mm（15分単位）でプルダウンで選びたい ←ユーザーフォームにプルダウンをつかうことで解決しそう
Time（To)をhh:mm（15分単位）でプルダウンで選びたい ←ユーザーフォームにプルダウンをつかうことで解決しそう
Placeを任意の文字列で入力したい ←ユーザーフォームのテキストボックスをつかうことで解決しそう
Notesを任意の文字列で入力したい ←ユーザーフォームのテキストボックスをつかうことで解決しそう
Hoursは、たとえばTime（From)が09:15で、Time（To）が10:00なら、0.75としたい ←ハチさんのアドバイスで解決しそう
そしてsaveするとき、作業当日の日付けをシートhistoryのセルk３に書き込みたい ←ハチさんのアドバイスで解決しそう
わかりづらくてすみません。
|
|
にしもり
- 08/3/2(日) 14:57 -
