AccessTr.neT
Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu (/konu-sorgudan-excele-aktarmada-excelde-bazi-sutunlarda-alt-enter-gibi-bosluk-sorunu.html)



Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu - caytug - 22/10/2021

İ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.


RE: Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu - berduş - 22/10/2021

çalışmanızı görmeden bir yorumda bulunmak doğru olmaz
çalışmanızı ekleyin inceleyelim


RE: Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu - caytug - 23/10/2021

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, ""


RE: Sorgudan Excele Aktarmada Excelde Bazı Sutunlarda Alt+enter Gibi Boşluk Sorunu - caytug - 23/10/2021

DoCmd.TransferSpreadsheet acExport, 8, "gelenler", Klasor, True, ""

bu kod sorunu çözüyor.
iyi çalışmalar