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

• #6608 sonar addikt

  Új Válasz 2010-03-16 14:16:25 #6608

  Ú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

  Privát üzenet küldése

  

  sonar

  addikt

  Sziasztok,

  Van egy 45k soros excelem amiből ki kellene gyűjtenem azokat a sorokat amik "L1_L1" sorokat tartalmaznak. Irtam egy rövid makrót, de nagyon lassú a dolog. Valami más ötlet, hogy hogyan tudnám gyorsan kinyerni az adatokat?

  Sub Macro1()
  
  i = 9
  x = 1
  Do While Not (Cells(i, 1)) = ""
  'xpoz = InStr(1, Cells(i, 1), "ERR-607")
  xpoz = InStr(1, Cells(i, 1), "MOVE_L1_L1")
  If xpoz > 1 Then
  Cells(x, 3) = Cells(i, 1)
  x = x + 1
  End If
  Loop
  MsgBox "OK"
  End Sub

  üdv
  sonar

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