VBA ile C sütununa girdiğim tarihe göre E sütununda yapacağım seçim doğrultusunda F sütununa T1 sayfasından istenilen veriyi getirmesi getirmek için döngüyü sağlayamadım. Sağladığım zaman 01.01.2019 olarak tarih girdiğimde tarihi görmüyor. 02.01.2019 girdiğimde tarihi görüyor.
biraza daha açıklama yapar mısınız?
(19/08/2022, 14:39)HORZUM yazdı: [ -> ]C sütununa girdiğim tarihe göre E sütununda yapacağım seçim doğrultusunda F sütununa T1 sayfasından istenilen veriyi getirmesi getirmek
demişsiniz ama C sütununda gün-ay-yıl formatında tarih varken T1 sayfasında öyle bir tarih yok
1.1.2019 tarihini görmüyor demişsiniz T1de öyle bir tarih yok neden görsün
02.01.2019 tarihini görüyor demişsiniz T1de öyle bir tarih de yok nasıl görüyor
2020 yılı ve B seçimi için neden 40 getiriyor
Hakediş sayfasındaki C sütununa girdiğim tarihe göre yine E sütununda ki seçilene göre F sütununa T1 sayfasındaki tarihleri görerek önceki sonraki veriyi getirecek
(20/08/2022, 11:49)HORZUM yazdı: [ -> ]Hakediş sayfasındaki C sütununa girdiğim tarihe göre yine E sütununda ki seçilene göre F sütununa T1 sayfasındaki tarihleri görerek önceki sonraki veriyi getirecek. T1 sayfasını kendinize göre de düzenleyebilirsiniz.
(19/08/2022, 16:35)berduş yazdı: [ -> ]biraza daha açıklama yapar mısınız?
(19/08/2022, 14:39)HORZUM yazdı: [ -> ]C sütununa girdiğim tarihe göre E sütununda yapacağım seçim doğrultusunda F sütununa T1 sayfasından istenilen veriyi getirmesi getirmek
demişsiniz ama C sütununda gün-ay-yıl formatında tarih varken T1 sayfasında öyle bir tarih yok
1.1.2019 tarihini görmüyor demişsiniz T1de öyle bir tarih yok neden görsün
02.01.2019 tarihini görüyor demişsiniz T1de öyle bir tarih de yok nasıl görüyor
2020 yılı ve B seçimi için neden 40 getiriyor
Hakediş sayfasındaki C sütununa 2019-2020-2021-2022-2023-2024-2025-2026 tarihlerinden (örn.21.07.2019-12.12.2020......) girildiğinde E sütunundaki A B C D seçeneklerinden biri seçildiğinde seçilen tarihe göre T1 sayfasındaki A B C D karşısındaki değerleri F sütununa getirecek. T1 sayfasını siz kendinize göre düzenleyebilirsiniz.
Hakediş sayfasındaki C sütununa 2019-2020-2021-2022-2023-2024-2025-2026 tarihlerinden (örn.21.07.2019-12.12.2020......) girildiğinde E sütunundaki A B C D seçeneklerinden biri seçildiğinde seçilen tarihe göre T1 sayfasındaki A B C D karşısındaki değerleri F sütununa getirecek. T1 sayfasını siz kendinize göre düzenleyebilirsiniz.
With ThisWorkbook.Sheets("T1") satırının altına aşağıdaki kodu yazıp dener misiniz?
If (Target.Column = 3 Or Target.Column = 5) And Target.Row >= 1 Then
If IsDate(Cells(Target.Row, "c")) And Len(Cells(Target.Row, "E") & "") > 0 Then
SonStn = Cells(1, Columns.Count).End(xlToLeft).Column
kaydir = InStr(1, "ABCD", Cells(Target.Row, "E").Value, vbTextCompare)
Set bul = .Range("B1:" & .Cells(1, SonStn).Address).Find(Year(Cells(Target.Row, "C").Value), , , 1)
If Not bul Is Nothing Then Cells(Target.Row, "F").Value = bul.Offset(kaydir).Value
End If
End If