[[20200728152658]]　『同じ列の同じ値の色分け方法』（えいみ）　ページの最後に飛ぶ

『同じ列の同じ値の色分け方法』（えいみ）

D列にある同じ値のものを色分けする方法を教えてください。

＜使用 Excel：Excel2010、使用 OS：Windows10 ＞

 もう少し具体的に説明してもらえますか？
（コナミ） 2020/07/28(火) 15:45

すいません、下記のように、同じ値どうし色別で分けることは可能でしょうか？
例：
259897-20200601-00005818　←赤のセル
259897-20200601-00005818
259897-20200601-00005818
259897-20200601-00005818
259897-20200601-00005811　←緑のセル
259897-20200601-00005811
259897-20200601-00005811
259897-20200601-00005811
259897-20200601-00005806　←青のセル
259897-20200601-00003845　←ピンクのセル
259897-20200601-00003845
259897-20200601-00006806　←黄色のセル
259897-20200601-00006806
259897-20200601-00006806
259897-20200601-00006806
259897-20200601-00006806

（えいみ） 2020/07/28(火) 15:56

Sub main()

    Dim dic As Object, i As Long, c As Range
    Set dic = CreateObject("Scripting.Dictionary")
    For Each c In Range("D:D").SpecialCells(2)
        If Not dic.exists(c.Value) Then
        dic(c.Value) = i + 3
        i = i + 1
        End If
    Next c
    For Each c In Range("D:D").SpecialCells(2)
        c.Interior.ColorIndex = dic(c.Value)
    Next c
End Sub
（mm） 2020/07/28(火) 17:34

この表の、左側からB列、C列、D列ですか？D列だけなら、条件付き書式を使えばいいのではないでしょうか？
（offset大好き） 2020/07/28(火) 18:06

コメント返信：

[ 一覧(最新更新順) ]

[[20200728152658]] 『同じ列の同じ値の色分け方法』（えいみ） ページの最後に飛ぶ

[[20200728152658]]　『同じ列の同じ値の色分け方法』（えいみ）　ページの最後に飛ぶ