Merhaba, ekteki örnek takvim tablosunda hedef sekmesinde artı değerlerin takvimin ilgili gününde otomatik yeşil, eksi değerde olanların ise kırmızı renkte görünmesini sağlayabilir miyiz?
...ve ilgili tarihi D17 hücresine yansıtmalı.
- X iş günü ileri gitmeli: Yukarıdaki koşulun, bugünden itibaren ileriye yönelik versiyonu.
- X takvim günü geri gitmeli: Yukarıdakilerin benzeri ancak bu sefer hafta sonlarını da hesaba dahil ederek geçmiş tarihi bulmalı.
- X takvim günü ileri...
...derdim daha var çözemediğim.
Yukarıdaki görselde A1:C22 'de bir tablom var.
Bu tabloda projelerin ödeme tarihleri yazıyor.
Ben bunu F1:N32 takvim tablosuna yazdırmak istiyorum.
VLOOKUP ile denediğim zaman 1 tarihe denk gelen 1'den fazla proje olabileceği için sadece ilk yakaladığını...
Ne zaman başım sıkışsa yardımcı olan hocalarım hepinize merhaba.
Bir konuda yine takıldım ve yine yardımınıza ihtiyacım var.
Yardım istediğim konu özetle şöyle.
A1:B12 arasında bu şekilde bir tablom var.
F7:N7 arasında da böyle bir çizelge.
Yapmak istediğim şey, çizelgenin altına...
Yazı rengini otomatiğe ayarlayınca (Bugün + 6 gün koşuluna göre) 1 haftalık veri, kırmızıya döndü ama takvim sayfasındaki J4'te aktif olan tarih (ve ona ait veriler), program sayfasındaki tabloda siyah görünüyor. Bu noktada J4'ün işaret ettiği tarihlerin de kırmızıya dönüşmesi gerekmiyor muydu...
Şimdiye kadar, bu uygulamada sadece takvim sayfasına kanalize olduğum için program sayfasını pek önemsememiştim. Bugün program sayfasında dikkatimi çeken bir nüans için herhangi bir değişiklik olacak mı olmayacak mı görebileyim diye tarihin değişmesini bekledim.
Takvim sayfasındaki J4 ve L4...
...ve Haftam isimli iki değişken oluşturdum. Bunları inceleyebilirsiniz.
Sub WeeklyTask2()
Dim Veri, Say As Integer, i As Long
Worksheets("TAKVİM").Range("L5:M" & Rows.Count) = ""
son = WorksheetFunction.CountA(Worksheets("PROGRAMLAR").Range("B:B")) + 1
If son < 3 Then Exit Sub...
...için, Module 1 içindeki DailyTask kodlarını aşağıdakiyle değiştirin
Sub DailyTask()
Dim Veri, Say As Integer, i As Long
Worksheets("TAKVİM").Range("J5:J" & Rows.Count) = ""
son = WorksheetFunction.CountA(Worksheets("PROGRAMLAR").Range("B:B")) + 1
If son < 3 Then Exit Sub
ReDim...
1. Takvim sayfanızda sorularınızı yazdığınız satırları silin.
Benim gönderdiğim dosyada zaten ben silmiştim ve hata vermiyor bende.
2. Module 1 içindeki aşağıdaki kodu değiştirin
Sub WeeklyTask()
Dim Veri, Say As Integer, i As Long
Worksheets("TAKVİM").Range("L5:M" & Rows.Count) = ""...
...kaktıra bir şekilde yapmaya çalıştığım ancak sonrasında Ömer Bey'in yardımları ile doğru düzgün bir şekle sokulmuş olan aşağıdaki gibi bir takvimim mevcut. Ben bunu ajanda formatına sokup biraz daha işlevsellik kazandırmak istiyorum. Bu husustaki ihtiyaçlarımı düşününce, formül kullanarak bir...
Merhabalar.
Sıfır düzeydeki formül bilgimle, sağdan soldan bakarak/izleyerek kör topal bir şekilde bir takvim oluşturabildim ancak isteklerimi tam olarak karşılayabilecek yeterlilikte olmadı. Bu konuda yardımlarınızı rica ediyorum.
Hazırlamaya çalıştığım takvimde neleri yapmaya çalışıp da...
Halit hocam merhaba
Size yazmıştım ama arada kaynadı sanırım hazırladığınız Sağ Klik Takvim de Artık Günleri > "Göster - Gizle" seçeneği var ama
Göster dediğimizde üzerine Tıklanmıyor. Acaba Tıklanması Aktif edilebilirmi.
Dosyayı xls olarak gönderdim ama AddIns Klasöründe xla olarak...
...dosyaya baktım. Dediğiniz şekilde yapmak pek kolay değil. Sizin istediğiniz yıllar itibariyle tatil günleri ve bayramları ile birlikte bir takvim yapmak. Benim buna zamanım yok. Zamanı olan arkadaş bakar.
Önerim her yıl için bir sayfa yapmak. Ben 2021 yılı için yaptım. Kaldı ki resmi tatil...
Doğrudan Temin Programı sonunda bitti hatta fazlalık olarak sarı bölümlere çift tık yapıldığında takvim açılmakta ve istenildiğinde kullanılmakta istenilirse manuel olarakta tarih girilebilir. Eksiklikleri olabilir ancak bir aceminin yapabileceği bu. Kullanmak isteyen kullanabilir. şifre hiçbir...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.