Új hozzászólás Aktív témák

• [HUN]Zolee őstag

  #1014

  #1013 Boolash

  2008-09-25 18:48:55

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  [HUN]Zolee

  őstag

  #1013 Boolash

  #1013 Boolash

  Sziasztok!
  Fontos lenne!
  Ezzel mi lehet a hiba?

  Sub elso()
  
  Dim i, j As Integer
  
  For i = 1 To 65536
  For j = 1 To 1000
  If Munka1.Cells(i, j).Value = Munka2.Cells(i, j).Value Then
  
  Else
  Munka1.Cells(i, j).Interior.ColorIndex = 27
  
  End If
  Next j, i
  
  End Sub

  Ez a sor nem jó: If Munka1.Cells(i, j).Value = Munka2.Cells(i, j).Value Then
  merthogy application/object defined error....
  De miért?
  Hogy kellene?

  Egyébként azt csinálja, hogy 2 munkalapot összehasonlít, és ahol különbözik a kettő, azt sárgával megjelöli.

  Köszi!

  Hát nem tudom hogy amiatt reklamál-e hogy az else és a then között nincs semmilyen utasítás.

Új hozzászólás Aktív témák