The Macro asks the user to point at the location of a report, it then copies information out of that report and pastes it into a master sheet. The part I am having trouble with is closing the file that data has been copied from.
I have tried different things to close it such as
I'm writing a subroutine that asks the user to pick a file (using GetOpenFileName) and extracts some data from it, then closes the workbook it opened automatically.
Problem is that it seems I can only reference workbooks by index, which is a big problem if they have more than one workbook open. I don't want to have to force them to only keep 1 workbook open, that seems like bad practice.
importFile = Application.GetOpenFilename("Excel Files (*.xls), *.xls", , "Select field sheet")
If importFile = False Then Exit Sub
Workbooks.Open importFile ' Open the new workbook
importFile ends up returning something like, "C:Documents and SettingsMy DocumentsFieldBook.xls".....................
I have a userform that opens, and allows the user to enter data into it for each row where a specific cell is blank. If the user hasn't updated in a couple of days that could be 15-20 entries that need to be made. Currently when the user clicks the close button the userform closes the form for the current row and shows for the next row, acting more like a Next button. I would like to be able to assign Previous, Next and Exit, where exit closes all instances of the userform, and not just the one the user currently sees. Even if we cant do previous and next, the exit button is really important sot he user doesnt have to click through in order to exit the userform.
The following is the code that brings up the array, followed by userform code
Code:
Sub ErrLogSupEntry()
'Application.ScreenUpdating = False
Set wsErrLog = Worksheets("Error Log")
UserName = Environ("UserName")
If UserName = "09070403" Then
[Code] ........
I am opening the file through the GetOpenFilename method. I am facing an error in of the cases... Like say or example i try and open a file with the XYZ.xls...which is already open. the system generates a mess saying
"reopening will cause any changes you made to be discarded. do you want to reopen XYZ.xls?"
if i click yes...it works fine by reopening the file but when i click to No...Runtime error 1004 comes:
"Method open of object workbooks failed "
and its giving an error here in the Workbooks.Open Filename:=sFilename ......
I am trying to use Application.GetOpenFilename to search for a several (.jpg) files and list the file paths on a worksheet.
View 2 Replies View RelatedI want to open a specific sheet and refresh only said sheet when i open another sheet for example x.xls
So opening x.xls will automatically open y.xls
I've tried this in the workbook code area but it doesn't do anything.
[Code] .....
Is there a way to create an outside log of who has opened an excel file and when?
I am looking to add some accountability to a project.
Is it possible to insert the filename automatically in formula after the input from the user?
I want to ask the user to input a filename and afterwards, call that filename in an Index-Match
I have the below formula with the sample filename:
ActiveCell.FormulaR1C1 = _
"=INDEX('[filename1.xlsx]DATA'!C9,MATCH(RC[1],'[filename1.xlsx]DATA'!C32,0))"
Range("A2").Select
Opening it manually the dates in column C are all consistently date numbers. i.e. using the =ISNUMBER() function to test them, they all return True
However when I include the VBA instruction:
I would like to have a message box pop up when a file is opened requiring a user to enter information (Name), that would then put this name into a cell for later use when they are printing.
View 6 Replies View RelatedI have excel vba code to open .xls files on my server. Files to open are chosen by the user via a UserForm within my app, it shows them all their files in their directory on my server. How can I open their files (.xls) that they select but DISABLE the VBA from being able to run/execute, if they have any attched to the file?
I now have all code in place to open the file no problem, I just need to know how to disable the VBA part from being "turned on" when the file opens.
I run a macro which runs saves the active file to a different location to ensure that I retain the original like so -
If ActiveWorkbook. Name = "KEY_DATA_CFT77" + ".xls" Then
ActiveWorkbook.SaveAs Filename:= _
"H:HOME imcEXCELKEY_DATA_2006KEY_DATA_2006_01KEY_DATA_CFT77_01.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End If .................................
At the moment, there is no compile error or runtime error, but if I manually attempt to open the file (that was successfully read from), I get the message that the file is already open and is locked by myself (the user) and that multiple Excel processes are still running (I checked the task manager).
How do I close this Excel file (no changes to be made since I only read from the file) and quit Excel from running ?
Here is what I have at the moment :
Dim FirstName, Surname As String
'file path and name for the Excel file
Dim FileNamePath As String = "C:UsersMRCDesktopMRC FilesVisual Basic FilesSwimManager 2014CurrentSeasonDATASquadData.xls"
[Code].....
the small code i'm writing just needs to do the following:
1. open an .xslx file selected by the user
2. copy 2 worksheets from that file to the current one
3. close the selected file without saving it.
This is my code:
VB:
Sub GetData()
MsgBox ("Please select a file"), vbOKOnly
Master = Application.GetOpenFilename(FileFilter:="Excel Files (*.xlsx), *.xlsx", Title:="Please select a file")
[Code]....
Opening the file works, but the last 3 lines don't because i don't understand how to declare "Master": however i dim it (workbook, object, variant...) i get an error on the GetOpenFilename line. If i don't declare it, i get an error while trying to copy the worksheets.
can group all opened file in 1 excel tab instead if many tabs?
open thru window the file u want...
http://i12.photobucket.com/albums/a209/tancfc/11444.jpg
http://i12.photobucket.com/albums/a209/tancfc/fhfh.jpg
right click on task bar > properties > under Taskbar Appearance, select Group Similar taskbar buttons > is not my answer
While opening one Excel file I get an error message saying that a 2nd file could not be opened because it cannot be found. I do not want this 2nd file to open. WHere do I find the "command" that is telling this 2nd file to open.
View 3 Replies View RelatedI have a Userform in Excel.
My requirement, is whenever I open the Excel file, it should open the userform and should not show the excel file at all. And the form is closed, the excel file should be saved and closed.
Also, I need the minimize button on the form and in the taskbar, it should not display the Excel file, it should display only the Userform.
I was working on a tax file yesturday, just a long long list of receipts. and the file is password protected. However, I went to open it today, and I get a message that says: "Filename.xls cannot be opened. the file may be read only, or you may be trying to access a read only location. Or, the server the file is located on may not be responding."
It's on my USB Drive. I've tried copying it to my HD so I can play with a copy, but no dice. When I try that, I get another error message, : Cannot copy Filename.xls. The file or directory is corrupted and unreadable. I've tried the various fixed suggested in the excel help files to no avail. I did a search on the forum, but didn't find anything that seemed to apply or help me. The computer I'm trying to open it on has Office 2003, the one I most recently worked on the file on has office XP. Not sure if this was a source of the problem. Doesn't seem like it should be. Hasn't been in the past. I'm not even getting to the dialogue box asking for my password yet.
how to alert and force second user to quit (i.e. even cannot open the file as "read-only) if the excel file is being opened by other?
View 3 Replies View RelatedI am using the following code and putting it into a module.
Private Sub Workbook_Open()
MsgBox "Hi, thanks for opening me", vbInformation, "Ozgrid.com"
End Sub
when i open the file and click on allow macros it does not run.
For a project I need to develop excel spreadsheet that will contain two columns. First column will contain list of sale items. Other column will contain hyperlink to the items image as pdf file stored on hard drive somewhere. My requirement is to highlight row containing sale item, whoes pdf file is modified/updated since the last time user has opened the spreadsheet.
View 8 Replies View RelatedI am trying to refer to an open file in VBA script.
The script below is asking the user to open a file from which data is copied. I am trying to refer back to this open file but as the file name and path are not mentioned in the script, I am not able to.
myMsg = "Please Select Euromcontact Master DISTOPS File"
Response = MsgBox(myMsg, vbExclamation + vbOKOnly, myTitle)
sFileName = Application. GetOpenFilename
Workbooks.Open Filename:=sFileName
Sheets("CL value").Select
Sheets( Array("CL value", "CL Units", "CLC Value")).Select
Range("N12:N37,S12:Z37").Select
Selection.Copy
Windows("Euromcontact Value File TEMPLATE.xls").Activate
Sheets("CLvalueDIS").Select
Sheets(Array("CLvalueDIS", "CLUnitsDIS", "CLCvalueDIS")).Select
Range("R12").Select
Selection.PasteSpecial Paste:=xlValues
Sheets("CLvalueDIS").Select
Sheets(Array("CLvalueDIS", "CLUnitsDIS", "CLCvalueDIS")).Select
Range("R12:R37").Select
Selection.Copy
Range("N12").Select
Selection.PasteSpecial Paste:=xlValues
Range("R12:R37").Clear
Application.CutCopyMode = False
I'm making a workbook which I want to distribute widely. It will have a lot of changes to the menus which happen 'onOpen'.
I am keen to not spoil peoples special menu setups on closing the workbook.
If I understand correctly, on closing, Excel writes the current menu settings to the .xlb file. Does anyone know of a way to prevent it doing this so that peoples setups are left unchanged?
Presumably there is code that will do it but I've searched a long time and found nothing.
I close an existing excel file I need to automatically save it to another folder as the same name. I don't want any prompts or save as boxes to appear when this happens.
I need to do this as I use the file all the time, but need to save it on to a network where others can view it.
I have a master file which users are able to open via read only or go in via password to edit.
I'm not too bothered on the read only users more on person's entering the file via password, making any changes and then saving those changes.
Is there a way to trace what changes they made and would their name be saved as the new "author" of the file?
I am runnig Excel 2010. I was wondering how I lock an Excel file (make it 'Read Only') if someone already has it open?
View 1 Replies View RelatedI have a macro which opens two different hyperlinks in excel. Opened workbooks have are named like 1.asp and 2.asp. Both contains only one spreedsheet. I need to copy these spreedsheets to the Workbook, from which they are opened.
View 4 Replies View RelatedI have a cell that displays the user name and would like the cell to update whenever the file is opened and display the user. Below shows what the VBA module code. The cell has this formula "=Usrname()".
Function Usrname() As String
Usrname = Environ("username")
End Function
I have a workbook setup as Read only for reporting purposes. I would like to capture the number of times and if possible, the users that are opening the file....is there a way?
View 9 Replies View RelatedI found some vba codes in this forum which record the date and time in column A when a file is opened.
Can the codes be modified such that when someone opens the file the second time on the same day, the date and time are recorded in column B?
Attached file for your reference.