tarih yazdirma

[dennisf06]

merhaba

sütunlara aylari, satirlara günleri yazip kesisme noktalarindaki tarihleri listelemek istiyorum. örnek dosya daha aciklayici olacaktir sanirim. tesekkür ederim.

 

[Necdet]

Merhaba,

Aşağıdaki kodları ilgili sayfanın kod bölümüne kopyalayıp deneyiniz.
Not : Dosyanızı 2003 formatında ekleyiniz lütfen, herkesde 2007 sürümü olmayabilir.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [C5:AG16]) Is Nothing Then Exit Sub
Dim SonSat As Integer
SonSat = [AJ65536].End(3).Row + 1
On Error GoTo Son
If Target.Value = 1 Then Cells(SonSat, "AJ") = DateSerial(Year(Date), Target.Row - 4, Cells(4, Target.Column))
Son:
End Sub

 

[dennisf06]

merhaba
tesekkür ederim Necdet Bey. acaba formüllerle yapilabilirmi.

 

[Necdet]

Yapılmaz desem yalan olur, formül konusunda uzman olan arkadaşlar mutlaka ilgileneceklerdir sorunuzla.

 

[dennisf06]

tesekkür ederim Necdet bey ilginize. umarim bir cözümü vardir bu sorumun. saglicakla kalin.

 

[Necdet]

sizde sayın dennisf06

 

[dennisf06]

merhaba
benzer bir örnek icin bildiginiz bir link var mi acaba. tesekkür ederim.

 

[Ömer]

Merhaba,

Eki inceleyiniz.

Formüldeki mantık Sayın a.akyurek' in çalışmasından alıntıdır.

Not: Verileri tarih formatında aldım. Bunun için örnek; 30 şubatın bulunduğu hücreye 1 yazarsanız hata alırsınız.

 

[dennisf06]

merhaba
tesekkür ederim Ömer bey.aradigim cözümdü. saglicakla kalin.

 

[netkit]

Sayın Ömer;

acaba "AL" ve "AM" hucresindeki formullerı anlatma sansınız varmı? ben tektek bakarak ve yardımdan cozmeye calıstım ama basaramadım..

birde topla.carpim da bazı yerlerınde "--" kullanılıyor bunun amacı nedir acaba?

tekrar elize saglık.

Merhaba,

Eki inceleyiniz.

Formüldeki mantık Sayın a.akyurek' in çalışmasından alıntıdır.

Not: Verileri tarih formatında aldım. Bunun için örnek; 30 şubatın bulunduğu hücreye 1 yazarsanız hata alırsınız.

 

[Ömer]

Sayın Ömer;

acaba "AL" ve "AM" hucresindeki formullerı anlatma sansınız varmı? ben tektek bakarak ve yardımdan cozmeye calıstım ama basaramadım..

birde topla.carpim da bazı yerlerınde "--" kullanılıyor bunun amacı nedir acaba?

tekrar elize saglık.

Merhaba,

Var tabiki fakat daha boş bir zamanımda bunu yapabilirim.

Diğer sorunuzla ilgili linki inceleyiniz.

-- (iki eksi) işaretinin formülde kullanılması

.

 

[netkit]

cok tsk ederım. linki inceledim ama anlayanlar hep uzman arkadaslar
anladıgım DOĞRU veya YANLISIN sayısal degerını elde edıyoruz.umarım dogrudur yoksa ugrasınızı bosa cıkartmıs olucam

 

[Ömer]

cok tsk ederım. linki inceledim ama anlayanlar hep uzman arkadaslar
anladıgım DOĞRU veya YANLISIN sayısal degerını elde edıyoruz.umarım dogrudur yoksa ugrasınızı bosa cıkartmıs olucam

Kısmen doğru anladınız.Metin biçimindeki değeri sayıya çevirir. Tabi verinin sayıya dönüşmeye uygun olması gerekir. Veriyi 1 ile çarpak gibi.

DOĞRU ve YANLIŞ mantıksal değerlerdir. DORĞU 1 olarak YANLIŞ ise 0 olarak değer üretir. İncelediğiniz dosyada -- ile DOĞRU 1 e YANLIŞ da 0 a döndürülür.

.