Bls: [belajar-excel] menghitung jarak terdekat

Tue, 26 Jan 2016 00:05:40 -0800 

ya kalo di atas 250kb ngga bakal bisa, mendingan di attch yang jadi pertanyaan 
anda saja, ngga mesti semuanya...
sorry..filenya ngga bisa saya buka..


Pada Sel, 26/1/16, Rere Sirius [email protected] [belajar-excel] 
<[email protected]> menulis:

 Judul: Bls: [belajar-excel] menghitung jarak terdekat
 Kepada: [email protected]
 Tanggal: Selasa, 26 Januari, 2016, 1:19 PM
 
 
  
 
 
 
   
 
 
     
       
       
       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
 
 
 
     
      
 
 
     
     
 
 
 
 
 
                     
                 
             
 
 
 
 
     
      
 
 
     
     
 
 
 
 
 
 
   
   
 
     
      
 
     
     
 
 
 
 #yiv8008208473 #yiv8008208473 --
   #yiv8008208473ygrp-mkp {
 border:1px solid #d8d8d8;font-family:Arial;margin:10px
 0;padding:0 10px;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp hr {
 border:1px solid #d8d8d8;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp #yiv8008208473hd {
 color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
 0;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp #yiv8008208473ads {
 margin-bottom:10px;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp .yiv8008208473ad {
 padding:0 0;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp .yiv8008208473ad p {
 margin:0;}
 
 #yiv8008208473 #yiv8008208473ygrp-mkp .yiv8008208473ad a {
 color:#0000ff;text-decoration:none;}
 #yiv8008208473 #yiv8008208473ygrp-sponsor
 #yiv8008208473ygrp-lc {
 font-family:Arial;}
 
 #yiv8008208473 #yiv8008208473ygrp-sponsor
 #yiv8008208473ygrp-lc #yiv8008208473hd {
 margin:10px
 0px;font-weight:700;font-size:78%;line-height:122%;}
 
 #yiv8008208473 #yiv8008208473ygrp-sponsor
 #yiv8008208473ygrp-lc .yiv8008208473ad {
 margin-bottom:10px;padding:0 0;}
 
 #yiv8008208473 #yiv8008208473actions {
 font-family:Verdana;font-size:11px;padding:10px 0;}
 
 #yiv8008208473 #yiv8008208473activity {
 
background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}
 
 #yiv8008208473 #yiv8008208473activity span {
 font-weight:700;}
 
 #yiv8008208473 #yiv8008208473activity span:first-child {
 text-transform:uppercase;}
 
 #yiv8008208473 #yiv8008208473activity span a {
 color:#5085b6;text-decoration:none;}
 
 #yiv8008208473 #yiv8008208473activity span span {
 color:#ff7900;}
 
 #yiv8008208473 #yiv8008208473activity span
 .yiv8008208473underline {
 text-decoration:underline;}
 
 #yiv8008208473 .yiv8008208473attach {
 clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
 0;width:400px;}
 
 #yiv8008208473 .yiv8008208473attach div a {
 text-decoration:none;}
 
 #yiv8008208473 .yiv8008208473attach img {
 border:none;padding-right:5px;}
 
 #yiv8008208473 .yiv8008208473attach label {
 display:block;margin-bottom:5px;}
 
 #yiv8008208473 .yiv8008208473attach label a {
 text-decoration:none;}
 
 #yiv8008208473 blockquote {
 margin:0 0 0 4px;}
 
 #yiv8008208473 .yiv8008208473bold {
 font-family:Arial;font-size:13px;font-weight:700;}
 
 #yiv8008208473 .yiv8008208473bold a {
 text-decoration:none;}
 
 #yiv8008208473 dd.yiv8008208473last p a {
 font-family:Verdana;font-weight:700;}
 
 #yiv8008208473 dd.yiv8008208473last p span {
 margin-right:10px;font-family:Verdana;font-weight:700;}
 
 #yiv8008208473 dd.yiv8008208473last p
 span.yiv8008208473yshortcuts {
 margin-right:0;}
 
 #yiv8008208473 div.yiv8008208473attach-table div div a {
 text-decoration:none;}
 
 #yiv8008208473 div.yiv8008208473attach-table {
 width:400px;}
 
 #yiv8008208473 div.yiv8008208473file-title a, #yiv8008208473
 div.yiv8008208473file-title a:active, #yiv8008208473
 div.yiv8008208473file-title a:hover, #yiv8008208473
 div.yiv8008208473file-title a:visited {
 text-decoration:none;}
 
 #yiv8008208473 div.yiv8008208473photo-title a,
 #yiv8008208473 div.yiv8008208473photo-title a:active,
 #yiv8008208473 div.yiv8008208473photo-title a:hover,
 #yiv8008208473 div.yiv8008208473photo-title a:visited {
 text-decoration:none;}
 
 #yiv8008208473 div#yiv8008208473ygrp-mlmsg
 #yiv8008208473ygrp-msg p a span.yiv8008208473yshortcuts {
 font-family:Verdana;font-size:10px;font-weight:normal;}
 
 #yiv8008208473 .yiv8008208473green {
 color:#628c2a;}
 
 #yiv8008208473 .yiv8008208473MsoNormal {
 margin:0 0 0 0;}
 
 #yiv8008208473 o {
 font-size:0;}
 
 #yiv8008208473 #yiv8008208473photos div {
 float:left;width:72px;}
 
 #yiv8008208473 #yiv8008208473photos div div {
 border:1px solid
 #666666;height:62px;overflow:hidden;width:62px;}
 
 #yiv8008208473 #yiv8008208473photos div label {
 
color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}
 
 #yiv8008208473 #yiv8008208473reco-category {
 font-size:77%;}
 
 #yiv8008208473 #yiv8008208473reco-desc {
 font-size:77%;}
 
 #yiv8008208473 .yiv8008208473replbq {
 margin:4px;}
 
 #yiv8008208473 #yiv8008208473ygrp-actbar div a:first-child {
 margin-right:2px;padding-right:5px;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg {
 font-size:13px;font-family:Arial, helvetica, clean,
 sans-serif;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg table {
 font-size:inherit;font:100%;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg select,
 #yiv8008208473 input, #yiv8008208473 textarea {
 font:99% Arial, Helvetica, clean, sans-serif;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg pre, #yiv8008208473
 code {
 font:115% monospace;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg * {
 line-height:1.22em;}
 
 #yiv8008208473 #yiv8008208473ygrp-mlmsg #yiv8008208473logo {
 padding-bottom:10px;}
 
 
 #yiv8008208473 #yiv8008208473ygrp-msg p a {
 font-family:Verdana;}
 
 #yiv8008208473 #yiv8008208473ygrp-msg
 p#yiv8008208473attach-count span {
 color:#1E66AE;font-weight:700;}
 
 #yiv8008208473 #yiv8008208473ygrp-reco
 #yiv8008208473reco-head {
 color:#ff7900;font-weight:700;}
 
 #yiv8008208473 #yiv8008208473ygrp-reco {
 margin-bottom:20px;padding:0px;}
 
 #yiv8008208473 #yiv8008208473ygrp-sponsor #yiv8008208473ov
 li a {
 font-size:130%;text-decoration:none;}
 
 #yiv8008208473 #yiv8008208473ygrp-sponsor #yiv8008208473ov
 li {
 font-size:77%;list-style-type:square;padding:6px 0;}
 
 #yiv8008208473 #yiv8008208473ygrp-sponsor #yiv8008208473ov
 ul {
 margin:0;padding:0 0 0 8px;}
 
 #yiv8008208473 #yiv8008208473ygrp-text {
 font-family:Georgia;}
 
 #yiv8008208473 #yiv8008208473ygrp-text p {
 margin:0 0 1em 0;}
 
 #yiv8008208473 #yiv8008208473ygrp-text tt {
 font-size:120%;}
 
 #yiv8008208473 #yiv8008208473ygrp-vital ul li:last-child {
 border-right:none !important;
 }
 #yiv8008208473

Kirim email ke