Listviewden Excel'e Aktarma Sorunu

[akissoftware]

S.a.

Arkadaşlar Listviewden Excele başarılı şekilde verileri aktarabiliyorum. Fakat tarih kısmında problem var. Programda listelettiğimde 12.06.2007 olan bir tarih, Excelde 06.12.2007 şeklinde oluyor. Gün bölümünde 12 den (aydan) büyük bir sayı varsa o zaman excele düzgün aktarılıyor.

Bunu düzeltmenin bir yolu varmı ? Yada daha doğru çalışabilecek listviewden excele aktarma kodu varmı elinizde ? Şimdiden ALLAH razı olsun

[conari]

Sizin aktarma kodunuz nasıl?

[CiTiZEN]

kodlarınızı görmeden birşey söylemek zor, tarih bilginizi tarih olarak aktarıyorsanız excel in tarih formatına uymayabilir (GG.AA.YYYY), (AA.GG.YYYY) tarihinizi string veriye dönüştürüp aktarmayı deneyin.

[akissoftware]

Benim aktarma kodum böyle

Kod: Tümünü seç

var
XL : Variant;
i,j : integer;
begin
suiButton3.Enabled:=False;

i:=0;
j:=0;
begin
try
XL := CreateOLEObject('Excel.Application');
except
XL.Quit;
showmessage('Bir problemle karşılaşıldı !');
raise;
end;
XL.WorkBooks.Add;
while (i < ListView1.Items.Count) do
begin
while (j < 9) do
begin
try
begin
//***** Acceso a las celdas *****//
XL.Cells[i+1,j+1].Value:=ListView1.Items[i].SubItems.strings[j];
j:=j+1;
end;
except
XL.Quit;
showmessage('Bir problemle karşılaşıldı !');
raise;
end;
end;
i:=i+1;
j:=0;
end;
try
begin
XL.Save;
end;
except
XL.Quit;
showmessage('Bir problemle karşılaşıldı !');
raise;
end;
XL.Quit;
end;
end;

Listviewde görünürken hiç bir problem yok. Excele aktarıldığında eğer gün veya ay kısmında 12 den büyük bir rakam varsa o tarihlerde problem olmuyor. Ama 12 den ufaksa gün ile ayın yerini değiştiriyor. Yardımlarınızı bekliyorum

[conari]

tarih olan sütunun tarih serisini aktarın. exceldede bu sütuna tarih biçimi verin.
mesela; 31.01.2010 için 40574 gibi

[akissoftware]

Cevap için teşekkür ederim ama o işlemi nasıl yapacağımı inanınki bilmiyorum