Questione : Accedere alla forma di uscita

Ciao, il

I ha il seguente codice che produce una tabella da accesso a Excel.

Can che qualcuno informa del codice per sommare automaticamente le colonne D - U senza riguardo al quante file sono nel
Dim di Spreadsheet.

Thanks Seamus

Private Command0_Click () strFile come String
strFile = acOutputForm del
'DoCmd.OutputTo “di F:\BankingandSupport.xls ", Me.BankingandSupport, acFormatXLS, strFile, False
DoCmd.OutputTo acOutputTable, “Ecomm CONTRO i dati di Mkt„, acFormatXLS, strFile, oXL di False

Dim come oWB di Object
Dim come oWS di Object
Dim come il oWB del oXL di Object

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

Set = oWB di Nothing
Set = oXL di Nothing
Set = Nothing

End Sub class= del

Risposta : Accedere alla forma di uscita

Avete provato a cancellare il profilo della posta ed a ricrearli?