advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 222 for 簡易リストボックス (0.005 sec.)
[[20031111173600]]
#score: 10961
@digest: a9841dbdef229da20ee7102d4b2c36cf
@id: 4035
@mdate: 2008-09-05T04:15:26Z
@size: 1365
@type: text/plain
#keywords: ー僕 (7815), 大工 (4320), 易リ (3873), 旦別 (2980), 簡易 (2059), トボ (1505), ボッ (1339), ンボ (1243), ボボ (1180), クス (1075), リス (859), ーオ (806), 重複 (760), ルツ (746), additem (712), コン (601), ルボ (594), スト (559), combobox1 (551), トタ (549), 解消 (527), ック (486), 戻っ (444), 弥太 (418), 一旦 (389), 複し (355), スの (349), トロ (324), scripting (320), dictionary (288), 表現 (281), dic (268)
『リストボックス』(大工くん)
お願いします リストボックスとコンボックスの違いがいまいちわからないですが 簡易リストボックスの元の値の範囲に重複したデータが入っています フィルターオプションを使って取り除けばよいのですが 列がいっぱいあってたいへんです 重複したデータが入った元の値の範囲のデータはそのままで 簡易リストボックスを作って重複したデータは無視してリストが でないんでしょうか 何を言っているのかわからないですよねー僕もどのように表現したらいいのか もしわかってもらえたらお願いします ---- 簡易リストボックスに似たんはコンボボックスの方でっしゃろなぁ。 コントロールツールボックスのコンボボックスをシートのどっかに配置します。 A列にリストが表示されとるとして そのシートタブを右クリックし、シートの表示を選択したうえ下のコードをコピペ します。 戻って一旦別シートを覗いて戻ってきてみてくらはい。 重複は解消されてまっしゃろ? (弥太郎) '------------------ Private Sub Worksheet_Activate() Dim dic As Object, i As Long Set dic = CreateObject("scripting.dictionary") With ComboBox1 .Clear For i = 1 To Range("a" & Rows.Count).End(xlUp).Row If Not dic.exists(Cells(i, 1).Value) Then .AddItem Cells(i, 1) dic(Cells(i, 1).Value) = Empty End If Next i End With Set dic = Nothing End Sub ...
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200311/20031111173600.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97012 documents and 608126 words.

訪問者:カウンタValid HTML 4.01 Transitional