Question : Question d'exportation à exceler de l'accès 2007

Bonjour, j'exporte un résultat de question vers le dossier de Microsoft Excel using le code de vba montré ci-dessous. Je crée ce dossier excelle dedans dans l'ordre que je peux importer les transactions vers JD Edwards. Pour quelque raison, quand JD Edwards valide le dossier il détecte qu'il y a les interlignes après le dernier disque dans Excel.  J'ai besoin d'un code de vba que je peux intégrer dans le code au-dessous de celui supprime automatiquement toutes les lignes en blanc après le dernier disque. J'ai pensé que nous pourrions employer la première colonne de la feuille de travail pour détecter si elle est blanche, alors qui sera le déclenchement pour supprimer la ligne entière, mais je ne sais pas la faire. Aider svp. strFilename du
Dim du



Function ExportFile () comme String
strFilename = « _IMPORT_EXPORT de C:\KRISPY \ sDoCmd.TransferSpreadsheet TransferType de/>alesimport.xls " : =acExport, SpreadsheetType : =acSpreadsheetTypeExcel8, TableName : = " GlManualEntries », nom de fichier : le =strFilename

Dim excellent pendant que le livre d'Object
Dim comme feuille d'Object
Dim comme Object
Set excellent =
ation »)/>excel.DisplayAlerts = livre de False
Set = excel.workbooks. Ouvrir (strFilename) la feuille du
Set = le book.worksheets (1)
sheet. Colonnes (8).Formula = feuille. Colonnes (8).Formula
sheet. Colonnes (9).NumberFormat = « #, ##0.00 "
sheet. Colonnes (10).NumberFormat = « #, ##0.00 "
book. Save
excel. Quit
End Function
class= de

Réponse : Question d'exportation à exceler de l'accès 2007

Tandis qu'il pourrait être quelque chose différente, ce problème sur un des systèmes I fixe était dû au contrôleur de disques retournant de DMA au mode de Pio.  La difficulté était d'entrer dans le directeur de dispositif et d'enlever « le canal primaire d'ide » et « le canal secondaire d'ide » et puis les recharger.  Windows devrait auto-detect le matériel encore et le remettre à zéro correctement.

Voir le projectile d'écran joint.