Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 06-06-2017, 22:54   #1
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan Tarih Aralığını Takvim Günlerine İşlemek

Herkese merhaba,

Yapmaya çalıştığım şeyi kısaca açıklamak istiyorum.

12 tane sayfamız var. Her birinde aylık takvim var. Ocak, Şubat, Mart, Nisan şeklinde gidiyor. Her ay içinde de toplamda 6 hafta bulunuyor. Örneğin C2 Pazartesi, D2 Salı, E2 Çarşamba şeklinde devam ediyor. C3 hücresinde tarih yazılı. (06/06/2017 formatında) D3 ve E3 hücresinde de aynı şekilde tarih yazılı. Her tarihin altında da 5 adet satır bulunuyor.

Başlangıç Tarihi: 25/06/2017
Bitiş Tarihi: 10/07/2017
Personel: Kişi A
İzin Durumu: İzin Verildi

Kişi A'nın ismini bu takvim sayfalarında ilgili tarihlerin altında yer alan satırlara yazdırmak mümkün mü? 25/06/2017 tarihinin altındaki ilk satırda Kişi A yazacak. Sonra 26/06/2017 tarihinin altında yer alan ilk satırda gene Kişi A yazacak. Bu şekilde 10/07/2017 tarihine kadar ismi yazılacak. İzin durumu izin verildi değilse isim yazılmayacak.

5 adet satır bulunmasının sebebi aynı tarihte birden fazla personel ismi olabilir ve bunların alt alta gözükmesini istiyoruz.

Bir butona basıldığında bütün takvim sıfırdan bu verilerle doldurulacak. Umarım yeterince açıklayıcı olmuştur. İstenirse yarın örnek dosya da ekleyebilirim.

Teşekkür ediyorum.

Bu mesaj en son " 06-06-2017 " tarihinde saat 23:08 itibariyle speech_free tarafından düzenlenmiştir....
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 07-06-2017, 08:56   #2
YUSUF44
Destek Ekibi
 
YUSUF44 kullanıcısının avatarı
 
Giriş: 04/01/2006
Şehir: Manisa, Kula
Mesaj: 6,028
Excel Vers. ve Dili:
İş : Ofis 2016 - Türkçe Ev: Yok maalesef.
Varsayılan

Sorunu çözebilmemiz için aynı dosya yapısını oluşturup ona göre kod yazmamız gerekiyor. Mesajınızda da belirttiğiniz gibi böyle kapsamlı işlerde ve hatta nerdeyse tüm sorularınızda örnek dosya eklemeniz iyi olur.
__________________
Sorularınızı örnek dosyayla desteklemeniz çözüme ulaşmanızı kolaylaştırır.

Altın Üye olmanızı öneririm. Altın Üye değilseniz dosyanızı dosya yükleme sitelerinden birine yükleyip linkini paylaşabilirsiniz.
YUSUF44 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 07-06-2017, 12:20   #3
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Teşekkür ederim Yusuf Bey. Gün içerisinde yetiştirebilirsem ekleyeceğim. Olmazsa yarın eklerim.
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-06-2017, 16:06   #4
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Herkese tekrar merhaba. Ancak vakit bulup da örnek dosyayı hazırlayabildim. Gerekli açıklamalar 2. Çeyrek sayfasında mevcuttur.

http://www.dosya.tc/server8/u1aqv6/d...akvim.rar.html

Teşekkür ediyorum.
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 11-06-2017, 18:28   #5
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Sanırım belli bir tarih aralığını kendi günlerine takvimde işlemek olmuyor.
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-06-2017, 13:45   #6
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Konu günceldir. Yardımcı olabilecek üstadlarımı bekliyorum. En azından bir yol gösterilse belki araştırarak çözmeye çalışabilirim.
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-06-2017, 12:40   #7
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Yavaş yavaş ümidimi kesiyorum. Sanırım istediğim yapılabilecek birşey değil.
speech_free Çevrimdışı   Alıntı Yaparak Cevapla
Eski 23-06-2017, 15:57   #8
speech_free
Altın Üye
 
Giriş: 07/05/2017
Şehir: Ankara
Mesaj: 56
Excel Vers. ve Dili:
2016 Türkçe
Varsayılan

Herkese tekrar merhaba. İhtiyacım ile ilgili şöyle bir kod buldum.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub WriteDates()
    'Updateby20150305
    Dim rng As Range
    Dim StartRng As Range
    Dim EndRng As Range
    Dim OutRng As Range
    Dim StartValue As Variant
    Dim EndValue As Variant
    xTitleId = "Tarih Aralığı Seçme"
    Set StartRng = Application.Selection
    Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type:=8)
    Set EndRng = Application.InputBox("End Range (single cell):", xTitleId, Type:=8)
    Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
    Set OutRng = OutRng.Range("A1")
    StartValue = StartRng.Range("A1").Value
    EndValue = EndRng.Range("A1").Value
    If EndValue - StartValue <= 0 Then
        Exit Sub
        End If
        ColIndex = 0
        For i = StartValue To EndValue
            OutRng.Offset(ColIndex, 0) = i
            ColIndex = ColIndex + 1
        Next
    End Sub
Bu kod A1 ve B1 hücrelerinde yazılı olan tarihleri açılan pencerelerde seçilen hücrelere göre başka seçilen bir hücreden itibaren listeliyor. Bunu yaparken acaba bütün satırı listeleme şansımız var mıdır?

Yardımlarınız için teşekkür ederim.
speech_free Ç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 03:04


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

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden