Citiraj:
Autor Sa_Stilom
Nisam maher u VBA, puno googlam googlam dok ne sklepam "kod" koji radi ono što mi treba.
Znam otprilike kako postaviti zadatak, no ne znam ga napisati.
Code:
Sub Zadatak ()
Dim X as ?, Y as ?, Z as ?
X = Sheet1A1
Z = Sheet2A1
i = i + ActiveCell.Offset(1, 0) = 1
If X>0 Then nešto Sheet2A1
nešto nešto idi na početak
...i sad još treba postaviti neki uvijek kada se petlja završava
Pokušati ću ovo riješiti jer dobro mi dođe da malo i taj dio nadogradim.
|
Ja ću ga sad sa VBA auto sortirati (valjda

), ali bi mi takodjer bilo zanimljivije eliminirati podatke koji su mi nepotrebni.
Isto tako će mi ovo uskoro više trebati, ovo je prvi puta.