İyi çalışmalar,
Sorgudan Excele Aktardığım alanların Excelde Bazı Sutunlarda her hücresinde Alt+enter yapmış gibi Boşluk Sorunu oluşuyor sebebi nedir acaba.
Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu
çalışmanızı görmeden bir yorumda bulunmak doğru olmaz
çalışmanızı ekleyin inceleyelim
çalışmanızı ekleyin inceleyelim
form üzerinden excele aktardığım kodlar:
*****************************************************************
Private Sub Komut129_Click()
Dim Klasor
Dim ilktarihal As String
Dim sontarihal As String
ilktarihal = Me.ilktarih2.Value
sontarihal = Me.sontarih2.Value
Klasor = CurrentProject.Path & "\" & ilktarihal & "-" & sontarihal & "-gelenler" & ".xls"
DoCmd.OutputTo acQuery, "gelenler", "MicrosoftExcel(*.xls)", Klasor, True, ""
MsgBox "Dosyanızın bulunduğu dizine " & ilktarihal & "-" & sontarihal & "-gelenler.xls adıyla aktarıldı", 0, " V E R İ A K T A R I M I "
End Sub
*****************************************************************
altı çizili satırı bu şekilde değiştirince düzeliyor fakat excel97 formatında kaydediyor ve True yazmama rağmen aktarılan dosyayı açmıyor
DoCmd.TransferSpreadsheet acExport, 8, "gelenler", Klasor, True, ""
*****************************************************************
Private Sub Komut129_Click()
Dim Klasor
Dim ilktarihal As String
Dim sontarihal As String
ilktarihal = Me.ilktarih2.Value
sontarihal = Me.sontarih2.Value
Klasor = CurrentProject.Path & "\" & ilktarihal & "-" & sontarihal & "-gelenler" & ".xls"
DoCmd.OutputTo acQuery, "gelenler", "MicrosoftExcel(*.xls)", Klasor, True, ""
MsgBox "Dosyanızın bulunduğu dizine " & ilktarihal & "-" & sontarihal & "-gelenler.xls adıyla aktarıldı", 0, " V E R İ A K T A R I M I "
End Sub
*****************************************************************
altı çizili satırı bu şekilde değiştirince düzeliyor fakat excel97 formatında kaydediyor ve True yazmama rağmen aktarılan dosyayı açmıyor
DoCmd.TransferSpreadsheet acExport, 8, "gelenler", Klasor, True, ""
DoCmd.TransferSpreadsheet acExport, 8, "gelenler", Klasor, True, ""
bu kod sorunu çözüyor.
iyi çalışmalar
bu kod sorunu çözüyor.
iyi çalışmalar
Konuyu Okuyanlar: 1 Ziyaretçi