Record Extraction Using VBA And Web Query
Jun 12, 2014
Extracting a list from a webpage. I am using the following VBA code below. I've attached the worksheet to which it corresponds. This is the webpage I'm trying to pull from: [URL]
My problem is the website divides up all of the records in sets of 50 on different pages but uses the same URL. Therefore, my VBA code will only bring back the first 50 records for each group I am trying to extract. Do you know how to pull all of the records for each URL?
[Code] .......
JBT Ranking Automation.xlsm‎
View 3 Replies
ADVERTISEMENT
May 25, 2007
I seek advice on using the value of NOW() as a record ID in an address book program. Question #1: Do Excel developers often use a record ID? Question #2: What record ID schemes are fequently employed besides date/time? I have decided to create an Excel address book as an exercise to increase my knowledge of VBA, and also as a useful application for work.
I realize that a record ID is not essential in Excel in the way that it is essential in Access, but I feel the need to have some unique ID associated with each address, so that I may have different worksheets, with data related to a given Contact, sort and manipulate it, if necessary, but have the record ID as a way to restore the relationship of rows to a given Contact, and also, as a handy way to examine the data in the date/time sequence in which it was entered. I have experimented with the following code, to assure myself that I can access the number returned by the NOW() function, manipulate it as a string, and format in various ways if necessary.
Dim n As Double
n = Now()
sn = Str(n)
p = InStr(sn, ".")
first = Left(sn, (p - 1))
l = Len(sn)
d = l - p
S = Mid(sn, (p + 1), d)....................
View 2 Replies
View Related
Mar 16, 2014
I am creating an asset management sheet. For the formula I am trying to work out there uses 3 fields : ID, start date, and end date.
What I want to do is be able to show if the ID is duplicated within another record with an overlapping date. So an item is flagged if it is in the list within the same dates as another record. I tried a few countif formulas but with no success.. I may just be approaching the problem incorrectly though.
View 1 Replies
View Related
May 26, 2009
I am looking to create a macro that will create a new sheet when data is added on a summary sheet. Example.
1. Summary sheet called "Variations" contains columns that will contain the information needed for new sheet (Columns A to D)
2. When data is entered on "Variations" sheet: Column B, then macro automatically creates new sheet renamed to e.g. VO1 (Number used on "Variations" tab) and is a copy of "Master" tab.
3. Data entered in Column A to D on "Variations" tab is automatically entered onto new sheet created (e.g VO1). Shown is blue on attached file. Additional data is updated on "VO1" sheet and this then links back to "Variations" tab
View 6 Replies
View Related
Mar 20, 2009
I'm trying to find a macro that will run allowing the user to select a 'starting record number' and a 'finishing record number' when printing.
I have a spreadsheet that feeds from a master list in excel, from over 5000 records.
I need to print the s'sheet with any given indivdual record's information at any given time.
Individual prints are fine. However if I wanted to print from record number 1500 to record number 3000 it would take me all day.
Is there a way I can set up a macro so an option form pops up? allowing selection of "From record" and "to Record" ?
View 13 Replies
View Related
Nov 26, 2012
I have an MS Access query that contains a parameter. The parameter is a date field, and I have configured that in the Access query. If I run the query within the MS Access user interface, it prompts me for the paramater value as expected, and runs just fine. However, I want to connect to this query from within Excel as a data source.
I have created a connection to the Access file using ODBC from within Excel. In the MS Query window, I am merely selecting all of the fields resident in the MS Access query, and returning all values. In other words, there is no selection criteria in the MS Query. I have done this many times with Access queries that DO NOT contain a parameter, and everything works fine. However, in this instance, I need to pass a parameter through to MS Access in order for the query to run. At the moment, I get the "Too Few Paramaters...1 expected" error message. This makes sense, because I haven't figured out how to pass the paramater to MS Access.
Is there a way to structure this that does not involve VB code? If so, I'd love to know how. I have tried creating parameters in MS-Query with the same name, but although I get the prompt it doesn't connect with the Access query as the source for the parameter value.
If the solution requires using code, I'm good with VB Code in Excel...is there VB for Excel code that could make this happen?
Failing that, I guess there must be (I've seen a few in my search thus far) Access VB Code that can make this work. I'm very rusty using VB with Access, so this is my least favored solution. However, if this is the only option, keep in mind that I need to pass the paramater ultimately from a user who will initiate the process using Excel.
View 3 Replies
View Related
Mar 29, 2007
Need the query parameters which takes the date from the cell into the query. How should I modify my query if it needs to take the date from a cell?? The bold one date should be picked from one of the cell in sheet 2.
My query is this
WEB
1
http://fc-web-phl1-101.phl1:8090/gp/...runReport.y=12
Selection=15
Formatting=None
PreFormattedTextToColumns=True
ConsecutiveDelimitersAsOne=True
SingleBlockTextImport=False
DisableDateRecognition=False
DisableRedirections=False
View 2 Replies
View Related
Jan 6, 2007
Im trying to record a macro that will enter a formula in a cell each time I run the macro
Drop the Lowest2:
=IF(ISERROR(AVERAGE((SUM(C5:L5)-MIN(C5:L5)-SMALL(C5:L5,2))/(COUNT(C5:L5)-2))*Scale!$B$2*10),(IF(ISERROR(AVERAGE(C5:L5)*Scale!$B$2*10),"",AVERAGE(C5:L5)*Scale!$B$2*10)),AVERA GE((SUM(C5:L5)-MIN(C5:L5)-SMALL(C5:L5,2))/(COUNT(C5:L5)-2))*Scale!$B$2*10)
Drop Lowest1:
=IF(ISERROR(AVERAGE((SUM(C5:L5)-SMALL(C5:L5,1))/(COUNT(C5:L5)-1))*Scale!$B$2*10),(IF(ISERROR(AVERAGE(C5:L5)*Scale!$B$2*10),"",AVERAGE(C5:L5)*Scale!$B$2*10)),AVERA GE((SUM(C5:L5)-SMALL(C5:L5,1))/(COUNT(C5:L5)-1))*Scale!$B$2*10)
I know I can write the formula in a simpler way, but I was asked to make it like this.
The problem is that when I enter the formula in the cell while recording. I got a message: "Unable to record" so this part can't be recorded
View 14 Replies
View Related
Sep 1, 2009
This problem seemed to revolve around "digital signing" with further macro changes done from a different machine (without the proper certificate). Excel warns of the problem and then "unsigns" the project.
I've got a problem with spreadsheets that I've been working on. Now, when I tell it to record a macro, I get the macro name, shortcut assignment dialog box and then an error "Unable to record." After "Ok"ing that dialog box, the normal recording macro dialog comes up. Also, lo and behold, there will not be a macro recorded.
I've got no protected cells or sheets and it doesn't matter what security level is set. It is a "signed" macro but I can take off the signature and still have the problem. I checked for "Help - About" for deactivated modules and there was none.
View 2 Replies
View Related
Sep 6, 2008
I have a csv file on another drive on the network that i need to query. I believe that ms query would be the best way. I know that a DSN needs to be setup but this macro will be used by various users who wont know how to do that. thus I would like to create one via VBA every time the task needs to be run.
I haven't a clue how to do this and i need it to be explained to me in general terms with words of one syllable!
View 9 Replies
View Related
Jul 6, 2009
can anybody tell me how the get the name of a sheet as a string?
i have a formula using the name of a sheet and i dont want to leave it hardcoded.
ex:
=IF(ISERROR(MATCH(_02.07.2009!B6;(OFFSET(_01.07.2009!$B$5;0;0;COUNTA(_01.07.2009!$B:$B)-1;1));0));1;0)
i need that dates as variables. those are the names of the sheets im using.
View 10 Replies
View Related
Mar 11, 2008
I have an excel file with a large list of data in the following format, all the data is in the A column –
Mar 11: category one – process number one (1)
Mar 11: category two – process number two (2)
Mar 11: category three – process number three (3)
Mar 11: category four – process number four (4)
Mar 11: category five – process number five (5)
I would like to extract from the list, ONLY the data highlighted in red i.e. the process number data –
Mar 11: category one – process number one (1)
Mar 11: category two – process number two (2)
Mar 11: category three – process number three (3)
Mar 11: category four – process number four (4)
Mar 11: category five – process number five (5)
View 9 Replies
View Related
Mar 24, 2009
In cell A1 I have the text
20. Black Angel Blues (Sweet Black Angel) - Nighthawk, Robert
In cell B2 I would like all of the text from the period/full stop after '20' until the - hyphen character
In cell C2 I would like the text after the hypen, but if as in this case there is a surname followed by a first name I would like them rearranged so that the full name is shown first name followed surname without a comma.
The end result in this example would be:
B2
Black Angel Blues (Sweet Black Angel)
C2
Robert Nighthawk
View 9 Replies
View Related
Aug 3, 2006
I have the following code which I know is wrong:
Public Sub WeeksOfSupplyatInitial()
'get the Instore Date Week add 2 weeks, then extract from Weeks of Supply
'and return the value to cell D4
Dim result As Double
Dim firstRowTotal As Double
View 3 Replies
View Related
Oct 23, 2008
I have a folder on my drive that holds excel files, some of which I would like to extract data from, using an excel workbook outside the folder.
Can you assist me in achieiving this action? Or, direct me to literature that will have the answer?
View 6 Replies
View Related
Feb 18, 2014
I have a table similar to this
L M N O P Q
title1 title2 title3 0
12 5 0
0 23 0
13 1 0
453 1 0
I need a formula to get the following structure (without using macro):
A B C
title1 title2 title3
12 5 0
0 23 0
13 1 0
453 1 0
Attached File : ReturnNonblanks.xlsx‎
View 6 Replies
View Related
May 13, 2014
My column extraction requirements are:
Using the same file you posted we just need column list; when we press ctrl+z the box should come up and have only columns list showing up and buttons like "select all", reset, and cancel should be present.
In this column list all the column headers should be shown under the column list and the interface box(ctrl+z) should be movable like you have already done in the last post
The other condition is that if any new columns gets added anywhere in the first row of the sheet the user interface(ctrl+z box) should show it in column list so when selected it can be extracted to the output file.
In short every thing is similar to the previous file samplecopy v6.1.xlsm you posted but this time only column list is required and all the column headers under it and remove the note which is applicable to previous query.
View 7 Replies
View Related
Feb 4, 2010
I just wanted to ask whether the same code will work for many more sheets or will modification be needed? I have a very basic understanding of vba loops, so plz tell me did you check the entire row for being blank or specific cells? Im attaching a file which more closely resembles the data i work with, just tell me whether the previous macro called "ravi" will work fine or will it require modification.
View 12 Replies
View Related
Nov 15, 2011
There are websites available for data, but what is viable and crucial to me is finding a way to
1) Run a repeated process via a macro / vba script to allow for data input into the site
2) Once input into site, data is to be brought back into excel so that I can benchmark my product pricing vs my competition
There are 2 sites I am most interested in getting this information from specifically and although they do the same thing they have a couple of unique pros to them. they are the following
1) Findchips.com
2) eciaauthorized.com
The biggest pro to findchips.com is that they have a beta tool on their site that allows for "mass searches" to be performed as opposed to 1 part number at a time. Up to 100 results can be returned at a time, so although there would be multiple iterations doing it this way would save processing power as each step is not done line by line (p/n by p/n) as i could group them and send them and perform the operations that way.
View 9 Replies
View Related
Dec 14, 2011
From the website [URL] ....
I need the Name, Website and contact details. I tried to extract but there is no ID for the element.
Data from the above site is:
1 Name: Shopping da Midia
2. Website: It is a hyperlink of Shopping da Midia that is [URL] ......
3. Contact details:
Tel: 16 2101-2500
Av. Independencia , 192
CEP: 14010-210
Ribeireo Preto
E-mail: compras@cdvirgem.com.br
View 5 Replies
View Related
May 19, 2014
This table has one column with people's names, other columns with different things, and one with hours.
The figures will change every month, and my dad doesn't know crap about excel, so anything that he has to go put in equations or sort again every month or whatever, is not going to work. it needs to be so that all he has to do is plug in numbers.
It can be either one or two ways: either I need to pull out all the rows that have hours above a certain amount, and have them sitting to the side/under/above the main table in the same worksheet.
I realize that that may involve a long complicated formula, however.
Alternatively, we can have it so that all the rows with hours above a certain number are color coded at located at the top of the main table. I figured that one out with ease, HOWEVER I don't how to make that automatic, so that it does it by itself when the numbers are plugged in each month. My dad would not be able to handle sorting.
I need the hours that =0 color coded and put at the bottom if possible, it's not absolutely necessary, however. I could not figure out how to put the highest hours on top and the hours equaling 0 at the bottom, considering that all rowsthat fall in between need to be kept in alphabetical order.
View 9 Replies
View Related
Nov 13, 2009
I'm doing some simple data extraction, e.g.
A B
1 bob 3
2 mandy 4
3 charlie 6
4 dave 1
5 steve 5
So I had in c1 to c5 = =if(b1 > 3, a1,"") autofilled, which works fine, but I end up with,
gap
mandy
charlie
gap
steve
how would I get,
mandy
charlie
steve
also is it possible to have an if statement in 1 cell change the value of another cell?
e.g.
in a1
if(b1>5, c1="yes",c1="no"), can't seem to get it to work
View 14 Replies
View Related
Jul 3, 2013
I have 3 set of data representing 3 countries of data in 3 different spreadsheet.
I want to create a summary page and using a drop down list, when county is selected, corresponding data are extracted and fall into the template.
how can i do this ?
View 14 Replies
View Related
Jan 22, 2014
To start off macro should pick selected columns such as owners and their projects, start date, price Final price, priority and status columns and paste into new sheet
At the same time only pick selected owners(Dave, Brian, Ken, Russell, Ben)data along with their high low, and medium projects then format the price and the final price column (that is to first convert them to numbers, then change it to the currency format and set the decimal place to 0) and then sort owners (AtoZ) along with Price and final price columns (largest to smallest) into a new workbook and to a new sheet in the same workbook with a name to the sheet called Extracted data
note owners may change and new members might get included in the list ( I am not sure if something dynamically can be done about this in the macro)
I have included sample data and how the output should look like.
View 14 Replies
View Related
Jul 14, 2008
I'm trying to determine a way to populate a listbox with the contents of a few cells full of vblf-delimited information.
It's almost working properly, but placing the first entry in the target cells last in the listbox and have no idea why it's behaving this way.
View 9 Replies
View Related
Dec 24, 2011
Examples of content of two cells are:
50.20283625183448da
1195.368480208458hr
where the right alpha characters always count two.
I need the left number as a Double and the right two characters as String (or ?) to compare with Array("mn","da","yr") etc to determine the index I don't know how to write the code.
View 2 Replies
View Related
May 4, 2012
I recorder a macro while extracting a text file into a workbook. I had chosen delimited format and OtherChar as "|". Along with these i have also chosen the first field format as text
But where is the text format chossing portion in the below recorder code? i am able to figure out only the delimited and OtherChar part
Sub test()
Workbooks.OpenText Filename:="C:UserskkumarDesktop26 BOMs10086043.txt", _
Origin:=437, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False _
, Comma:=False, Space:=False, Other:=True, OtherChar:="|", FieldInfo _
:=Array(Array(1, 2), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1 _
), Array(14, 1), Array(15, 1), Array(16, 1)), TrailingMinusNumbers:=True
Windows("Book1").Activate
End Sub
View 6 Replies
View Related
Nov 21, 2012
I have following data on my excel sheet.
man
man
man
man ....
john
john
john
john ......
10 man cells are there, and 20 john cells are there.
I need 10% of this data.
It means 1 man, 2 john.
View 3 Replies
View Related
Feb 12, 2013
I have a comment that I'm putting into a variable for the purpose of obtaining the persons name.
Cell C3 (in this example) just contains their employee number, but it's comment contains...
Tech ID: 123456
Name: John Doe
The Tech ID is variable from 3 chars to 6 chars and obviously the name is size is also variable. The end result will be a variable with just the persons first and last name extracted from the comment.
Code:
Dim mycmt As String
Dim techname As String
mycmt = Sheets("tech").Cells(3, "C").Comment.Text
techname = Right(mycmt, BIG-OLE-BALL-OF-CONFUSION)
MsgBox techname
My 2nd question. This is the 3rd time in recent days that I've needed a partial string and Mid, Left, Right, Len, Find just boggles my mind.
View 6 Replies
View Related
Jun 16, 2014
I am trying to use the string (sPath), I previously define to preform a saveas function after the script runs.
Code:
Sub CombineSheets()
Dim sPath As String
Dim sFname As String
Dim wBk As Workbook
Dim wSht As Variant
Application.EnableEvents = False
Application.ScreenUpdating = False
[Code] .......
These reports are always located in a subfolder defined as "D:DropboxWorkVerification Reportslocation name" where location name is the name that I want to use to save the workbook.
So as an example an excel workbook report generated in the folder:
"D:DropboxWorkVerification Reports!Test"
Would be saved as "!AirCheck AutoTest Report - !Test.xls"
or a report in the folder:
"D:DropboxWorkVerification ReportsHoliday Inn Surfside"
would be saved as: "!AirCheck AutoTest Report -Holiday Inn Surfside.xls"
Right now the code I guessed on isn't working and its generating an error on compile "Can't assign to read-only property".
View 7 Replies
View Related
