orienbaris
Yeni Üye
Arkadaşlar merhaba. Bir makro oluşturup O13 ve O15 hücrelerine tıklandığında tarih seçmeye yarayan bir makro oluşturdum. Kodlarını da paylaşacağım. Ancak bir sorunum var. Şöyle ki ; internette olan örnekler aracılığı ile oluşturduğum kodlarla ya sadece O13 veya O15 hücresine açılan takvim atayabiliyorum yada O13,"O14",O15 hücrelerine ("O13:O15") şeklinde aralık olarak atama yapabiliyorum. Benim istediğim ise O14 hücresinin başka bir işleve yönelik kullanılması. Yani O14 hücresinde takvim seçim aracı olmayacak sadece O13 ve O15 hücrelerinde takvim aracı olacak. Kullandığım çalışma dosyasının aktif sheet'ine ait kod kısmına şu kodu yazınca sadece bir tanesi çalışıyor.
"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("O13")) Is Nothing Then Exit Sub
takvim.Show
End Sub
"
Ben kodda aralık belirtebiliyorum. Çalışıyor fakat O13:O15 şeklinde yazınca O14 hücreside aynı işlevi çağırıyor.
Else If Komutlarını kullanınca komut ya hiç çalışmıyor yada hatalı oluyor. Yardımcı olursanız memnun olurum.
"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("O13")) Is Nothing Then Exit Sub
takvim.Show
End Sub
"
Ben kodda aralık belirtebiliyorum. Çalışıyor fakat O13:O15 şeklinde yazınca O14 hücreside aynı işlevi çağırıyor.
Else If Komutlarını kullanınca komut ya hiç çalışmıyor yada hatalı oluyor. Yardımcı olursanız memnun olurum.