：どのようにsepcificキャラクターはよりエクセル、以下の値の一覧で

Question

回コラム

research.med.helsinki.fi 
fixus.fi 
fixusnet.fi 
toolpack.fi 
porinteatteri.fi 
lippu.fi 
ensemble.fi 
autoarvio.fi 
ratti.autoarvio.fi 
adwords.google.com 
fram.fi 
edriver.fram.fi 
alajarvi.perussuomalaiset.fi 
per.us.su.omalaiset.fi 

に、私は列の中に多くのより多くの同様の値

を持っているしているセルを強調表示します（。）：

私はIKEドット文字を持っているすべての値を強調表示します複数回、それは次の値が強調表示されるべきマクロ/式を実行した後、VBAマクロまたは式

をすることができ

research.med.helsinki.fi 
ratti.autoarvio.fi 
adwords.google.com 
edriver.fram.fi 
alajarvi.perussuomalaiset.fi 
per.us.su.omalaiset.fi 

おかげ ジブ

Answer 1

あなたが式に基づく条件付き書式を使用することができますので、len(a1)-substitute(a1,".","")>=2

Answer 2

は、あなたのデータがセルA2

を実行し、以下のコードで始まると仮定。 1ドット以上のデータを強調表示します（A列）。私の最後の

Sub highlight() 
    Dim lastrow As Long, i As Long 
    lastrow = Range("A" & Rows.Count).End(xlUp).Row 
    For i = 2 To lastrow 
     If (Len(Range("A" & i).Value) - Len(WorksheetFunction.Substitute(Range("A" & i).Value, ".", "")) > 1) Then 
      Range("A" & i).Interior.ColorIndex = 4 
     End If 
    Next i 
End Sub 

---