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

• #41269 Fferi50 Topikgazda RAiN91 #41268

  Új Válasz 2019-07-01 12:13:46 #41269

  Ú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

  

  Fferi50

  Topikgazda

  válasz RAiN91 #41268 üzenetére

  Szia!
  Ha egy sorba írod a feltételt és a kívánt műveletet, akkor nem kell az End If

  For i = 44 To 47
If Cells(9, 7) <> Cells(9, i) Then Cells(9, i + 1) = Cells(9, 7)
Next


  Ha mindenképpen ki szeretnéd írni, akkor az End If kerüljön a cikluson belülre:
For i = 44 To 47
If Cells(9, 7) <> Cells(9, i) Then
Cells(9, i + 1) = Cells(9, 7)
End If
Next


  "csak akkor szeretném, ha i ugorjon egyet, ha a feltétel teljesül,"


  Egyébként mit csináljon, ha a feltétel nem teljesül? Ácsorogjon és várja meg, hogy teljesüljön? - ami persze soha nem fog bekövetkezni.

  Üdv.

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