Discussion :

[GeorgesAntoineC]

Bonjour,

je crois avoir trouvé l'endroit où les lignes vide se font. C'est lors de l'export d'une table Access vers une feuille Excel et ce, en vba.

Lorsque je regarde les informations dans ma table Access, il n'y a pas de ligne vide. Par contre, lorsque je regarde la feuille Excel qui a été exporté...j'ai plusieurs ligne vide non désiré...

j'imagine ça doit être causé par quelque chose....

voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Public Function ExportToExcel_Q()
'Exportation de la table à Analyser en classeur Excel
 
On Error GoTo ErrorHandler
 
    Dim Table_Q As String
    Dim CheminAccesQ As String
 
    CheminAccesQ = "......(chemin d'accès)......"
    CheminAccesQ = CheminAccesQ & "Nom_du_fichier_Excel.xlsx"
    Table_Q = "Table_Access"
 
    'Exportation dans le nouveau classeur
    DoCmd.TransferSpreadsheet transfertype:=acExport, spreadsheettype:=acSpreadsheetTypeExcel12, tablename:=Table_Q, FileName:=CheminAccesQ, hasfieldnames:=True
 
ErrorHandlerExit:
        Exit Function
 
ErrorHandler:
        MsgBox "Error number: " & Err.Number _
        & "; Description: " & Err.Description
        Resume ErrorHandlerExit
 
End Function

[Zekraoui_Jakani]

Essayer de vérifier si les noms des champs (le 1er et le dernier) dans la table Access ne contiennent pas des caractères spéciaux qui peuvent être interprétés comme un retour de chariot ("carriage return")
Autre piste: remplacer le paramètre "acSpreadsheetTypeExcel12" par d'autres possibilités.

[GeorgesAntoineC]

Ça semble être aléatoire...

J'ai une table vide qui se fait exporter en Excel. Lorsque je l'importe pour l'utiliser ailleurs, la table a désormais 5 lignes avec aucune donnée. J'ai changer le type de spreadsheet, ça semble avoir régler le problème pour l'autre table avec de la donnée... mais ça semble fonctionner 1 fois sur 2...