+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası (/konu-exelde-5-gun-oncesi-ve-5-gun-sonrasi.html)
Sayfalar:
1
2
Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - cobra26 - 06/10/2019
Merhaba
B sütunundeki bugünkü tarih,A sütundaki,tarihleri görerek, hangi satırdaki tarih, şartlara uygunsa e sütununa geçerli ve ya geçersiz yazabilirmiyiz.
Teşekkür ederim.
Cvp: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - berduş - 06/10/2019
öncelikle dosyanızı makro kaydedebilen Excel çalışma dosyası (.xlsm uzantılı)olarak kaydetmelisiniz.
Sonra alt+F11'e basıp "Sayfa1" e çift tıklayıp aşağıdaki kodu ekleyin
"sayfa1" her aktif olduğunda alanları kontrol eder (önce sayfa2,3,4 vs vs sonra sayfa1)
dilerim işinize yarar
Kod:
Function Aralikta()
Dim Blg As Range
Dim Hucre As Range
Dim SonStr As Long
SonStr = Cells(Rows.Count, 1).End(xlUp).Row
Set Blg = Range("A2:A" & SonStr)
For Each Hucre In Blg
If IsDate(Hucre) And Hucre >= DateAdd("d", -5, Date) And Hucre <= DateAdd("d", 5, Date) Then
Range("E" & Hucre.Row).Value = "Geçerli" '
Else
Range("E" & Hucre.Row).Value = "Geçersiz"
End If
Next
End Function
Private Sub Worksheet_Activate()
Aralikta
End Sub
5 gün öncesi ve sonras_hy.rar
(Dosya Boyutu: 19,27 KB | İndirme Sayısı: 2)
Cvp: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - cobra26 - 07/10/2019
Sayın, Berduş Bey,büyük bir dertten kurtardığınız için teşekkür ederim.
A2 Satırında 45500 kadar veri var ,bu düzenlemeyi nasıl yapabilirim.?
Teşekkür ederim.
Cvp: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - berduş - 07/10/2019
(07/10/2019, 19:27)cobra26 yazdı: A2 Satırında 45500 kadar veri var ,bu düzenlemeyi nasıl yapabilirim.?tam olarak neyi kasettiniz,
A sütununda 45500 satır mı var, yoksa 2. satırda 45500 sütun mu var?
Cvp: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - cobra26 - 07/10/2019
A sütununda 45500 satır veri var
Cvp: Exelde 5 Gün Öncesi Ve 5 Gün Sonrası - berduş - 07/10/2019
(07/10/2019, 19:27)cobra26 yazdı: A2 Satırında 45500 kadar veri var ,bu düzenlemeyi nasıl yapabilirim.?tam olarak neyi kasettiniz,
A sütununda 45500 satır mı var, yoksa 2. satırda 45500 sütun mu var?