title image


Smiley Re: Vergleichen ob IP im Netz vorkommt
1. Du meinst nicht Scripting, sondern VBA.

2. Du arbeitest anscheinend mit Excel.

3. Der Code könnte so aussehen:



Sub Vergleich()



Dim zeile As Long

Dim GefZelle As Object



zeile = 1



Do While ActiveWorkbook.ActiveSheet.Cells(zeile, 3).Value ""

Set GefZelle = ActiveWorkbook.ActiveSheet.Range("A:A").Find(What:=ActiveWorkbook.ActiveSheet.Cells(zeile, 3).Value, LookAt:=xlWhole)

If Not GefZelle Is Nothing Then

ActiveWorkbook.ActiveSheet.Cells(zeile, 3).Interior.ColorIndex = 3

Set GefZelle = Nothing

End If

zeile = zeile + 1

Loop



End Sub

Gruß aus Ostfriesland. Möge Tux mit Dir sein!

ff


Proggst du schon .net oder quälst du dich noch mit VB6?



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: