Formdan bilgi girince

[ismailuguz]

merhaba arkadaşlar ekteki dosyada rapor bölümünde TR butonuna basınca açılan formda tarihler ay/gün/yıl olarak görünüyor.bunu nasıl gün/ay/yıl olarak gösterebilirim.teşekkürler.

 

[Recep İpek]

Rapor Tarihini ve Rapor süresini hangi formatta giriyorsunuz?

 

[ismailuguz]

format derken neyi kasdettiniz pek anlayamadım.
raporun başladığı tarihi ve raporun süresi ne kadarsa onu yazıyorum.

 

[Recep İpek]

Yani tarihi nasıl giriyorsunuz?

dd/mm/yyyy şeklinde mi?

 

[ismailuguz]

gün/ay/yıl şeklinde giriyorum

 

[ismailuguz]

listboxtaki tarihin ay/gün/yıl şeklinde değil de gün/ay/yıl şeklinde görünmesini istiyorum.
teşekkürler

 

[Zeki Gürsoy]

Private Sub CommandButton2_Click()
Set sh = Sheets("KAYIT")
sonsat = sh.Cells(65536, 2).End(xlUp).Row
ListBox1.Clear
ListBox1.ColumnCount = 7
ListBox1.ColumnWidths = "100;100;75;50;30;30;30"
For i = 2 To sonsat
x = ListBox1.ListCount
   ListBox1.AddItem
   ListBox1.List(x, 0) = Cells(i, 2)
   ListBox1.List(x, 1) = Cells(i, 3)
   ListBox1.List(x, 2) = Format(Cells(i, 13), "dd.mm.yy")
   ListBox1.List(x, 3) = Cells(i, 14)
   
   If Cells(i, 15) = "X" Then
   ListBox1.List(x, 4) = "x"
   Else
   ListBox1.List(x, 4) = ""
   End If
   
   If Cells(i, 16) = "X" Then
   ListBox1.List(x, 5) = "x"
   Else
   ListBox1.List(x, 5) = ""
   End If
   If Cells(i, 17) = "X" Then
   ListBox1.List(x, 6) = "x"
   Else
   ListBox1.List(x, 6) = ""
   End If

Next i
Set sh = Nothing
End Sub

 

[mithrill74]

bu da değişik ve basit bir çözüm.
aşağıdaki örnekte düzenleme yaptım.
diğer çalışmalarınıza fikir verebilir.
herkese iyi çalışmalar