Excel VBA質問箱 IV

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

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


30057 / 76732 ←次へ | 前へ→

【51945】Re:Excel カレンダーフォーム VBA セルごとに入力方法
発言  Jaka  - 07/10/12(金) 16:18 -

引用なし
パスワード
   ▼kitty さん:
>例:A1をWクリック後、カレンダーから10月15日を選ぶと、
>A1には、「2007/10/15」と表示される。 
>次にB2をWクリック後、カレンダーから10月20日を選ぶと、
>A1には、「2007/10/20」と表示される。(A1は、「2007/10/15」のまま)
意味が良く解らないんですけど。
一応提示されたコードでちゃんと動いているようでしたけど...。

  Cancel = True  ←これ入れたほうが良いと思います。
  UserForm1.Show


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
St = "A1,B2,C3,D4,E5,F6,G8"
If InStr(1, St, Target.Address(0, 0)) > 0 Then
  Cancel = True
  UserForm1.Show
End If
End Sub

0 hits

【51944】Excel カレンダーフォーム VBA セルごとに入力方法 kitty 07/10/12(金) 15:46 質問
【51945】Re:Excel カレンダーフォーム VBA セルご... Jaka 07/10/12(金) 16:18 発言
【51957】Re:Excel カレンダーフォーム VBA セルご... kitty 07/10/12(金) 22:16 お礼

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