Excel VBA質問箱 IV

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

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


52919 / 76732 ←次へ | 前へ→

【28638】Re:ユーザーフォームに入力した値をセルに反映させたい
発言  かみちゃん  - 05/9/10(土) 22:43 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>ユーザーフォームを作成して1.西暦2.月3.日4.担当者をセルに転送出来る様な
>マクロを作成したいのですがうまくできません。1.〜3.まではプルダウンで4.は
>オプションボタンで4名分作成し、okボタンで転送できる様にしたい

どのようにえまくできないのか、また、どこのセルに反映させたいのかもよくわ
からないのですが、たとえば、以下のような感じでできると思います。

Private Sub CommandButton1_Click()
 Range("A1").Value = Me.ComboBox1.Value
 Range("B1").Value = Me.ComboBox2.Value
 Range("C1").Value = Me.ComboBox3.Value
 If Me.OptionButton1 Then
  Range("D1").Value = Me.OptionButton1.Caption
 End If
 If Me.OptionButton2 Then
  Range("D1").Value = Me.OptionButton2.Caption
 End If
 If Me.OptionButton3 Then
  Range("D1").Value = Me.OptionButton3.Caption
 End If
End Sub

>シート数が32シートあり各シートを開けた時もしくはボタンを作成してマクロ
>が実行出来る様なものを作りたい

こちらも今ひとつ、どういうことがしたいのかがよくわかりませんので、もう少し
具体的に、どういうことほしたいのか説明していただけませんか?
1 hits

【28637】ユーザーフォーム 超超初心者 05/9/10(土) 22:15 質問
【28638】Re:ユーザーフォームに入力した値をセルに... かみちゃん 05/9/10(土) 22:43 発言
【28649】Re:ユーザーフォームに入力した値をセル... 超超初心者 05/9/11(日) 18:59 質問
【28651】Re:ユーザーフォームに入力した値をセル... りん 05/9/11(日) 19:41 発言
【28652】Re:ユーザーフォームに入力した値をセル... 超超初心者 05/9/11(日) 20:26 お礼

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