Excel VBA質問箱 IV

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

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


50517 / 76732 ←次へ | 前へ→

【31103】Re:ランダムファイルからのコンボボックスへのアイテム追加
発言  Jaka  - 05/11/11(金) 16:34 -

引用なし
パスワード
   こんにちは。
なかなか回答がつかないようですが、質問の意味が良く解りません。
Typeって、使うと便利らしいみたいですが、便利性が良く解らないので使った事無いです。
Typeを使わないとダメなのでしょうか?
(配列の中に配列をいれると言った、興味本位でテストした時に1度だけ使った事があるだけです。)

一応、全然参考にならないコード。
こういう事なのでしょうか?

Public Type DB1
    工事番号 As String * 5
    工番2 As String * 2
    発注者 As String * 36
    削除FLG As String * 2
End Type

Sub KH250()
Dim DB1 As DB1
DB1.工事番号 = "AAAA"
DB1.工番2 = "BB"
DB1.発注者 = "あああああ"
DB1.削除FLG = "OK"
With Worksheets("Sheet1").OLEObjects("ComboBox1").Object
  .AddItem DB1.工事番号
  .AddItem DB1.工番2
  .AddItem DB1.発注者
  .AddItem DB1.削除FLG
End With
End Sub

0 hits

【31051】ランダムファイルからのコンボボックスへのアイテム追加 HANA 05/11/10(木) 9:55 質問
【31103】Re:ランダムファイルからのコンボボックス... Jaka 05/11/11(金) 16:34 発言
【31145】Re:ランダムファイルからのコンボボックス... HANA 05/11/12(土) 14:01 発言
【31146】Re:ランダムファイルからのコンボボックス... Kein 05/11/12(土) 14:45 発言
【31149】Re:ランダムファイルからのコンボボックス... よろずや 05/11/12(土) 17:03 発言
【31150】Re:ランダムファイルからのコンボボックス... ichinose 05/11/12(土) 17:34 発言
【31220】Re:ランダムファイルからのコンボボックス... HANA 05/11/15(火) 8:23 お礼
【31221】ごめんなさい やっぱりダメでした HANA 05/11/15(火) 9:03 質問
【31222】Re:ごめんなさい やっぱりダメでした ichinose 05/11/15(火) 9:34 発言
【31223】Re:ごめんなさい やっぱりダメでした HANA 05/11/15(火) 10:20 質問
【31263】Re:ごめんなさい やっぱりダメでした ichinose 05/11/16(水) 0:46 発言
【31264】大変勉強になりました HANA 05/11/16(水) 8:41 お礼

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