Vraag : De outputvorm van de toegang

Hallo, heeft

I de volgende code die de output een lijst van Toegang tot Excel.

Can iemand van de code adviseert om kolommen D aan U ongeacht hoeveel rijen automatisch op te tellen in Spreadsheet.

Thanks Seamus

Private SubCommand0_Click ()
Dim als String
strFile = „F:\BankingandSupport.xls "
'DoCmd.OutputTo acOutputForm strFile is, strFile Me.BankingandSupport, acFormatXLS, acOutputTable False
DoCmd.OutputTo, „Ecomm VERSUS Gegevens Mkt“, acFormatXLS, strFile, False

Dim oXL als Object
Dim oWB als Object
Dim oWS als Object

Set oXL = CreateObject („Excel.Application“)
Set oWB = oXL.Workbooks.Open (strFile)
Set oWS = oWB.Sheets (1)
oWS.Cells.Font.Size = 10
oWS.Rows (1). Font.Bold = True
oWS.UsedRange.EntireColumn.AutoFit
oXL.Visible = True

Set oWS = Nothing
Set oWB = Nothing
Set oXL = Nothing

End Sub

Antwoord : De outputvorm van de toegang

Hebt u schrappend het postprofiel geprobeerd en ontspannend het?