Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2266 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

▼

【69067】Comboboxの値を連動させるには ddd 11/5/14(土) 1:11

【69071】Re:Comboboxの値を連動させるには UO3 11/5/14(土) 8:15


	【69067】Comboboxの値を連動させるには

ddd - 11/5/14(土) 1:11 -


	引用なし

	パスワード

ユーザーフォームには
Combobox1
Textbox1
Textbox2
Textbox3
Textbox4
Textbox5
があります

　　Endrow = Worksheets(1).Cells(Rows.Count, 2).End(xlUp).Row
　　For R = 1 To Endrow
　　　　ComboBox1.AddItem Worksheets(1).Cells(R, 2)
　　Next R
にてシート1の一覧をCombobox1から選べるようにしました
Textbo1に日付をyyyy/mm/dd
Textbo2に時刻をhh:mm(24時間表記)
と手入力し
Combobox1を選択した際に
Textbox3に同じRowのCの値を
Textbox4に同じRowのDの値を
反映させ
Textbox5にTextbox1とTextbox2とTextbox4の
合計された日付と時間が出るようにしたく思います

例えば
Textbox1に2011/5/20
Textbox2に16:50
と入力し
Combobox1にすずきを選んだ場合
Textbox3に21
Textbox4に12：00と表示され
Textbox4に2011/5/21 4：50と表示されるようにしたいのですが
まずTextbox3,4の反映がわからないのと
5の時間計算で
16：5012：00と出てしまいました
どのようにしたらよいのでしょうか？
やり方としてシートへの書き込みをせずにやるやり方を求めています
宜しくお願い致します

表は以下のとおりです

A|B　　 |C |D　　|
1|すずき|21|12:00|
2|さとう|22| 8:00|
3|やまだ|35| 2:19|
4|たなか|55| 3:52|
5|まえだ|12|19:20|
6|やもと|11|56:23|


	【69071】Re:Comboboxの値を連動させるには

UO3 - 11/5/14(土) 8:15 -


	引用なし

	パスワード

▼ddd さん：

おはようございます。
回答ではありません。

・まず、いま不具合があるコードをアップされると、皆さんからの回答が早いと思います。
・それと、シートのＤ列の、たとえば　12:00 。　これは、時刻として、いわゆる日付型のデータになっていますか？
　それとも、文字列としての"12:00"でしょうか。
　どちらかによって、扱いが異なります。

それと、本題ではないのですが、ComboBox1へのリストの登録、ループさせず以下でもできますよ。

With Worksheets(1)
　　ComboBox1.List = .Range("B1", .Range("B" & .Rows.Count).End(xlUp)).Value
End With


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2266 / 13646 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free