Excel VBA質問箱 IV

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

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


38483 / 76732 ←次へ | 前へ→

【43385】Re:オブジェクトの更新
回答  ハチ  - 06/10/12(木) 17:03 -

引用なし
パスワード
   ▼kenちゃん さん:
>▼ハチ さん:
>返事ありがとうございます。
>説明へたですね。
>あの〜貼り付けたオブジェクト(カレンダ)を月が変わったら編集で開き
>たとえば12月になった時にQ2の日付の値をInputして更新したいと
>思ったものですから質問させて貰いました。下のマクロは
>Q2に直接手入力で実行したマクロです。これでも更新(変更)可能
>なのですが他のものも利用するためInputBoxを表示させそこに
>2006/12/1を入力Q2へ転記→MsgBox”日付を更新します”→更新完了
>としたいのですが説明わかりますか。

Q1の日付が変わったら云々・・のあたりは完成していて
InputBoxで日付を更新する方法がわからない(デフォルトありで)ということですね。
どこがわからないのか ハッキリしているとレスもつきやすいと思います。

こんな感じですか?
>→MsgBox”日付を更新します”→更新完了
このあたりは考えて入れてみてください。

Sub Test()
  Dim MyDate As Date
  
  MyDate = InputBox("日付を指定", , Range("A1").Value)
  If IsDate(MyDate) = False Then
    MsgBox "日付を指定してください"
    Exit Sub
  End If
  Range("A1").Value = MyDate
End Sub

0 hits

【43375】オブジェクトの更新 kenちゃん 06/10/12(木) 10:06 質問
【43381】Re:オブジェクトの更新 ハチ 06/10/12(木) 15:09 発言
【43383】Re:オブジェクトの更新 kenちゃん 06/10/12(木) 16:23 発言
【43385】Re:オブジェクトの更新 ハチ 06/10/12(木) 17:03 回答
【43386】Re:オブジェクトの更新 kenちゃん 06/10/12(木) 17:37 発言
【43387】Re:オブジェクトの更新 ハチ 06/10/12(木) 19:12 発言
【43402】Re:オブジェクトの更新 ichinose 06/10/13(金) 8:05 発言

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