Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Diğer Excel Soruları
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Diğer Excel Soruları Yukarıdaki başlıklara uymayan Excel sorularınızı bu bölüme gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 16-08-2016, 10:44   #1
pmbpanter
Altın Üye
 
Giriş: 01/06/2005
Mesaj: 68
Excel Vers. ve Dili:
Excel 2013 Eng
Varsayılan Haftanın belirli günlerini yazdırma

Merhaba,
Örnekte detaylı olarak açıkladığım konuda yardıma ihtiyacım var. Kısaca anlatmak gerekirse iki tarih arasında haftanın belirttiğim günlerindeki tarihleri otomatik olarak yazdırsın istiyorum. Forumda araştırdığım kadarıyla "Eleman - Choose" fonksiyonu ile bu duruma değişik çözüm bulan ustalar olmuş fakat bir türlü "Eleman" fonksiyonunu kendi örneğime uygulayamadım.
Eklenmiş Dosyalar
Dosya Türü: xlsx Excel web.xlsx (20.7 KB, 15 Görüntülenme)
__________________
Excel 2010 Eng
pmbpanter Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-08-2016, 11:28   #2
sakman26
Altın Üye
 
Giriş: 31/01/2012
Şehir: Bursa
Mesaj: 2,440
Excel Vers. ve Dili:
Excel 2010 , Türkçe
Varsayılan

selam,
dosyanıza bakmadım. Yararlı olacağını düşündüğüm , daha önceden hazırladığım bir dokumanı paylaşmak istedim.
(Not : Hesaplamalarda çok çeşitli formüller kullanılabilir tabi ki..)
__________________
Geri dönüşü olmayan mesajlarımı siliyorum.

Bu mesaj en son " 08-10-2016 " tarihinde saat 02:33 itibariyle sakman26 tarafından düzenlenmiştir....
sakman26 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-08-2016, 11:40   #3
pmbpanter
Altın Üye
 
Giriş: 01/06/2005
Mesaj: 68
Excel Vers. ve Dili:
Excel 2013 Eng
Varsayılan

Alıntı:
sakman26 tarafından gönderildi Mesajı Görüntüle
selam,
dosyanıza bakmadım. Yararlı olacağını düşündüğüm , daha önceden hazırladığım bir dokumanı paylaşmak istedim.
(Not : Hesaplamalarda çok çeşitli formüller kullanılabilir tabi ki..)
Merhaba, öncelikle ilgilendiğiniz için çok teşekkürler. Örnek dosyanızı inceledim fakat maalesef benim ihtiyacımı karşılamıyor. Sizin vermiş olduğunuz örnek haftanın bir tek günü için hesaplama yapıyor, ben ise aynı anda bir kaç günü de yazdırabilmek istiyorum.

İyi günler dilerim.
__________________
Excel 2010 Eng
pmbpanter Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-08-2016, 12:18   #4
YUSUF44
Destek Ekibi
 
YUSUF44 kullanıcısının avatarı
 
Giriş: 04/01/2006
Şehir: Manisa, Kula
Mesaj: 6,691
Excel Vers. ve Dili:
İş : Ofis 2016 - Türkçe Ev: Ofis 2016 - Türkçe
Varsayılan

Örnek dosyanızdaki tarihlerde hata var gibi. Listeleme yılında 2016 yazdığınız halde sonuçlarda 2006 yıllarını listelemişsiniz. Yine de anladığım kadarıyla aşağıdaki kodları bir modüle kopyalayıp denerseniz istediğinizi yapacağını düşünüyorum:
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub tarihler()
baş = [A3].Value
son = [B3].Value

For i = baş To son
    For j = 1 To 7
        If WorksheetFunction.Weekday(i, 2) = j And WorksheetFunction.CountIf([D3:J3], j) > 0 Then
            yeni = Cells(Rows.Count, "L").End(3).Row + 1
            Cells(yeni, "L") = Format(i, "dd/mm/yyyy dddd")
        End If
    Next
Next
End Sub
YUSUF44 Çevrimiçi   Alıntı Yaparak Cevapla
Eski 16-08-2016, 13:22   #5
pmbpanter
Altın Üye
 
Giriş: 01/06/2005
Mesaj: 68
Excel Vers. ve Dili:
Excel 2013 Eng
Varsayılan

Alıntı:
YUSUF44 tarafından gönderildi Mesajı Görüntüle
Örnek dosyanızdaki tarihlerde hata var gibi. Listeleme yılında 2016 yazdığınız halde sonuçlarda 2006 yıllarını listelemişsiniz. Yine de anladığım kadarıyla aşağıdaki kodları bir modüle kopyalayıp denerseniz istediğinizi yapacağını düşünüyorum:
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub tarihler()
baş = [A3].Value
son = [B3].Value

For i = baş To son
    For j = 1 To 7
        If WorksheetFunction.Weekday(i, 2) = j And WorksheetFunction.CountIf([D3:J3], j) > 0 Then
            yeni = Cells(Rows.Count, "L").End(3).Row + 1
            Cells(yeni, "L") = Format(i, "dd/mm/yyyy dddd")
        End If
    Next
Next
End Sub
Yusuf Bey,
Öncelikle ilgilendiğiniz için teşekkürler... Evet sizin de belirtmiş olduğunuz gibi dosya tarihlerini hatalı yazmışım ama siz düzeltmişsiniz. Bunun için de ayrıca teşekkürler... Yazdığınız kod yaptığım ufak bir revizyon ile tamamen işimi gördü... Ellerinize sağlık...

Sevgi ve saygılar...
__________________
Excel 2010 Eng
pmbpanter Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-08-2016, 22:07   #6
İdris SERDAR
Moderatör
 
İdris SERDAR kullanıcısının avatarı
 
Giriş: 21/10/2005
Şehir: Ankara
Mesaj: 14,601
Excel Vers. ve Dili:
Excel, 2016 - İngilizce
Varsayılan

.

Bu dosyadaki örnekleri inceleyin.

http://www.excelgurusu.com/baslangic...si-olusturmak/


.
__________________
Çalışmalarımı görmek için:

http://www.excelgurusu.com/

İdris SERDAR
İdris SERDAR Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-08-2016, 01:20   #7
sakman26
Altın Üye
 
Giriş: 31/01/2012
Şehir: Bursa
Mesaj: 2,440
Excel Vers. ve Dili:
Excel 2010 , Türkçe
Varsayılan

selam,
formülle çözüm için bir alternatif de benden olsun...

link : http://dosya.co/fuekif11dz6z/İkiTari...nler.xlsx.html
Eklenmiş Dosyalar
Dosya Türü: xlsx İkiTarihArasıSeçilenGünler.xlsx (46.6 KB, 12 Görüntülenme)
__________________
Geri dönüşü olmayan mesajlarımı siliyorum.

Bu mesaj en son " 17-08-2016 " tarihinde saat 01:55 itibariyle sakman26 tarafından düzenlenmiştir.... Neden: ek güncellendi.
sakman26 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-08-2016, 09:10   #8
pmbpanter
Altın Üye
 
Giriş: 01/06/2005
Mesaj: 68
Excel Vers. ve Dili:
Excel 2013 Eng
Varsayılan

İdris Bey ve Sakman26 formül ile alternatifini de öğrenmek bonus oldu..
Çok şeşekkürler...
__________________
Excel 2010 Eng
pmbpanter Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 07:13


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Karton Bardak- Çorlu Dil Konuşma Terapisti- Çorlu Dil Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Rampa- Rotary- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Çorlu Sürücü Kursu- Şişli Avukat- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kağıt Bardak- Kaplan Tekstil- Çorlu Perde- Çorlu Perde- Çorlu Havuz- Çorlu Havuz- Makina- Danışmazlar- Çorlu Perde Yıkama- Çorlu Perde Yıkama- Okul Danışmanlık- Çorlu Ayakkabı- İzmit Sigorta- ADR'li taşıma kabı imalatı- Mekanik Tesisat- Çorlu Grafik Tasarım-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden