Tarihleri alt alta sıralayacak program

[YASINT]

merhaba benim ricam sadece yılı girdiğim zaman yıl içindeki tarihleri alt alta sıralayak bir program yapmak bu konuda bana yardımcı olursanız sevinirim.

 

[Ali]

yılı girdiğim zaman yıl içindeki tarihleri alt alta sıralayak

Yılı girdiğiniz zaman hangi tarihleri sıralayacak burasını biraz açarmısınız

 

[YASINT]

YANİ 2004 YILI YAZDIÐIMDA 01.01.2004 DEN 31.12.2004 E KADAR OLAN TARİHLERİ ALT ALTA SIRAYALACAK BİR PROGRAM

 

[Merhum İdris SERDAR]

1.1.2004 yazıp sütunu istediğiniz kadar taradıkltan sonra Edit/Fill/Series der devam ederseniz tarihleriniz yazılır.

 

[YASINT]

BU İÞLEMİ VB DE NASIL YAPARIM BANA AÇIKÇASI O LAZIM

 

[Ali]

Private Sub CommandButton1_Click()
Selection.DataSeries Rowcol:=xlColumns, Type:=xlChronological, Date:= _
xlDay, Step:=1, Stop:=365, Trend:=False
Selection.AutoFill Destination:=Range("A1:A365"), Type:=xlFillDefault
End Sub

kodu bir butona atayarak
A1 hücresine bir tarih yazın butonu çalıştırın

 

[Merhum İdris SERDAR]

Sayın Fructose'un affına sğınarak,
aşağıdaki düzeltmeyi yaptım.

Private Sub CommandButton1_Click()
Selection.DataSeries Rowcol:=xlColumns, Type:=xlChronological, Date:= _
xlDay, Step:=1, Stop:=366, Trend:=False
Selection.AutoFill Destination:=Range("A1:A366"), Type:=xlFillDefault
End Sub

 

[YASINT]

arkadaşlar yardımlarınız için çok teşekkürler.