On the computers in my office they have a My Documents folder that is in the directory C:Data. There is also a My Documents folder in the usual windows location C:Documents and Settings etc. Is there a function that will give me the path of the folder that is on the desktop? The macro will be run on computers with the folder in different locations which is why I need to look it up.
View 5 RepliesIs there any code that can make it possible to navigate to my Documents Folder only that is on a network drive and open the folder but not a document.
View 9 Replies View RelatedDoes anyone know the equivalent of CTRL (Home) to move the cursor to the a1 position in VBA? I have tried Range(cells(1,1),cells(1,1)).select but with no success
View 3 Replies View RelatedI have several spread sheets I sort daily, now suddenly today when I hit Ctrl / home it wont go home and I can not sort the sheet.
View 7 Replies View RelatedI am writing a sports schedule or fixture list. The home teams are in column B and the away teams are in column C.
I want to prevent any team having 3 consecutive home matches. Is there any way a formula can be used to alert me if there are 3 consecutive home matches.
I've got a table similar to the below (but with a few more columns & rows). I need 2 look at 2 cells one contains a $value (say $75,000) the other contains a code (say C). I need it to return the correct value - in this example 3.00%.
This is going to be too messy to use a vlookup, I'm sure there is something better. Is this where you use Match or Index ... both of which I don't understand how they work. Or something else ?
ABCD
$ 1 $ 50,000 1.00%1.50%2.00%2.50%
$ 50,001 $ 100,000 2.00%2.50%3.00%3.50%
$ 100,001 $ 250,000 3.00%3.50%4.00%4.50%
A B C D
$1 $50,000 1.00% 1.50% 2.00% 2.50%
$50,001 $100,000 2.00% 2.50% 3.00% 3.50%
$100,001 $250,000 3.00% 3.50% 4.00% 4.50%
I have been searching Excel Help for a code that will allow me to program the Ctrl + Home function.
Specifically, I have a macro that leaves the selected cell too far down on the spreadsheet. Instead of making the user scroll up or press the Ctrl + Home keys, I want to write a code at the end of my existing macro.
I have used the PMT function but this gives me the total to pay per month.
I want to know what the repayments would be and also allow me to add in each one of the periods and extra repayment option.
So if in the year I wanted to pay an extra $100 per month, I would put $100 next to each period as in a particular period(s) I might not have to put in there but want to predict what the amount owing on the house is.
Is this possible or is this too complicated.
I have a range of date values that span B1:BA1 and I need to find the next date value greater than TODAY() and return the column number.
View 14 Replies View RelatedHow can I locate 1000 or the closest number from column 5, and all the data to the left of it? I have tried all the commands I could find, and nothing has worked for me.
This is the data I want to pull from the table.
1.463149.6271.0440.985999.87
I need a macro that identifies duplicates within a spreadsheet. Unfortunately, the utility provided by Microsoft is not adequate because the text strings that are potential duplicates are nestled inside other text.
Fortunately, however, there is a unique text string that will locate the duplicated data. Below are two examples:
Plus -- Zero Box ==> Zero Box Medium ID=7288 (submittedby Anna Johansson)
Basic -- Zero Box ==> Resolve Medium ID=6397 (submittedby Kazy Suzuki)
The data that needs to be identified as potentially duplicated is the four digit number (i.e. 7288 and 6397). You will notice that they are preceded by “ID=”.
The spreadsheet has over 26,000 rows of data and 1700 plus IDs. The characters ID= proceeds the four digit number in all cases.
I simply need a macro that will provide a list of the four digit numbers that are duplicates. This will allow me to easily locate and manually delete any surrounding, unwanted data from the spreadsheet.
The data that the macro needs to search is contained in and restricted to Column C.
I want to assign macros to buttons from VBA. I know that buttons have a TopLeftCell property and I've used this before to point at cells around the button but not the other way round.
What I'm trying to do is have excel assign a macro to a button when the workbook is created (if thats possible - if not then just whenever it's opened the macro can be reassigned).
The recorder gives me the line of code:
Selection.OnAction = "ThisWorkbook.ImportJobsButton"
so I really want to change Selection for something that points at the specific shape. I want to do this with a few shapes.
Take a look at these columns below;
.00 810.00 .00 1,729.00 .00 1,594.00 .00 1,599.00 .00 498.00 498.00 .00 .00 1,852.00 .00 454.00 .00 50.00
I want to find the cell reference number of any value of column A (which is greater than 0) in column B. I could only manage to find values with my formula i.e.
=IF(A1>0,VLOOKUP(A1,$B$1:$B$9,1,0),0)
Doing a search function where the cursor is on a row some where (unknown).
I would like to move the cursor to the first column of the spreadsheet.
I am working on a budget spreadsheet and want to find a formula that will automatically tell me what my take home pay is depending on the yearly salary and see if covers my expenses (linked to another spreadsheet). It will be easier to budget my expenses depending on my salary. My attempts to create IF and = haven't worked.
View 2 Replies View RelatedI created a custom tab withthe UI editor into my personal sheet which is set as startup and I want to have this tab automaticly shown when it is opened.
So when the workbook is opened I would like the show the tab Andre rather than the home tab.
I have an older laptop with XP and 2007 Office / Excel this works, with the new laptop doesn't work?
basically - I open a new spreadsheet - blank - just basic
I used to be able to click the data tab, then click From Access, then enter my URL to an access database on my website and BAM my data would populate in cell A1
with VISTA - I get the same error over and over again, tried a different XP machine, no problem? What gives?
error box states: Microsoft Office Excel cannot access the file [url]
there are several possible reasons.
the file name or path does not exist
the file is being used
workbook has the same name
I'm starting to really hate VISTA after about 3hrs with this new laptop!
Found the wonderful code here at Ozgrid and would like to change the return to home selection.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Range("d4:Ad104"), Target) Is Nothing Then
Int_color = Target.Interior.ColorIndex
Select Case Int_color
Case xlNone
'Question, what does "xlNone" do?
Target.Interior.ColorIndex = 3
Target.Font.ColorIndex = 3
Target.Value = "true"
'Range("A1").Select - would like to change this to move the selection to
'the present row clicked, column c. If I click on G9 the selection returns
'to C9.
Case Else
Target.Interior.ColorIndex = xlNone
Target.Value = "false"
End Select
End If
End Sub
I have a column full of data like the below with relevant data on the same row.
I wish to locate the cells which have a specific section most importantly without the "cartridge only" so for example with the below
Word Academy (Nintendo DS)
Word Academy (Nintendo DS) (Cartridge Only)
This would show 2 given there are two with the specific text "Word Academy (Nintendo DS)" there will always be a cell without the (Cartridge Only) part so for this the formula =COUNTIF(D:D,"*" & D1 & "*") seems to do the job to simply count the cells with that in however I do not wish to do this.
What I need to do is locate the cells that have this in but match them together in a large sheet so basically I somehow need to be able to locate the two corresponding cells which both have one of the cells values of "Word Academy (Nintendo DS)"
The cells have data in the row which I need to tie together to create a total value.
For example
Title Qty
Word Academy (Nintendo DS) 5
Word Academy (Nintendo DS) (Cartridge Only)6
I need to locate the all the cells with "Word Academy (Nintendo DS)" in which would mean just the two cells "Word Academy (Nintendo DS)" + "Word Academy (Nintendo DS) (Cartridge Only)" in the above instance but I need it to then see the cell which has that in its title and add the quantity of the two together leaving me with the below
Title Qty Actual Qty
Word Academy (Nintendo DS) 5 11
Word Academy (Nintendo DS) (Cartridge Only)6 11
Which is basically just adding together the quantity shown on the spreadsheet in the rows with the containing text "Word Academy (Nintendo DS)" and as "Word Academy (Nintendo DS) (Cartridge Only)"
On the attached spreadsheet Column L is an example of the result I would be desire, I have put a basic =sum formula in to just represent the value it should be showing.
I have a category field, and a money spent field in a table.
Category Money spent
1 $12
2 $19
2 $122
1 $5
4 $65
5 $34
5 $12
3 $26
Category 1: $17
Category 2: $$$
and so on..
So I'm looking for a formula that returns information to one cell. A formula that looks if in 'this' column you see the category code '1' for example, then return to me the money spent for ALL the 1's. It should return $17...
The table above is small just for demo purpose, my table has 8 category codes at the moment and the number of rows can be between 15 and 50 I guess... it's a monthly break down.
I would like to see how much is spent in total for each category...
In addition if possible, can this be done for two separate tables... We are two people, and I have two table recording expenditure.
So the formula would need to, from these tables:
Person A Person B
Category Money spent Category Money spent
1 $12 2 $14
2 $192 4 $25
2 $122 4 $65
1 $5 1 $32
4 $65 3 $75
5 $34 3 $85
5 $12 2 $12
3 $26 2 $11
Category 1: $49
Category 2: $$$
and so on...
Look up in both tables, search the two category columns for category '1' for example, then return all the $'s added together... So for Category 1 now it would show $49...
1 35
2 37
3 39
4 22
5 25
6 27
7 28
8 23
9 25
I have the above table. What I want excel to do is to grab the largest number in each set of numbers from the second column and return the corresponding number in the first column. So basically, excel would return a 3, 7, and 9 in cells C1, C2, and C3.
Sheet1
DEPARTMENTLOCATION POSITION TITLEPOSITION NUMBERCODEKXNJCEO34500A3100KXNJCEO34501A3200DXDLMGR42001A5600DXDLMGR42002A5700NXNLCHIEF23001A1200
Data Range: A1:E6
Sheet2
DEPARTMENTPOSITION NUMBERLOCATION POSITION TITLECODEKX34500ANJCEO3100KX34501ANJCEO9100DX42001ADLMGR5600DX42002ADLMGR5700NX23001ANLCHIEF1200
Data Range: A1:E6
What I need is a formula (Not a VBA), is to reconcile both sheet2 and sheet1 ensure that the codes appearing for each position number in sheet1 gets updated based on the codes for each position number appearing in sheet2. So, for instance, the code for pos #34501A should be changed from 3200 to 9100 in sheet1.
The only issue with sheet2, though, is that the column number for position number could be different each time new data gets copied into sheet2 (thought the header information stays the same). I know that it can be done via Vlookup if the place of the column doesn't change each time, but I just
How to locate the correct column and row in a range of cells to search and then extract information based on certain conditions.
Im trying to develop a formula that sequentially numbers in column a depending on if there is a value in column B
We have documents at work that have alot of text with random spacing between that needs a sequential reference number so would like the formula to be able to look at the value in column b and if its not blank add a number . I would like this number to be the previous cell above + 1
the formula ive started looks something like =if(B10""), ???????,""
can not get excel to reference cell the last cell above with data.
I have a single button on a spreadsheet. When clicked, it gives me Error 91: Object Variable or With Block Variable Not Set. This is the button's
Private Sub Analyze_Click()
Dim TextToLocate As String
Dim Searching As String
Dim TechNum As String
TextToLocate = "Mobile Device : "
Fname = Application. GetOpenFilename("@Road Excel Files,*.xls", , "Open @Road Log File")
Workbooks.Open (Fname)
' Error here at cells.find:
Searching = Cells.Find(What:=TextToLocate)
TechNum = Replace(Searching, TextToLocate, "")
TechNum = Left(TechNum, 5)
MsgBox TechNum
End Sub
The purpose of the code is to:Allow the user to open a log fileIn the newly opened log file, find the string "Mobile Device : "Following "Mobile Device : " is a tech number. Strip out "Mobile Device : " and grab the first 5 characters of the tech number.Show me what the tech number is in a message box
If I insert the code into the actual log file (no button and no opening of files), it works fine. I searched this forum and others and used everything I learned to find a solution, but the error remains.
When using 2013 Excel in the Home tab, line 1 is not visible. Using the File tab will show line one, but the Home title bar is unavailable. Toggling back and forth is not efficient. No one in this office has ever seen an Excel program not display a full page under the title bar in the Home tab.
View 1 Replies View RelatedI would like to create a macro which finds data from multiple worksheets and collates them in my Master Worksheet.
I am competent with a lot of functions with Excel, however I have never used Macro's before. I have a little bit of VB knowledge, but only the very basics. I will attempt to explain my situation as clearly as I can.
Please note in your response that I am not familiar with a lot of the programming jargon. I also do not know how to actually create (or is it record?) a macro.
Finally, before I dive into it, I would *prefer* not to have to add code to the closed worksheets, but I can do this if there is no other way!.......
I have a workbook with a master data list including member names, member locations, member phone numbers, and various items checked out or on loan to members. I then have multiple sheets breaking down the data for quick reference. So for example Name, Member #, Location, Phone, Item A, Item B, Item C, Item D etc... I need to be able to have all the Members that are in certain cities displayed in it's own worksheet. I have played with the aggregate function, if and functions,... and I am dying. This is for a motorcycle club to keep track of who has ordered what, how much they owe, how much they've spent etc.
View 1 Replies View RelatedI have a set of data with names in col A, Currency in col B, Amount in Col C. I want to convert all the amounts in NON-USD based on exchange rate I input daily into column D.
How do i search down the row for the next name that is denominated in GBP / YEN etc and keep converting until I dont find any more other currencies in it. I tried to improvise on the finding nth but couldnt get anything out of it. Have attached a spreadsheet.
I am having trouble setting up a query for a recordset that will list duplicates for an automated process to clean up. I am using Excel 2010 with Microsoft ActiveX Data Objects Recordset 6.0 Library and Microsoft ActiveX Data Objects 6.1 Library as references.
So far, I have chopped the query down to it's most basic elements and reassembled until it broke. Necessary pieces work well, but when I combine them, I get nowhere.
Here is the working simple query to retrieve a single row:
Code:
dupeSQL = "SELECT PSID FROM [Obstructed$] "
Here is the working single query to retrieve a count:
Code:
dupeSQL = "SELECT COUNT(PSID) As '" & "CountPSID" & "' " _
& "FROM [Obstructed$] "
When combined, I cannot figure out why it won't work:
Code:
dupeSQL = "SELECT [PSID], COUNT(PSID) As '" & "CountPSID" & "' " _
& "FROM [Obstructed$] "
Here is what I am trying to get to:
Code:
dupeSQL = "SELECT [PSID], COUNT(PSID) As '" & "CountPSID" & "' " _
& "FROM [Obstructed$] " _
& "WHERE COUNT(PSID) > 1 " _
& "GROUP BY PSID"
I can even work without the GROUP BY. I have also played with the HAVING clause to try and accommodate the [PSID] field, but have gotten nowhere.
I need to be able to locate some important columns in a table of raw data (the column locations are not fixed).
I would like to identify the locations (based on the heading values in Row 1) and store them as Public variables. The Match function works fine for this, however I'd like to make a simple loop to set these variables (opposed to repeating the function for each).
In the example below, I can't figure out how to reference "List1(Count)" as the name of the variable I'm trying to set.
Code:
Public Field1 As Long, Field2 As Long, Field3 As Long 'The column numbers will be stored here
Sub FindFields()
Dim List1(3), List2(3)
Dim Count As Long
'Public variables (declared above)
[Code] ......
So after running FindFields(), the Test1() macro should give "1 - 2 - 3" (for example) as the locations of the fields in Sheet1. But currently this doesn't work.