Loop To Open Spreadsheet With Varying Name
Mar 24, 2009
I'm especially having trouble with loops. I'm a little dense in that department. Here is what I am trying to do. I open 3 spreadsheets. I want to consolidate them into one of the spreadsheets. The first obstacle I face is that one of the spreadsheets has a name which varies. It is always called either "PLR.xls" or "PendingLoans.xls". Also, it will have a number at the end depending on how many excel books have been opened so far in the day, i.e. "PLR (2).xls" or "PLR (5).xls". At this point, all I want to do is be able to select this file consistently. I currently have something like this (excuse my syntax - its saved at work and like I said, I'm still learning VBA).
View 4 Replies
ADVERTISEMENT
Mar 11, 2014
I've tried an if statement with AND function with no luck either.
my spreadsheet looks like this:
A1 = "One", B1 = 17/08/2013, C1 = 1000.00
A2 = "Two", B2 = 16/08/2013, C2 = 500.00
A3 = "One", B3 = 17/07/2013, C3 = 1500.00
A4 = "Two", B4 = 13/07/2013, C4 = 400.00
A5 = "Two", B5 = 14/07/2013, C5 = 300.00
"One" represents the total that needs to be paid and "Two" represents the payments.
What I want to do is recognise when "One" is present and deduct "two" from that amount, but the whole spreadsheet is never the same (the data is being pasted from somewhere else) so it's really, really difficult to do that.
So I want to do =1000-500 (for that period, so in D2 it should say 500) and then =1500-400-300 (for the other period so in D5 it should say 800).
NB: Any payment ("two") that comes in after the 17th of the month will be carried forward to the next months "one".
View 12 Replies
View Related
May 15, 2014
I am working on a personal macro that is lauched from a file that is produced on a weekly basis resulting in a filename that changes every week due to a date range that is in the file name (ex. Weekly Accounting 04_16_14 to 04_22_14.xlsx), for this example I will call this "Spreadsheet A". When working with this spreadsheet I open another spreadsheet ("Spreadsheet B") to retreive data and I then need to go back to Spreadsheet A again to paste this data. The problem I have is I don't know how to go back to Spreadsheet A since the name changes each week and I cannot hard code the name into the coding. I usually use Windows("Random Spreadsheet.xlsx").Activate to go between spreadsheets, but in this case I cannot.
Is there something that will allow me to return to Spreadsheet A no matter what it is named?
View 3 Replies
View Related
Oct 27, 2009
I have a spreadsheet that on open needs to open a 2nd spreadsheet minimised and delete 2 named sheets in the 2nd spreadsheet.
On close of the first spreadsheet it should then copy 2 sheets with the same name from itself into the 2nd spreadsheet.
This is to start a spreadsheet that will track project risks and issues that I will post further details for as other functions are required.
View 9 Replies
View Related
Aug 7, 2013
I am attempting to have cells in Column 'U' deliver different drop-down menus based on the corresponding value in column 'D'. I have created 7 named lists:
List_117G
List_152
List_JMET
List_XBAND
List_PACWIND
List_VORTEX
List_ROVER
Those lists will be called up based on 7 values in column “D”:
“G”
“152”
“J”
“X”
“D/E”
“V”
“R”
So far I have only been able to get this to work for the first category “G”. When I change the value of column “D” from “G” to “152” I no longer get a drop-down. Here is the formula I am using in the List function of validation.
=IF(D6="G",List_117G,IF(D6="152",List_152,IF(D6="J",List_JMET,IF(D6="X",List_XBAND,
IF(D6="D/E",List_PACWIND,IF(D6="V",List_VORTEX,IF(D6="R",List_ROVER,)))))))
View 2 Replies
View Related
Jun 28, 2012
There are 11,000 rows and 4,000 are unique. The goal is to merge the data down to the 4,000 records. Each of the unique entries shows up 1 to 15 times.
In trying to solve this, I wonder if I should break this down into the different # of occurances and implement specific solutions. e.g., There are
5700 entries that show up 2x
504 that show up 3x
24 that show up 12x
View 3 Replies
View Related
Oct 2, 2013
I want to call a macro with a varying name that is within a module with the same name.
I have a module called Test1 and within this, a macro name called test1
I have a module called Test2 and within this, a macro name called test2
etc
On another module called Test8 (with the macro called Test8), this Test8 macro will call either Test1 or Test2 or Test3 etc depending on what I choose in an excel spreadsheet. So on sheet1, cell A1, there is a drop down with the options Test1 or Test2 or Test3 etc.
The following works to run the macro test1 from module test1 (when it does not vary i.e. i physically put in the name of the macro myself):
Sub Test3()
Test1.Test1
End Sub
The following works to run the macro test2 from module test2 (when it does not vary i.e. i physically put in the name of the macro myself):
Sub Test3()
Test2.Test2
End Sub
etc
However, if I try it so that the calling of the macro varies as below , it does not work:
Sub Test3()
MacroToCall = Sheets("Sheet1").Range("A1").Value
MacroToCall.MacroToCall
End Sub
View 7 Replies
View Related
May 5, 2006
I am trying to create a macro that loops through a spreadsheet, copies data over to another workbook then emails the new document.
I have taken this code from an old macro that I found but cant seem to get it to work.
This is the code
Sub EmailAssessments()
Dim strTempName As String
Dim strForename As String
Dim strSurname As String
Dim strBookingNumber As String
Dim strReportingTo As String
Dim strBookingGivenBy As String
Dim strJobTitle As String
Dim dtmStartDate As Date
Dim strEndDate As String ''Need to use a string as there maybe no end date
Dim strDepartment As String
Dim strTierName As String
Dim r1 As Range ''For loop
Dim intNumberOfRows As Integer ''Count how many rows.........
View 9 Replies
View Related
Jun 11, 2009
I would like to run a macro on all open workbooks except the workbook where the macro is saved. I thought I could just do the following but it does not run my macro on all the work books:
Sub apply()
For Each wb In Workbooks
If wbk.Name ThisWorkbook.Name Then
Debug.Print
nominee_name
End If
Next wb
End Sub
View 9 Replies
View Related
Dec 16, 2008
I cannot open an Excel spreadsheet except through the Excel application. This includes through Windows Explorer, on the internet (this forum), in email. I need to save the file first, then open Excel, then open (through Excel) the file.
In Email, I get "System cannnot find the file specified" On this site, I get "Access to the specified device/path is denied" From Explorer, "Cannot find the file.... based on the criteria xls(or one of its components). Make sure the path and file name are correct and that all required libraries are available."
Last time, our IT group couldn't fix it and had to reinstall the entire Office package to get it working again. I'd rather not go through that.
View 2 Replies
View Related
Apr 19, 2006
I am just wondering if it is possible to insert a module or a code such that it is user specific.
In detail, there are two types of users: Administrator and User.
If it were administrator, it should ask for a password. If user, it should give the read-only or a protected form of the spreadsheet.
I just need the workbook to pop-up with a msgbox of administrator/user with a radio button or a select button. If administrator, it should ask for a password. Also, disabling the macros should not open the spreadsheet as making this would lead to nothing.
View 3 Replies
View Related
Dec 20, 2009
how to create a loop that grabs the ( t'th ) cell and prints into columns on the spreadsheet adjacently that cell and the ones before it (total = t) and repeats it consecutively until there are no more cells to transcribe into columns. For example - I have n=100 cells in a column that need to be placed into n-t columns (where t = 5 for example).
See image below for clarification, code to follow:
As you can see I need it to fill out in the yellow highlighted cells the rest of that pattern. Right now it only does it for one column, but every time I try to get it to do the rest of the columns, it prints the same first column over and over again (I'm having some severe mental block with implementing the correct loop code).
For clarification also, the user selects the t'th cell and it prints that cell and the previous (3 in this case)... and then it shifts down one cell and prints those 4 cells into the next column - which is what I want it to do.
Sub populate_range()
Application.ScreenUpdating = False
Dim rowoffset As Integer
Dim offsetnumber As Integer
rowoffset = Range("F2")
offsetnumber = Range("F2")
Range("d5:iv5").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
Sheet1.Select
Range("b4").Select
ActiveCell.Offset([offsetnumber], 0).Select
Range(ActiveCell, ActiveCell.Offset(-([offsetnumber] - 1), 0)).Select
Selection.Copy............................
View 9 Replies
View Related
May 18, 2007
I would like to have a popup appear on the opening of my spreadsheet that warns me of things that are past due or due today. I would like it to be in list form...
For example my source is:
Customer 1 Customer 2
Topic Expected Complete Expected Complete
One 05/18/2007 05/10/2007
Two 05/12/2007 05/15/2007 05/18/2007 05/18/2007
Three 05/12/2007 05/17/2007 05/16/2007
Four 05/21/2007 05/17/2007
What I would like to see is a popup that analyzes this data with the result of:
If run today...5/18...................................
View 14 Replies
View Related
Jan 26, 2009
I have an excel sheet that has 3 command buttons on it, i am wanting to open a saved excel sheet that i have on my shared drive from the command button. I know the path of the saved file but how do i get the button to open this file?
As well as this i this i also have another command button what i want to open another sheet in the excel document with the command buttons.
View 5 Replies
View Related
Jan 30, 2014
I have a Excel Addin file which i would like to open and view the contents on the spreadsheet
View 1 Replies
View Related
Mar 5, 2007
I've got a 'Control Panel' spreadsheet which is all based on UserForms. When a user clicks a particular button, it opens one of many separate 'Regional' sheets which they work in.
When the user closes the 'Regional' sheet, I would like the 'Control Panel' sheets userforms to show again. However I can find no way of doing this as it simply switches back to the 'Control Panel' sheet without loading the forms (as I had to hide the 'Control Panel' useforms to give them access to the 'Regional' sheet).
View 9 Replies
View Related
May 24, 2012
There used to be a way to open an Excel spreadsheet and have it go to a specific sheet....... I want to open Grants.xls and have it always go to the "index" sheet....
View 3 Replies
View Related
Jun 18, 2013
I inherited a spreadsheet from a recently let go co-worker. This spreadsheet has a lot of important financial data on it, so I really need to get into the spreadsheet. we contacted the former employee and he said he forgot the password. Is there any work around to get into the sheet?
View 2 Replies
View Related
Nov 8, 2006
I was working on a multi-tab spreadsheet (7 tabs to be exact) and I went to hide one of the tabs and all of a sudden the worksheet went away and I was left with my empty personal.xls spreadsheet. If I go into tools and visual basic I see my spreadsheet listed as VBAProject (Durex Sales Oct 1 to Oct 28 06.xls) with the 7 sheets listed below it within a folder called Microsoft Excel Objects, but I can't get it back in spreadsheet form.
View 5 Replies
View Related
Mar 20, 2008
Problem: I have textbox entries that are part of a Userform that opens using a macro on a speadsheet button. Once this form is open, I can no longer actively work in the spreadsheets.
Need: I need a way to minimize or "put on hold" the Userform so that I can freely move around in the spreadsheet. This could be in the form of a button on the Userform. Then, I need a way to bring back this userform to the point I was at before being put on hold so that I can continue to input entries into the textboxes (again, a buttton that could bring it back). There should be a way to toggle between both worlds.
View 2 Replies
View Related
Mar 22, 2013
How do I continuously loop various sheets in different workbooks pausing then for 5 seconds on each sheet (not all sheets in each workbook).
View 2 Replies
View Related
Oct 14, 2013
I've got a listbox (ListBox1) and it lists 5 files. names are One, Two, Three, Four, Five (all .xls) and they're saved in C:/MyFolder
What i want to do, when a user clicks a button, for a code to only open the files that are selected. So for example, the user selects Three.xls and Five.xls - the code would need to ignore the others and open the selected files.
View 2 Replies
View Related
Jun 18, 2014
I want to have 2 spreadsheets in File 1.
The first spreadsheet will contain a form that needs to be filled out by a user for a specific car. In the second spreadsheet, I want to have a list of the cars that have already been filled out in a form before.
So example, someone with a car got into an accident and the report is filed under vin:1234 and vin:1234 is added to the list in the second spreadsheet.
A couple days later another accident report is written up, but when the user enters vin:1234 in the form, it will notify the user that vin:1234 has a report already written up on it. The notification also asks if they want to open the file containing vin:1234. When they click 'yes', it will open the file and allow them to either use the current report for their own, or modify what was already entered.
Is this possible to do within excel? I would constantly update spreadsheet 2 with the vins that have been used to keep it as a database.
View 14 Replies
View Related
May 28, 2009
I have a couple shreadsheets I have created, one is for Purchase order's and has 4 different sheets. with one sheet holding addresses linked a drop down menu in the first sheet, all in the same workbook. Also there is a macro within this sheet to print to a specific printer, and a specific number of copies when CTRL p is pressed. The total file size is approx 9 mb. Opening this file takes approx 30 to 45 seconds. There are no links to any outside files, only links within the workbook itself.
The second File I have recently started having problems with (Our Quotation log) is A workbook containing 3 sheets, 2 sheets independant and one sheet linked to the second that Summarizes the first and also has cels to enter information on the person the quotation has come from. I have this sheet formatted as a table so I can sort by name etc when doing followups.
This workbook also takes approx 30 to 45 seconds to open, and on occasion longer. All workbooks are stored on my computer. The PO workbook has had the problem since I created it, although the Quotation log workbook has only had the issue this week.
View 4 Replies
View Related
Mar 24, 2009
Having a problem with ComboBox on spreadsheet, not Userform. When the Sheet1 is first opened the ComboBox is not populated, if I click on Sheet2 and then Sheet1 ComboBox is populated and works fine. It appears that I need some additional coding.
View 3 Replies
View Related
Nov 11, 2009
Im wondering if this is possible, if I have a folder with say 30 excel spreadsheets (.xls) all named differently (number of files will always change), can I easily write something in VBA to Open all the spreadsheets and copy each sheet over to an existing Excel spreadsheet? For example, have a template spreadsheet where the VBA would exist, then have the first sheet, (Sheet1) of each 30 sheets be copied back over to the template.xls? Even better, could I rename each Sheet1 to the name of the file before copying it over? This would basically be the first step in my process of getting the spreadsheet made.
I found this code in a similar question, so how can I rename the Sheet to the opened file name, then copy that over to template.xls?
View 13 Replies
View Related
Sep 20, 2011
Any way I can open a word doc (template) and insert fields from my spread sheet i can do it with an email.
I have a spreadsheet where I keep customers information on and would like to print a receipts.
View 9 Replies
View Related
Mar 22, 2007
I have a code which selects a range within my spreadsheet, copies it and then pastes it into word. The only thing I can't work out is how to get it to then return to the Excel Spreadsheet that I have open.
Sub SetPrintcopy()
Dim appWord As Word.Application
Set appWord = New Word.Application
appWord.Visible = True
ActiveSheet.PageSetup.PrintArea = "$A$1:$F$398"
Range("A1:F398").Copy
appWord.Documents.Add.Content.Paste
End Sub
View 5 Replies
View Related
Oct 24, 2007
I am trying to write a macro to open a specific file (i.e site 1) and copy a range and paste that data into another workbook (Comparisons).
I can manage to write the macro to do this one by one, but ideally I would like to write some sort of loop macro that will go down a specific range of files (column A), listing the copy range (column B), and where to paste (column C) until it hits a blank row.
That way I do not have to keep re-programming my comparison spreadsheet every time a new site opens.
View 9 Replies
View Related
Apr 22, 2009
upon opening my spreadsheet which will only open if the correct answer/ password is typed.
Id need to store the questions, passwords/ answers somewhere for VB to look up I guess??
Capital of England London
Capital of France Paris
Capital of Italy Rome
Etc etc
And then I need coding which will open one of the random questions, which will only grant access to the spreadsheet if the correct answer is typed.
View 9 Replies
View Related
