Hai, Anggap saja akan menghiutng sebuah cells hasil. Anda tentukan sendiri cells hasil yang mana. Coba Anda jelaskan dengan detil, langkah menghitungnya bagaimana, data yang mana saja yang dipakai untuk menghitung sebuah cells hasil tersebut, dan sebagainya.
On Tue, Jan 26, 2016 at 9:27 AM, [email protected] [belajar-excel] < [email protected]> wrote: > > > permisi sesepuh sekalian saya mohon pencerahan nya dong > > saya dapat tugas magang di telkom untuk menghitung jarak terdekat dari > ODP secara looping > > > berikut ini algoritma saya yg stuck: > > > Sub Macro2() > Dim x As Long > Dim i As Long > Dim found As Boolean > Range("AL2").Value = x > > x = 2 > i = 2 > > Cells(i, 38) = ((Cos(Sin(Cells(i, 30)) * Sin(Cells(x, 47)) + Cos(Cells(i, > 30)) * Cos(Cells(x, 47)) * Cos(Cells(x, 48) - Cells(i, 33))) * Cells(i, > 34)) * 1000) > > found i < 200 = False > x=x+1 > Do Until Cells(i, 38) >= 200 > > found i >= 200 = True > > i = i + 1 > Exit Do > > Loop > > End Sub > > > > > mohon bantuan nya sesepuh > > > btw kalo yg ada butuh file nya bisa pm ane suhu > > > terima kasih > > >
