Yalnız Mesajı Göster
Eski 24-11-2012, 17:39  
northcyprus
Altın Üye
 
Giriş: 03/05/2007
Şehir: KIBRIS
Mesaj: 213
Excel Vers. ve Dili:
Excel 2003
Varsayılan Hücre boş ise Tarihi yaz Dolu ise ayni kalsın

sayın hocalarım değerli arkadaşlar
eklemek istediğim kod eğer C7 boş ise (Now, "dd.mm.yyyy hh:mm") formatı olsun dolu ise ayni kalsın nasıl kodlandırılır?


Private Sub buton_Click()

GENELMASA.MASA1.BackColor = &HFF&

If Range("C7") Is Nothing Then
Else
Range("C7") = Format(Now, "dd.mm.yyyy hh:mm")


End If


SPARİŞ_AL.Show



End Sub




böyle yaptım fakat olmuyor neyi eksik aceba??

yardımlarınızı bekliyorum teşekkürler
northcyprus Çevrimdışı   Alıntı Yaparak Cevapla