Skip to main content

AccessTr.neT


Makroda Eğer Kullanımı

Makroda Eğer Kullanımı

#4
kodu aşağıdaki gibi düzenleyip dener misiniz?
If Not Intersect(Target, [B3:O6]) Is Nothing Then
If Sheets("Sayfa3").Range("D3").Value = "Ortaokulu bitirenler" And Sheets("Sayfa3").Range("D5").Value = "Liseyi bitirenler" Then _
Sheets("Sayfa3").Range("D10").Value = Sheets("Sayfa3").Range("M3").Value & Format(DateAdd("yyyy", 3, Sheets("Sayfa3").Range("L3").Value), "yyyy")
End If
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Makroda Eğer Kullanımı - Yazar: malatyalı - 02/05/2021, 15:18
RE: Makroda Eğer Kullanımı - Yazar: berduş - 02/05/2021, 15:43
RE: Makroda Eğer Kullanımı - Yazar: malatyalı - 02/05/2021, 15:46
RE: Makroda Eğer Kullanımı - Yazar: berduş - 02/05/2021, 15:51
RE: Makroda Eğer Kullanımı - Yazar: malatyalı - 02/05/2021, 16:04
RE: Makroda Eğer Kullanımı - Yazar: berduş - 02/05/2021, 16:10
RE: Makroda Eğer Kullanımı - Yazar: malatyalı - 02/05/2021, 16:15
Task