Gerçek Zamanlı Konum Bilgisi Alma

Gerçek Zamanlı Konum Bilgisi Alma

İndir
Genel Kurallar Yorumlar (0) Sorular (0) Limitler
Gerçek Zamanlı Konum Bilgisi Alma
Bu dosya, bulunulan ağın IP adresine göre enlem (Latitude) ve boylam (Longitude) bilgisini Excel hücrelerine getiren, GetRealLocationArray adlı bir Kullanıcı Tanımlı Fonksiyon (KTF) içerir. Konum, cihazın GPS verisinden değil, internet bağlantısının IP adresinden elde edilir; bu nedenle sonuç yaklaşık bir konumu gösterir.

Dosyanın içeriği​

  • Sayfa1: B2:C3 aralığında iki satırlı bir sonuç tablosu bulunur. İlk satırda "Latitude (Enlem)" ve "Longitude (Boylam)" başlıkları, ikinci satırda ise değerler yer alır (örnek olarak 41.0082376 enlem değeri).
  • Module1: GetRealLocationArray fonksiyonunu barındırır.
  • JsonConverter: JSON verisini ayrıştırmak ve üretmek için hazır bir VBA modülüdür. Konum fonksiyonu bu modülü kullanmaz; metni kendi içinde ayırır.

Kullanılan formüller​

B2 hücresinde fonksiyon dizi olarak çağrılır:
Excel formülü 
=GetRealLocationArray()
Fonksiyon 2x2'lik bir dizi döndürür: ilk satır başlıkları, ikinci satır enlem ve boylam değerlerini içerir. Sonuçlar B2:C3 aralığına yayılır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
  • GetRealLocationArray: WScript.Shell ile bir PowerShell komutu çalıştırır. Komut, Invoke-RestMethod ile bir IP konum servisine dış bağlantı kurar ve yanıttan latitude ile longitude alanlarını seçer. Fonksiyon komutun bitmesini bekler, çıktıdaki enlem ve boylam değerlerini ayıklar, virgülleri noktaya çevirir ve diziyi hücrelere döndürür. Çıktı boş gelirse hücrede "Konum alınamadı!" mesajı görünür.
  • JsonConverter: ParseJson ve ConvertToJson gibi yordamlarla JSON ayrıştırma, ayrıca UTC ve ISO tarih dönüşümü sağlayan genel amaçlı modüldür.
Güvenlik notu: Fonksiyon her hesaplandığında internet erişimi gerektirir ve sistemde PowerShell komutu çalıştırır. Dosya silme gibi bir işlem yapmaz; yalnızca konum servisine istek gönderir.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. Bilgisayarın internete bağlı olduğundan emin olun.
  3. Sayfa1'de B2 hücresindeki formülün hesaplanmasını bekleyin; enlem ve boylam B3:C3 hücrelerine yazılır.
  4. Değerleri yenilemek için B2 hücresini seçip F2 ve Enter tuşlarına basın ya da Ctrl+Alt+F9 ile yeniden hesaplatın.
  5. Fonksiyonu başka bir çalışma kitabında kullanmak için Module1 kodunu o dosyaya kopyalayın.

Galeri

  • Gerçek Zamanlı Konum Bilgisi Alma - 1
    Gerçek Zamanlı Konum Bilgisi Alma - 1

ExcelDepo tarafından daha fazla dosya

Detaylar
Destek al
Yazar
ExcelDepo
İndirme
2
Gösterim
152
İlk sürüm
Güncel
SHA-256
9e6f376dbdceaf3ab96610c9a442ec2e676d2ff424fff83f466e658602ddfc2a

Puanlar

0.00 Oylama 0 İnceleme

Benzer dosyalar Benzer kaynaklar Benzer konular

Geri
Üst