Results of 1 - 1 of about 1240 for カレンダー (0.001 sec.)
- [[20051217014804]]
- #score: 6122
- @digest: 6b12335684996ca83e83da0de4fa6d85
- @id: 18825
- @mdate: 2005-12-17T15:41:40Z
- @size: 1382
- @type: text/plain
- #keywords: calendar1 (6661), 修整 (4334), オネ (2730), カレ (2257), userform1 (2190), dblclick (2140), イオ (2095), ーコ (1781), レン (1686), セレ (1272), ンダ (1238), selectionchange (1187), ダー (1147), トロ (974), hide (957), target (813), アレ (786), を呼 (593), レク (504), い申 (458), ロー (452), コン (451), show (440), 構文 (415), 完璧 (405), private (401), column (348), ンジ (338), し上 (328), ール (319), 御座 (310), ルク (308)
- 『カレンダーコントロールの簡単に移動』（レイオネ）
[A1のセルに、カレンダーコントロールを呼び出して日付を入力したい。 終わればカレンダーを非表示にして、 次にA2をセレクトして再びカレンダーを呼び出して違う日付を入力したい。 どうすればいいでしょうか?宜しくお願い申し上げます。] ---- ユーザーフォームにカレンダーコントロールを配置したとして、 ダブルクリックでセルに日付を挿入するコードは↓ Private Sub Calendar1_DblClick() ActiveCell.Value = Calendar1.Value UserForm1.Hide End Sub Sheet1のA列で行うとすると、Sheet1モジュールに↓ Private Sub Worksheet_SelectionChange(ByVal Target As Range) UserForm1.Hide If Target.Column <> 1 Then Exit Sub UserForm1.Show End Sub あとは自分でアレンジしてください。 （ramrun） ----- 有難う御座いました。出来ました。それともう一つ質問なのですが、A列とC列で行うためには構文の中のどこを修整すればいいでしょうか?宜しくお願い申し上げます。本当はA列の中のA3〜A10とC3〜C10だけにこの操作をしたいのですが、お願い致します。 ---- Private Sub Worksheet_SelectionChange(ByVal Target As Range) UserForm1.Hide If Target.Column = 1 Or Target.Column = 3 Then If Target.Row >= 3 Or Target.Row =< 10 Then UserForm1.Show End If End If End Sub このような感じです。(みやほりん)(-_∂)b ---- 完璧です!ありがとうございました。嬉しいです!^^... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/200512/20051217014804.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97033 documents and 608182 words.
訪問者：