No.2ベストアンサー
- 回答日時:
SubItemsは作らないのかしら
ListViewをどのように使用するのか・・そんな心配はいらんですね
誰かがコードは書くと思いましたが 暇と合わせてまだでしたので書きました(一例です)
>教示
申し訳ないコードで勘弁
Dim dic As Object
Dim i As Long, strIdxBuf As String, s As Variant
Set dic = CreateObject("Scripting.Dictionary")
For i = 1 To ListView1.ListItems.Count
If Not dic.exists(ListView1.ListItems(i).Text) Then
dic.Add ListView1.ListItems(i).Text, 0
Else
strIdxBuf = strIdxBuf & i & ","
End If
Next
s = Split(strIdxBuf, ",")
For i = UBound(s) - 1 To LBound(s) Step -1
ListView1.ListItems.Remove (CInt(s(i)))
Next
インデックスの優先順位は上からです
待ち人来ず、帰ります
No.1
- 回答日時:
こんばんは
ご質問の意味を取り違えていたらごめんなさい
>ListViewの中で重複削除を完結させるコード
どこから登録するのか、わかりませんけれど
データ登録時にユニークデータを作り登録すれば良いのでは?
UNIQUE関数
Dictionaryオブジェクト
Collectionオブジェクト
AdvancedFilter
など
登録したデータをいじるより合理的で速いと思いますね
追加する時もListItemsコレクション内の存在を確認して分岐するとかで・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 同じセルで重複している文字を削除したい 3 2022/11/15 12:55
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 1 2023/02/27 22:21
- Excel(エクセル) Excel vba 重複行削除 4 2022/06/02 06:52
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- その他(データベース) カラム上の重複を削除するクエリを教えてください 3 2022/04/12 14:11
- Visual Basic(VBA) Excel vbaについて知恵もしくは、コード教えて下さいm(__)m ① 表にあるデータをコピー、 2 2022/09/01 23:57
- Visual Basic(VBA) 3つの条件を指定してVBAで行を削除したい 条件1:分類1が重複 条件2:分類2が重複 条件3:個数 6 2022/06/24 11:07
- Excel(エクセル) Excel 指定した固有番号で、複数の行を削除する方法は? 2 2022/03/30 15:18
- Excel(エクセル) 重複データの抽出について 2 2023/07/21 14:52
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ListViewで複数選択された項目を一度に削除する方法
Visual Basic(VBA)
-
ListView 項目の選択/選択解除について
Visual Basic(VBA)
-
Listviewのデータを上から順番に取得 VBA
Visual Basic(VBA)
-
-
4
リストビューをスクロールさせるには
Visual Basic(VBA)
-
5
リストビューの項目の内容を変更する方法は?
Visual Basic(VBA)
-
6
Excel VBA ListViewサブアイテムの文字色
その他(プログラミング・Web制作)
-
7
VBAでListViewのフォントを変更する方法
Visual Basic(VBA)
-
8
VBA ListViewの選択Itemを削除する
Excel(エクセル)
-
9
vba Listviewでのチェックボックスのイベントを教えてください
Excel(エクセル)
-
10
検索結果をListviewさせる方法
Visual Basic(VBA)
-
11
EXCEL VBA ListViewについて
Excel(エクセル)
-
12
vba ListViewの選択色について教えてください
Excel(エクセル)
-
13
vba listviewにおけるtextのAlingmentを中央にしたい
Excel(エクセル)
-
14
ListViewで、非表示列って作れますか?
Visual Basic(VBA)
-
15
ListViewのチェックボックスについて
Excel(エクセル)
-
16
フォーム上のリストボックスに重複して表示しています
Visual Basic(VBA)
-
17
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
18
ListViewでの行全体の選択
Visual Basic(VBA)
-
19
ListBoxにAddItemする際、重複しないようにしたい
Visual Basic(VBA)
-
20
ExcelVBA でリストリストボックスに列見出しをコーディングでつける
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
DataGridViewの特定列に入力さ...
-
Excel 1セル当りの文字数が2...
-
VBAにて複数の重複データを取得...
-
エクセルVBAでのコード番号抽出...
-
ListView重複データ削除
-
ポインター引数の関数でコンパ...
-
Excel VBA メール作成について ...
-
10Mバイトて文字数に すると何...
-
char str[256]の256の意味は?
-
UTF-8で5~6バイトになる文字コ...
-
html→aspxへのタグ変換方法
-
printfの%eで指数部分の桁数を...
-
エクセルシート名の制限を変更...
-
1KBが1024byteな理由
-
COBOLのCOMP形式について
-
stable diffusionのエラー
-
バイナリとBCDコード
-
【VB2005】テキストボックス内...
-
SQLで1バイト、2バイト混在...
-
linuxのシェルでファイル名に先...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 1セル当りの文字数が2...
-
DataGridViewの特定列に入力さ...
-
ListView重複データ削除
-
GUIDの重複
-
VBA 最終行のひとつしたの行に...
-
配列xのヒストグラムを求める...
-
ExcelVBA エイルターオプション...
-
VB.netのTableAdapter.InsertQu...
-
クロス集計
-
粒度分布と粒径分布のヒストグ...
-
エクセルVBAでのコード番号抽出...
-
ExcelVBAで、コメントのサイズ...
-
VBAにて複数の重複データを取得...
-
Excel VBA チェックツール
-
例外処理について Ruby
-
ポインター引数の関数でコンパ...
-
10Mバイトて文字数に すると何...
-
UTF-8で5~6バイトになる文字コ...
-
エクセルシート名の制限を変更...
-
COBOLのCOMP形式について
おすすめ情報
すみません
立て続けに回答頂いていたんですね
気づくの遅かったですm(_ _)m
ホントにありがとうございました。