ISBN Kitap Bilgileri Sorgulama

Bu dosya, A sütununa yazdığınız ISBN numaralarını makrolarla web sitesinde sorgulayarak kitap bilgilerini aynı satıra listeler. Aynı zamanda web üzerinden Excel'e veri aktarma yöntemini öğretici bir örnek olarak sunar.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• XD: A sütununda ISBN numaraları, diğer sütunlarda sorgu sonucu bilgiler yer alır. Başlık satırında ISBN NO, Kitap Adı, Yayınevi, Kodu, Sayfa Sayısı, Baskı, Çeviren, Kağıt Türü ve Örjinal Adı sütunları görülür. Sayfada 13 örnek kitap kaydı vardır.
• Resim: Dosyadaki görsel sayfadır, formül içermez.

Makrolar; yazar, kitap adı, alt başlık, yayınevi, açıklama, kodu, boyut, sayfa sayısı, basım yeri, baskı, basım tarihi, çeviren, kapak türü, kağıt türü, dil ve orijinal adı gibi bilgileri listelemeyi hedefler.

Makrolar​

Dosyada formül yoktur, tüm işlem makrolarla yapılır. Tüm makrolar A2'den son dolu satıra kadar ISBN'leri okur. 10 haneli numaranın başına 978 ekler. Her makro işlem sonunda süreyi bir mesaj kutusunda gösterir. Kodlarda zararlı bir işlem (dosya silme vb.) yoktur. Makrolar yalnızca internetten veri okur; sorgular aşağıdaki sitelere gönderilir.

• Sayfa4 - Web_XmlHttp: ilknokta.com sitesinde ISBN'yi arar. Sonuç bulunamazsa B sütununa "HATALI ISBN Veya Sitede bu kitap bulunmuyor." yazar. Bulunursa etiket bağlantılarını, alt başlığı, açıklamayı ve özellikler tablosunu satıra yazar.
• Module1 - exceldestek: kabalci.com.tr sitesinden sayfa metnini okuyup başlık, alt başlık, yazar, yayınevi, açıklama, basım tarihi, baskı, dil, sayfa sayısı, kapak türü, kağıt türü ve boyut bilgilerini B sütunundan itibaren yazar. Hatalı ISBN'ye "HATALI ISBN" yazar.
• Module2 - Web_XmlHttp: ilknokta.com üzerinden yazar, başlık, alt başlık, yayınevi ve açıklamayı B-F sütunlarına, özellik değerlerini sonraki sütunlara yazar.
• Module3 - Web_XmlHttp: yalnızca B sütunu boş olan satırları sorgular, yani önceden dolu satırları atlar. Sonuç sonunda "Veriler sitesinden alınmıştır." mesajını gösterir.

Nasıl kullanılır​

1. Dosyayı açıp makroları etkinleştirin ve internet bağlantınızın açık olduğundan emin olun.
2. XD sayfasında A2'den başlayarak ISBN numaralarını alt alta yazın.
3. Alt+F8 ile istediğiniz makroyu seçip çalıştırın.
4. İşlem bitince mesaj kutusunda geçen süreyi görün ve sonuçları satırlarda inceleyin.

Sitelerin sayfa yapısı değişirse makroların okuduğu alanlar da değişebilir. Makroların iletişim bilgisi olarak mesaj kutusu başlığında Metehan8001**** adresi yer alır.