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
Dynamically passing the parameter the service constructor (without configuration file)
Sending a web API command from Asterisk
VMWare Lab Manager 4.0 and deployed VMs
UltraTree and Filtering ?
execute onLoad only once in an ASP page
Resize a live OS partition whilst running! - Windows 2008
SQL 2005 on a windows 2003 cluster , how to back up
Auto fill user name in "Login" field
How to register nameserver
Disable Shortcut Keys in axwindowsmediaplayer1 (media player)