http://speedy.sh/Q2QUp/magang-telkom.7z
ini suhu file nya sori kalo lagsung d attachment stuck d tengah jalan
Pada Selasa, 26 Januari 2016 12:27, "Toby kenzo [email protected]
[belajar-excel]" <[email protected]> menulis:
| Disertakan sekalian aja filenya,buat 2 sheet,mana contoh aslinya dan mana yg
di harapkan agar teman2 di sini ngga salah presepsi.Sent from Yahoo Mail on
Android |
From: [email protected] [belajar-excel] <[email protected]>;
To: <[email protected]>;
Subject: [belajar-excel] menghitung jarak terdekat
Sent: Tue, Jan 26, 2016 2:27:57 AM
| 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
|
#yiv6290300221 #yiv6290300221 -- #yiv6290300221ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv6290300221
#yiv6290300221ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv6290300221
#yiv6290300221ygrp-mkp #yiv6290300221hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv6290300221 #yiv6290300221ygrp-mkp #yiv6290300221ads
{margin-bottom:10px;}#yiv6290300221 #yiv6290300221ygrp-mkp .yiv6290300221ad
{padding:0 0;}#yiv6290300221 #yiv6290300221ygrp-mkp .yiv6290300221ad p
{margin:0;}#yiv6290300221 #yiv6290300221ygrp-mkp .yiv6290300221ad a
{color:#0000ff;text-decoration:none;}#yiv6290300221 #yiv6290300221ygrp-sponsor
#yiv6290300221ygrp-lc {font-family:Arial;}#yiv6290300221
#yiv6290300221ygrp-sponsor #yiv6290300221ygrp-lc #yiv6290300221hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv6290300221
#yiv6290300221ygrp-sponsor #yiv6290300221ygrp-lc .yiv6290300221ad
{margin-bottom:10px;padding:0 0;}#yiv6290300221 #yiv6290300221actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv6290300221
#yiv6290300221activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv6290300221
#yiv6290300221activity span {font-weight:700;}#yiv6290300221
#yiv6290300221activity span:first-child
{text-transform:uppercase;}#yiv6290300221 #yiv6290300221activity span a
{color:#5085b6;text-decoration:none;}#yiv6290300221 #yiv6290300221activity span
span {color:#ff7900;}#yiv6290300221 #yiv6290300221activity span
.yiv6290300221underline {text-decoration:underline;}#yiv6290300221
.yiv6290300221attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv6290300221 .yiv6290300221attach div a
{text-decoration:none;}#yiv6290300221 .yiv6290300221attach img
{border:none;padding-right:5px;}#yiv6290300221 .yiv6290300221attach label
{display:block;margin-bottom:5px;}#yiv6290300221 .yiv6290300221attach label a
{text-decoration:none;}#yiv6290300221 blockquote {margin:0 0 0
4px;}#yiv6290300221 .yiv6290300221bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv6290300221
.yiv6290300221bold a {text-decoration:none;}#yiv6290300221 dd.yiv6290300221last
p a {font-family:Verdana;font-weight:700;}#yiv6290300221 dd.yiv6290300221last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv6290300221
dd.yiv6290300221last p span.yiv6290300221yshortcuts
{margin-right:0;}#yiv6290300221 div.yiv6290300221attach-table div div a
{text-decoration:none;}#yiv6290300221 div.yiv6290300221attach-table
{width:400px;}#yiv6290300221 div.yiv6290300221file-title a, #yiv6290300221
div.yiv6290300221file-title a:active, #yiv6290300221
div.yiv6290300221file-title a:hover, #yiv6290300221 div.yiv6290300221file-title
a:visited {text-decoration:none;}#yiv6290300221 div.yiv6290300221photo-title a,
#yiv6290300221 div.yiv6290300221photo-title a:active, #yiv6290300221
div.yiv6290300221photo-title a:hover, #yiv6290300221
div.yiv6290300221photo-title a:visited {text-decoration:none;}#yiv6290300221
div#yiv6290300221ygrp-mlmsg #yiv6290300221ygrp-msg p a
span.yiv6290300221yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv6290300221
.yiv6290300221green {color:#628c2a;}#yiv6290300221 .yiv6290300221MsoNormal
{margin:0 0 0 0;}#yiv6290300221 o {font-size:0;}#yiv6290300221
#yiv6290300221photos div {float:left;width:72px;}#yiv6290300221
#yiv6290300221photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv6290300221
#yiv6290300221photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv6290300221
#yiv6290300221reco-category {font-size:77%;}#yiv6290300221
#yiv6290300221reco-desc {font-size:77%;}#yiv6290300221 .yiv6290300221replbq
{margin:4px;}#yiv6290300221 #yiv6290300221ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv6290300221 #yiv6290300221ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv6290300221
#yiv6290300221ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv6290300221
#yiv6290300221ygrp-mlmsg select, #yiv6290300221 input, #yiv6290300221 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv6290300221
#yiv6290300221ygrp-mlmsg pre, #yiv6290300221 code {font:115%
monospace;}#yiv6290300221 #yiv6290300221ygrp-mlmsg *
{line-height:1.22em;}#yiv6290300221 #yiv6290300221ygrp-mlmsg #yiv6290300221logo
{padding-bottom:10px;}#yiv6290300221 #yiv6290300221ygrp-msg p a
{font-family:Verdana;}#yiv6290300221 #yiv6290300221ygrp-msg
p#yiv6290300221attach-count span {color:#1E66AE;font-weight:700;}#yiv6290300221
#yiv6290300221ygrp-reco #yiv6290300221reco-head
{color:#ff7900;font-weight:700;}#yiv6290300221 #yiv6290300221ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv6290300221 #yiv6290300221ygrp-sponsor
#yiv6290300221ov li a {font-size:130%;text-decoration:none;}#yiv6290300221
#yiv6290300221ygrp-sponsor #yiv6290300221ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv6290300221
#yiv6290300221ygrp-sponsor #yiv6290300221ov ul {margin:0;padding:0 0 0
8px;}#yiv6290300221 #yiv6290300221ygrp-text
{font-family:Georgia;}#yiv6290300221 #yiv6290300221ygrp-text p {margin:0 0 1em
0;}#yiv6290300221 #yiv6290300221ygrp-text tt {font-size:120%;}#yiv6290300221
#yiv6290300221ygrp-vital ul li:last-child {border-right:none
!important;}#yiv6290300221
