Recent content by Monsora83

I see I should have written my situation a bit clearer. The code I am running imports the data from Text.txt, after it imports the data it will delete the file. If someone else is looking at the file then I want the code to skip the delete command (and since the file will be open if someone...

I am trying to delete a file Text.txt, if the file is open it will return an error and skip the delete command. My error trapping is set to 'Break on unhandled errors'. x="C:\Text.txt" On Error Resume Next Kill x On Error Goto 0 I am boggled at why this doesnt work. Any ideas?

I found something that works. Private Sub Command53_Click() Dim dbsTemp As Database Dim strMenu As String Dim strInput As String ' Open a Microsoft Jet database to which you will link ' a table. Set dbsTemp = CurrentDb ' Call the ConnectOutput procedure. The third argument...

Hi all, I searched the old threads and found this from 2009. I am trying to change the source connection of a linked table through vba. This one is currently set up for an ODBC connection, but the whole tdf.connect part to change which MDB database to use on a network is right over my head...

Ah I found something that got me what I needed. DateDiff("s", Me.Time1, Me.Time2) Thanks

I'm not sure I understand the difference.

Hi All, Im trying to convert a value like 8/31/2012 2:36:14pm into just seconds. Any suggestions? Most what I find in google only tells me how to convert the hours and not the date as well. Thanks

I am trying to get the access code to cycle through all the open currently open workbooks and return each name through a messagebox. Not to specificly generate a list, but to list each of them on at a time (or all at once) in a messagebox.

Hi all, back again. I'm trying to get a small sub to show all the currently open workbooks. I copied this excel code I found through google, is there a quick way to modify it to run with access, or maybe there is a snippet I couldn't find buried on this forum using the search function...

Awesome! Both of those options will work great. Thanks for the help.

Just found out about FSO while looking for ways to import files names from folders/subfolders into access. and I wanted to know if it is possible to change the Debug.Print fl.Name to populate a table with the results instead of populating the immediate window. (I did add the required Microsoft...

Ah, I think I figured out a workaround. 1. I will make a workbook called: 'Master Workbook.xls' (Bleh whatever) 2. Write a macro in the workbook called: 'SheetDeleteMacro' The code for this will be: sub SheetDeleteMacro Application.DisplayAlerts = False...

I should have specified. there are a few thousand of these excel sheets and I'm trying to get it done automatically. If it is not possible to reference the sheet number, is there a way to read the sheet names in an excel workbook. I could then extract the proper sheet name since they all...

The sheet number 2 is constantly made with different names and I was wondering if the transferspreadsheet command would be able to pick out data by the sheet number instead of the sheet name. DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Tbl_EXCELDATA", "MyFile.xls", True...

Well I managed to figure it out. Changed the query setup to: Field Name: Dummy Name: Nz([Tbl_1].[Field1],"") Query Parameter: Like IIf(IsNull([Forms]![Form1].[Field1])=True,"*",[Forms]![Form1].[Field1]) Since a Null value is not included with a wildcard "*" search, the Field Name will...