Vraag : De Vraag van de uitvoer aan Excel van Toegang 2007

Hallo, voer ik een vraagresultaat naar het dossier van Microsoft Excel uit gebruikend de hieronder getoonde vbacode. Ik cre�ër dit dossier binnen uitblink in orde ik de transacties in JD Edwards kan invoeren. Met een bepaalde bedoeling, wanneer JD Edwards het dossier bevestigt ontdekt het dat er lege lijnen na het laatste verslag in Excel zijn.  Ik heb een vbacode nodig die ik in de code onder dat kan integreren schrap automatisch alle lijnen in spatie na het laatste verslag. Ik dacht wij de eerste kolom van het aantekenvel konden gebruiken voor het ontdekken als het leeg is, dan zal dat de trekker voor het schrappen van de gehele lijn zijn, maar ik weet niet het hoe te om het te doen. Gelieve te helpen.



Function ExportFile ()
Dim strFilename als String
strFilename = „C:\KRISPY _IMPORT_EXPORT \ salesimport.xls "
DoCmd.TransferSpreadsheet TransferType: =acExport, SpreadsheetType: =acSpreadsheetTypeExcel8, TableName: = " GlManualEntries“, FileName: =strFilename

Dim uit als van Object
Dim- boek als van Object
Dim- blad aangezien Object
Set = CreateObject („Excel.Application“)
excel.DisplayAlerts = van False
Set- boek = excel.workbooks uitblinkt. Open (strFilename)
Set- blad = book.worksheets (1)
sheet. Kolommen (8). Formule = blad. Kolommen (8). Formula
sheet. Kolommen (9) .NumberFormat = „#, ##0.00 "
sheet. Kolommen (10) .NumberFormat = „#, ##0.00 "
book. Save
excel. Quit
End Function

Antwoord : De Vraag van de uitvoer aan Excel van Toegang 2007

Terwijl het zou kunnen zijn verschillend iets, dit probleem aangaande één van de systemen die ik was toe te schrijven aan het schijfcontrolemechanisme die terugkeren van DMA aan wijze PIO heb bevestigd.  De moeilijke situatie moest in apparatenmanager gaan en het „primaire windekanaal“ en het „secundaire windekanaal“ en toen reboot verwijderen.  De vensters zouden de hardware correct opnieuw moeten auto-ontdekken en het terugstellen.

Zie het schermschot in bijlage.