Microsoft
Software
Hardware
Network
Question : Access Error Code 2302
Error
Microsoft Access Cant save the output data file you've selected
Code
"DoCmd.OutputTo acOutputTable, "Missing Data Plug", acFormatXLS, strFile, False"
This was working perfectly this morning and now its giving the above error.
Can anyone offer any assistance?
Thanks, Seamus
The full code is:
Private Sub Command5_Click()
Dim strFile As String
strFile = "F:\MissingDataOutput.xls"
'DoCmd.OutputTo acOutputForm, Me.Variance, acFormatXLS, strFile, False
DoCmd.OutputTo acOutputTable, "Missing Data Plug", acFormatXLS, strFile, False
Dim oXL As Object
Dim oWB As Object
Dim oWS As Object
Dim FormulaRow As Long
Set oXL = CreateObject("Excel.Applic
ation")
Set oWB = oXL.Workbooks.Open(strFile
)
Set oWS = oWB.Sheets(1)
With oWS
FormulaRow = .Cells(.Rows.Count, "b").End(-4162).Row + 2 'xlUp
.Cells.Font.Size = 10
.Rows(1).Font.Bold = True
.UsedRange.EntireColumn.Au
toFit
.range("b:h").NumberFormat
= "0.00%;[Red]0.00%"
.range("b:h").NumberFormat
= "#,##0.00;[Red]#,##0.00"
.range("c:e").Style = "Percent"
End With
oXL.Visible = True
Set oWS = Nothing
Set oWB = Nothing
Set oXL = Nothing
End Sub
Answer : Access Error Code 2302
Check excel in the Task manager.
Random Solutions
Uplink fast set on a distribution layer switch
sum by date and variable (horizontal)
How to alter web page so Google Chrome will clear old data?
vbscript exit if file exists
SQL 2005 on a windows 2003 cluster , how to back up
importing to firefox
using ubuntu 10.4 to format a drive for apple OS ?
Cannot Access Drive
Documentation on SAMBA and Active Directory Integration
Corrupt Windows\System32\Config\Sy
stem