Extracting Data From Wall Street Journal Using VBA?
Jun 15, 2014
I am trying to create a excel file that takes information off the website (AAPL Annual Income Statement - Apple Inc. Annual Financials) based on a stock name I enter in the first excel sheet. So when I type in the stock name, and click on the Search button (runs the VBA program) i created, it will search on the website for that stock and retrieve the 5 years financial data. How can I incorporate web query function in it?
Sub AddNewWorksheet()
Dim Val As String
Val = Sheets(1).Range("B4").Value
Sheets.Add
ActiveSheet.Name = Val
ActiveSheet.Move after:=Sheets(4)
End Sub
Transaction #Transaction DescriptionAccountDate (XX/XX/XX)DesciptionABCDEFG10/24/2015Cash Held(3404.00)3404.00 0.00 0.00 50.00 0.00 (50.00)10/25/20152Cash not Held0.00 (9707.00)9707.00 0.00 (60.00)60.00 0.00 10/26/2015Cash Held0.00 (7402.00)0.00 7402.00 0.00 0.00 0.00 10/27/20154Transfer to Bank 0.04 0.00 (50.04)0.00 50.00 0.00 0.00 10/28/20155Transfer of Cash0.00 4208.00 0.00 (4208.00)0.00 0.00 0.00
I am trying to make a macro that will turn transpose the above data into the below data.
DateDescriptionAccountAmount10/24/2015Cash HeldA-340410/24/2015Cash HeldB340410/24/2015Cash HeldE5010/24/2015Cash HeldG-5010/25/2015#2 Cash not HeldB-970710/25/2015#2 Cash not HeldC970710/25/2015#2 Cash not HeldE-6010/25/2015#2 Cash not HeldF6010/26/2015Cash HeldE-740210/26/2015Cash HeldG7402
Basically each non-zero number in the accounts (A through G) need to have their own row with the account name from their appropriate column and the date and description in their appropriate row. So as you can see each account A,B,E,and G get the amount -3404, 3404, 50, and -50 in their own row and get the appropriate descipion of 'Cash Held' and Date '10/24/2015'. Then the macro would move onto the next row and do the same thing.
Also if there is a way to tack in front of the description the transaction # (if there is one) ie. #2 Cash not Held. I really don't even know where to start.
I'm a keen football fan and have created a World Cup Wallchart in Excel. It's free and can be downloaded from here.
I've just created it so let me know of any bugs or comments - I'd be keen to know what you think. Only 51 days to go
Features: Each country has their flag displayed for the matches and the group tables. A map of Germany is displayed by the matches. When you select the row for the match the row will be highlighted and the city where the match is being played will be coloured red in the map.
The Match Schedule sheet will automatically scroll if your selected row is matchday 33+ and the map will move down
After the scores for a match have been entered the group tables will be updated and sorted by Points, Goal Difference then Goals For.
After each group is complete (i.e. the 6 matches for the group have been played) the round of 16 team names will begin to appear in the match day list.
If there is a tie after extra time in the knockout stages (match day 49 onwards) a box will appear asking you to enter the results of the penalty shootout.
Installation: Download the World Cup zip file.
Unzip the contents of the zip file to a folder. Note that the Excel file and the image files must be retained in the same folder.
Open the Excel file and select the Enable Macros button. If the Enable Macros button doesn't appear select Tools|Macro Security and amend the security level to Medium then close Excel and re-open the file
I have a directory folder with an active workbook and another workbook id like to copy data from. The Following macro opens up a file in the same directory, copies some data and pastes it in the active workbook. However with this code I have to specify the filename, 'Data.xlsm' in the example code. I would like it to copy data from the only other workbook in the current directory WITHOUT having to specify the name in the code, so just opening it up no matter what filename it has.
In addition I would like to extract the filename from the workbook im copying data from and paste it into the activewoorkbook in sheet 1 Cell A1. I had a look at getopenfilename function but cant seem to make it work for my purpose.
I have an excel sheet i would like to make into a journal. I would like to make a page for each day of the year. I want to duplex print it, but i cant seem to do it directly from excel would it be possible just to make the file into a pdf?
Here is the macro i was trying:
Sub ghgh() Dim i As Long, temp As String temp = InputBox("Enter date") If Not IsDate(temp) Then Exit Sub For i = 0 To 2
[Code] ....
Trouble is it only does one page at a time, so i cant duplex print.
I am trying to create this macro for my accounting journal What I want to happen is that in my sheet1 if the 1st cell in column a is "CASH" then the whole row should be copied and pasted in sheet 2. i want this to happen from the first cell in a column until the very last data in column a which means i am not certain up to what row number it will have data since this is a journal with uncertain number of transactions.
1) When using the command below, how can I determine what the "XYZ" component could be. I see plenty of examples of it being used to start a MS Word session or Powerpoint but I'd really like to see a definitive list.
At the moment, I'm not even sure what to type into Google that describes this part of the command's argument.
Set target = CreateObject("XYZ.Application")
2) I'm just a frightened noob on this site and I tried to follow the advice on bumping my previous post on this subject, having altered my plea. All I got was a telling-off for being a double-poster and my old old thread sat where it was despite my 'Bump' command. Do you have to have at least one reply before your thread moves?
I'm completely new with macros. I was wondering what you would need so that the information will automatically update itself onto a summary page. For example for entries on one worksheet to create a statement on another worksheet?
Example: Asset Type Description Date Amount OA
[Code]....
The first entry doesn't have a date, because the asset type is classified as OA. (therefore an exception) Each of this information will be linked to it's own worksheet. For example, the OA entries would create their own sheet which will summed.
Sheet1, Column3 is filled with property addresses, if available (some are blank). I need two columns on Sheet2, Column3 needs to be the street number and Column4 needs to be the street name.
Because it is not 'fixed length', I can't use 'RIGHT' or 'LEFT'
I have attached a sample file. There is other data/information on the sheet, but I can process the rest without help. I will be moving: Sheet1, Column1 to Sheet2, Column2 Sheet1, Column2 to Sheet2, Column1 Sheet1, Column3 to...as described above...
I have an address field that is concatenated as such that the city name is attached to the end of the street name as follows:
4 Example WayOakland, CA 94601
I have over 200 of these with different addresses and cities in my workbook so it's not always the same length. How can I grab the city out of this string? Is there a way to key on the capital letter of the city? Or is there another way?
When entering addresses in column G, need VBA Sheet Code to extract: 1 numbers of P. O. Box & Street & put in column K of the same row 2 words P. O. Box & Street Names & put in column L of the same row.
The pound sign is always used for the apartment number, etc, after the street name. For Example:
______G______|__K_|___L____ 141 Radio #181 | 141 | Radio P. O. Box 4932 | 4932| P. O. Box 102 E Arlington | 102 | E Arlington
I have a list of street addresses. I want to alphabetize them. I just want to remove all the text (usually just numbers but not always) up to and including the first space only.
I would like to be able to take an address like 18387 S 113Th W Ave and return it as 18387 South 113th West Avenue. I am a slightly familiar with lookup formulas, but I have not had any luck making this work.
I have an address list of 64,000 entries that I want to geo-code (the geo-coding isn't the problem...). A large % of addresses don't have street numbers and this just gives a general position based on the Post/ Zip code which isn't accurate enough - it needs to have an actual street number. I want to extract all of the addresses without a street number so I can cross check them with something else (not an Excel problem). Trouble is some of the street numbers are embedded in a string - might be a multiple NOT problem. Attached a sample file...
I found out a way to get rid of the street number from an address, but I would like the street and apartment number removed. Right now I have various formats:
10/05/0808:30:00 AMValid Card EntryLamDoor 1 10/05/0808:31:00 AMDoor Leave Open Door 1 10/05/0808:32:00 AMDoor Closed Door 1 10/05/0808:41:00 AMValid Card Exit Yap Door 1 10/05/0808:46:00 AMValid Card Exit Lam Door 2 10/05/0809:14:00 AMValid Card EntryLam Door 2 10/05/0810:18:00 AMValid Card Exit Lam Door 2 10/05/0810:19:00 AMValid Card Entry Yap Door 1 10/05/0810:40:00 AMValid Card Exit Yap Door 1 10/05/0810:42:00 AMValid Card EntryLamDoor 2 11/05/0808:30:00 AMValid Card EntryLamDoor 2 11/05/0808:20:00 AMValid Card EntryYapDoor 1 11/05/0810:20:00 AMValid Card Exit Lam Door 1 11/05/0811:40:00 AMValid Card Exit Yap Door 1
the above is the data i need to work with (dates are in dd/mm/yy). i need to find a way (a macro, preferably) to extract the date and time corresponding to one person, and paste it into a new sheet, e.g. at sheet 2 (renamed to "lam") should be
10/05/0808:30:00 AM 11/05/0808:30:00 AM 10/05/0808:46:00 AM 11/05/0810:20:00 AM 10/05/0809:14:00 AM 10/05/0810:18:00 AM 10/05/0810:42:00 AM
I have a spreadsheet full of data and I need to extract only those lines of data which can be identified by the last three letters in a cell. I am adding an example spreadsheet which highlights the rows I am trying to extract based on the contents in column B but only where column B ends in KY.
I have two exported lists of data to compare from my newsletter program. One is the list of email addresses that I sent the newsletter to and the other is a list of the bounced email addresses.
Question: How can I extract the bounced emails from the list of sent email addresses? In other words I want a list of clean, sendable email addresses.
I looked at the source code of the website and realized that if you notice (above) that the variables listed in the link (i.e year, month, day) are exactly what i need to change in order to get the data for a specific date. how can I accomplish this using VBA. so say I have in on an excel sheet year in column A, month in column B, and days in column C (time interval is constant so we don't have to worry about stime and etime). and i run the macro and it loops through each row taking year,month,day for all rows and saving the data as .csv or xls files?
I have created a table of data with Serial No, Name, Age & Common Friends field. Now i need to extract all the data (complete Row item) where the condition matches a certain criteria. Basically a formula or function which will say what are the names of people along with all other corresponding fields (Age & Common friends) who have common friends as "Jill" or "Jack" (For example). Note : I cannot use filter option and copy/paste the filtered data in new sheet as i am working with thousands of data items. Due to the nature of report software/data extraction report, multiple data items appear in single cell only (Multiple friends name appear in single cell).
I have a problem with VLOOKUP not extracting the data I need from 1 workbook.
I want to populate 4 different sheets in the "108" workbook with data from the "1st" workbook. I've uploaded the workbooks to show the formulas I have already. The data in "1st" workbook changes daily and can have upwards of 2000 rows. I've simplified the list for the example.
In the "108" workbook I want to fill in the first three columns with the formula down to about row 500.
I've tried different formulas to do this using EXACT, MATCH, and VLOOKUP but to no avail.
I have a table of data on 20 employee performance stats for my department. It is in the format of col A names and corresponding values for multiple skills and performance data from Col B to M in rows. I have a worksheet for each employee within the workbook. What I would like to do is to be able to extract the individual row of data to each employee sheet. I have played with OFFSET but can't get it to work other than in a column..
I have table that has a list of agents (Colum B) and then corresponding appraisal dates; 3 Month (Colum C), 6 month (Colum D) and annual (Colum e).
What I would like to be able to do it to have something that looks at the table and tells me all the 'appraisals' that are due the same month we are in, and the date that it is due, as well as the 'agent' that is due the apprisal.
I have played with the INDEX MATCH formulas and also pivot tables but have not found a solution, is it something that is going to require VBA or is there a simpler solution?
Let's say 1 Feb starts on week 5, 1 Mar starts on week 9 and 1 Apr starts on week 14. As such, feb has 4 weeks and march has 5 weeks. I have a spreadsheet of data on a weekly basis, and i want the data from week 5 to week 8 to be under feb and data from week 9 to week 13 to be under march. The data is to make a graph. Is is possible for excel to be linked to the calander so as to detect which month has 4 weeks and which month has 5, depending on the 1st of each month?
