• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Web den sahur iftar saatlerini otomatik alma yapılır mı?

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Excelismail

Excelismail

Bronz Üye
Kullanıcı Bilgileri
Katılım
22 Mar 2022
Mesajlar
153
Çözümler
2
Aldığı beğeni
47
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Hayırlı Ramazanlar, hayırlı günler.

Ekte eklediğimi Tüm illerin excel ramazan 2022 imsakiyesine ve inşallah gelecek seneler de dahil olmak üzere illerin sahur ve iftar vakitlerini otomatik olarak eklenebilir mi?

Eğer olursa; İmsak ve iftar bilgileri
Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.
siteden gelecek. Çalışma sayfası Vakitler sayfası; A sütüne iller, B sütün tarih, C sütun sahur ve D sütun iftar olarak gelsin.
 

Ekli dosyalar

  • Tum-Illerin-Excel-Ramazan-2022Imsakiyesi-.xlsm
    116.7 KB · Gösterim: 21
Tarihe göre sırala Oylara göre sırala
Merhaba.

Uzun uğraşlar sonucu alttaki gibi bir kod yapabildim.
Kod bilginiz varsa sanıyorum bu koda eklemeler yapıp ayarlayabiliriz.

ilgili siteden 504 ve 9193 gibi olanları buldum biri il diğeri ilçe.
Hepsini alıp güzel bir şekilde yaparsam paylaşırım dosyayı.
Ben fazla anlamıyorum internetten veri çekme ama araştırınca buldum bişeyler :)

Rich (BB code):
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
Yani bu kodlar çalışınca il ve ilçe değişiyor ilgili sitede.
Artık ordanda verileri sayfaya çekmek sanıyorum zor değil.
Sadece 81 ilin ilgili numaraları ve ilçenin numaralarını tek tek almam gerekecek o siteden incele yolu ile.
Gerisi kolay sanki.
Dediğim gibi bitince eklerim.
 
Olumlu oy 0 Negatif oyla

Refaz,​


Öncelikle hayırlı Ramazanlar. Yardım için teşekkürler, eyvallah.

Hocam, Refaz; sayfada bir buton olsa bu butona tıklasak tüm internetteki verileri çekse... Kod bilgim yok ekteki dosyayı hazırlarsanız paylaşırsanız sevinirim... Müteşekkir olurum.
 
Olumlu oy 0 Negatif oyla
Sizede hayırlı ramazanlar abey.
Comboboxtan seçilince yada butona tıklayınca ilgili siteye örnek adana gönderip orda adananın imsakiyeleri getirilir.Ama sonradan o verileri nasıl excele getireceğim kara kara düşünmekteyim :)
Keşke fazla anlasaydım ama umudum biraz azaldı :(
Yinede bişeyley yapınca eklerim.
İnternet adresinin sonuna il ve ilçeleri birleştirme olsaydı iş kolaydı ama vardır bir yolu.
 
Olumlu oy 0 Negatif oyla
İllerin merkezlerini baz alarak yapmaktayım.
 
Olumlu oy 0 Negatif oyla
Bir kere başlamış oldum bu konuya.
Bu yüzden dasyayı bitirdim.

Array(500, 9146) buraki 500 İL,9146 ise oluyor.Bunları sayfayı incele yaparak bulabilirsiniz.
Ben sadece Adana,Adıyaman ve Ankara için yaptım.
Kod çalışınca sendkeys den dolayı numlock kapanıyor bunun için internette çözüm var ve bu dosyayı kullanmaya gerek duyulmadığını düşündüğüm için eklemedim koda.
Kod çalışırken başka işlem yapmayın.
Çünkü giftede gösterdiğim gibi tarayıcı açılıyor veriler oraya gidince sayfadakileri kopyalıyor ve excele alıyor.
Tarayıcı çalışırken görünür olmalı.Aktarım adında sayfa ekledim silinmemesi gerekiyor kopyalanan veriler oraya gidiyor önce.

Eminim başka yolda vardır ama anlamıyorum veri çekme internetten.

reee.gif

Rich (BB code):
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • Imsakiye VAKİTLERİ Diyanet.xlsm
    130.2 KB · Gösterim: 7
Son düzenleme:
Olumlu oy 0 Negatif oyla
Bu dosyaya Numlock koduda eklendi.
 

Ekli dosyalar

  • Imsakiye VAKİTLERİ Diyanet (1).xlsm
    130.5 KB · Gösterim: 5
Olumlu oy 0 Negatif oyla

Refaz,​

Tekrarda sağ olasın. Çok uğraş emek vermişsin. Eyvallah.

Aşağıdaki kodlarda illerdeki rakamlara artıkça mı iller geliyor, bütün iş bura da yani illeri getiriyoruz?

Function getirSayi_iL_ilce(ByVal cbo As Object)
Select Case cbo.Value
Case "Adana": getirSayi_iL_ilce = Array(500, 9146)
Case "Adıyaman": getirSayi_iL_ilce = Array(501, 9158)
Case "Ankara": getirSayi_iL_ilce = Array(506, 9206)
Case Else: getirSayi_iL_ilce = Array(0, 0)
End Select
End Function
 
Olumlu oy 0 Negatif oyla
Bişey değil abey.
Evet case Ankara nın altına devam edilecek ve İl ve numaralar doğru yazılmalı.
Zaman buldukça uğraşırım belki explorer gösterilmeyebilinir ve ek sayfaya gerek olmayabilinir.
 
Olumlu oy 0 Negatif oyla
Abey siz dediklerimi tamamlayın inşAllah güzel olacak biraz ilerleme var bende.
Bayram namazlarını vs... ve İL adlarınıda otomatik çekebiliriz.
Yavaş yavaş ilerleme oluyor.
 
Olumlu oy 0 Negatif oyla
Abey.
Bugün biter dosya kopyalama,numlock ve extra sayfalara gerek kalmadı.
Gerekli ayarlamaları yapınca dosyayı eklerim.
 
Olumlu oy 0 Negatif oyla
Abey dosya bitti.
Adıyaman,Ankara ve Adana için yaptım.

Sabitler sayfasındaki bayram namazları saatlarine gerek yok onu ve bazı işlemleri ayarlarım bu akşam.
Gif ekledim.
Extra sayfaya nasıl veri geliyor diye tek tek veri aldırdım onuda değiştiririz sonra.
Deneye yanıla araştıra araştıra bu hale geldi.
Dediğim gibi akşam tam ilgilenirim.

Forumda o kadar internetten veri çekme anlayan var neden el atmıyorlar buda ayrı bir konu :)

rrr.gif



Rich (BB code):
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • Imsakiye VAKİTLERİ Diyanet.xlsm
    58.4 KB · Gösterim: 13
Olumlu oy 0 Negatif oyla
Sahurdan sonra illere 12 şer 12 şer değer verdim ama Aksaray’da kaldı. İl adını yazsamda hep Aksaray geldi.
 
Olumlu oy 0 Negatif oyla
Kodlar çalışıyor function kodunu ekleyin bakıp onuda koda ekleyelim.
Normalde mantıken o sitedeki kaynak kodlarındanda numara çekilebilinir ama tecrübesiz olduğum için bukadar oldu zaman olunca onuda otomatiğe bağlatırız belki.
 
Olumlu oy 0 Negatif oyla

Refaz,​

hocam Afyonkarahisar getirdim. sanırım oldu. Ama biraz bekleyince geliyor. Bir ekran resmi ekleyeyim.
 

Ekli dosyalar

  • Afyon.png
    Afyon.png
    93.8 KB · Gösterim: 6
Olumlu oy 0 Negatif oyla
mehmetveliyy' Alıntı:

Refaz,​

hocam Afyonkarahisar getirdim. sanırım oldu. Ama biraz bekleyince geliyor. Bir ekran resmi ekleyeyim.
Genişletmek için tıkla...
Abey bir kod buldum koddaki functionlara gerek kalmayacak galiba.Yani İl ve ilçeiçin numara aramaya gerek kalmayacak galiba.
Yani bir bekleyin dosyayı bitirince eklerim.
 
Olumlu oy 0 Negatif oyla
Beklerim. Sizin dediklerinizi yapayım yapabilecem diye uğraşayım dedim.
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Geri
Üst