Miten saan taulukosta taul1 siirettyä taulukkoon taul2 automaattisesti rivit, joiden perässä on 2:sta pienempi luku? Luvut ja rivimäärätkin vaihtelevat päivittäin, eli kaavan pitäisi toimia vaihtelevissa olosuhteissa.
Onko tähän makrotonta keinoa, jos ei, niin makrokin olisi todella hyödyllinen.
Onko tähän makrotonta keinoa, jos ei, niin makrokin olisi todella hyödyllinen.
Vastaukset 1
Vanhimmat
Sub kopioi()
Worksheets("Taul1").Activate
Set kohde = Worksheets("Taul2")
For Each solu In Range("F1:F" & Range("F65536").End(xlUp).Row)
If solu.Value < 2 Then
solu.EntireRow.Copy kohde.Range("A65536").End(xlUp).Offset(1)
End If
Next
End Sub