• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Tarihlerin farklı bilgisayarlarda farklı formatta görünmesi

Katılım
8 Haziran 2007
Mesajlar
761
Excel Vers. ve Dili
excel- 2003 Türkçe
kolay gelsin arkadaşlar. Benim bilgisayarımda gün/ay/yıl şeklinde gözüken veriler başka bir bilgisayarda ay/gün/yıl şeklinde gözükmektedir. Nedeni ve çözümü hakkında bilgisi olan arkadaşların yardımlarını bekliyorum. Kolay gelsin iyi çalışmalar
 
Selamlar,

Başlat/Ayarlar/Denetim Masası/Bölgesel Dil Ayarlarından olması lazım ayarların.


attachment.php
 

Ekli dosyalar

  • adsız.JPG
    adsız.JPG
    96.9 KB · Görüntüleme: 15
Son düzenleme:
şöyle bir durum var. Belgeyi açtığı zaman tarihler normal gözüküyor. Sadece aşağıdaki kodu çalıştırıp süzdüğümüz zaman ekrana gelen veriler ay gün yıl şeklinde oluyor. Tarih ayarları yanlış olsa belge üzerindede yanlış olurmu.


Private Sub CommandButton1_Click()
Sheets("Bitis_Tarihi").Range("B2:F100").ClearContents
Dim s1 As Worksheet, s2 As Worksheet, sat As Long, sat2 As Long
Dim hcr As Range
If ComboBox1.Value = "" Then Exit Sub
Set s1 = Sheets("DATA")
Set s2 = Sheets("Bitis_Tarihi")
sat = s1.Cells(65536, "B").End(xlUp).Row
sat2 = s2.Cells(65536, "B").End(xlUp).Row + 1

For Each hcr In s1.Range("F2:F" & sat)
If hcr.Value = CDate(ComboBox1.Value) Then
s2.Range("B" & sat2) = sat2 - 1
s2.Range("B" & sat2 & ":F" & sat2).Value = s1.Range("B" & hcr.Row & ":F" & hcr.Row).Value
sat2 = sat2 + 1
End If
Next
Rows("2:100").Select
Selection.Sort Key1:=Range("D2"), Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal
Range("A1").Select

End Sub
 
Bu konuda fikri olan yokmu.
 
Geri
Üst