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