List Of Web Site Queries
Apr 7, 2009i have 306 web pages listed in sheet 1, A1:A306
how can i get a macro to open each and scrape a piece of info from each, and then store in a row in sheet 2?
i have 306 web pages listed in sheet 1, A1:A306
how can i get a macro to open each and scrape a piece of info from each, and then store in a row in sheet 2?
Can anyone explain how to name a chart? I've been accessing charts in my VBA scripts using chart names, e.g. "Chart 4". I've been determining the chart name by recording a macro and selecting the charts. But, is there a way to either:
1- change the name of a chart (as you would name a pivot table)
2- determine the name without having to select the chart in a recorded macro
3- reference multiple charts from the same worksheet without using their names
I have the following code, saving created files to a local network. I need to change the save location to an FTP site (with username and password). Is this possible/How do I do this?
Sub Filter()
Dim name As Object
Application. ScreenUpdating = False
Application.DisplayAlerts = False
ActiveSheet. Unprotect Password:="letmein"
MYCOUNTER = 100
I have a master workbook called "BoM count" which I would like to have capture all the materials used on site. This info has already been captured on the workbook "Survey of materials used on site" (There are losts of these, 1 per site)
I want to open the survey within the BoM count workbook and pull out the relivant numbers of materials used and also list the site ID to show that, that survey has been completed.
I have a some problem with connecting between VBA Excel and web site.
I wrote a macro to insert the data from excel but there is one problem with displaying the correct view.
I use this site to get the price of the bonds:
[url]
it is the site of russian exchange
First of all I write the ISIN code, for example RU000A0E6X12, in the "Quote Search" field and then press Enter for getting the data. After it I can choose the History information or Online from the last field in the left margin. I want to chose "History" and after it the dates from and till are appearing automatically. The automatization of it is my task. And I have only one problem in the end.
The program:
I have tried to search these forms for some information on how to have VBA code check a file saved in an FTP site. I am hoping to use this file to contain version information where the workbook code will compare the version of the workbook to the version log saved in a text file on an FTP server. If they are different, I would like a pop up window to appear that notifies the user that there is a new file available, and perhaps a prompt to save that new file to the user's computer (it does not need to update and replace current workbook).
Is it possible to have VBA check an FTP site for this if I put the username and password in the code?
I have the vacation sheet so I can track my vacation hours used and available. The last thing I need is a way to count the number of days I'm not at my site. It doesn't matter why (Training, Holiday, Travel or Vacation) I need to track total days of site.
View 4 Replies View RelatedI am working on a spreadsheet that hits an external site. My questions is, I need to hit the site about 80 times becuase I search for different info. It there a way to get the vba to go down a list 80 of names rather than me entering the vba code 80 times with the different names?
Is it possible to open a file on an FTP site using VBA?
I've tried using the code below but it asks for a username and password even though it is in the code.
Workbooks.OpenText Filename:="ftp://username:password@ipaddress/ste1.txt", Origin:=xlWindows, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(0, 1)
I am trying to create a spreadsheet to record the amount of cars in a car park at any one time.
I have created a basic sheet with columns for car/reg/visiting and a drop down box for time in and time out (both done using validation lists) and a duration column that calculates the time between in and out.
What I am looking to do is create something that tells me how many cars are onsite at any one time, taking into consideration what time cars come and go.
Then from this I am looking to produce a chart with axis of to time/cars.
I've created a VBA-Form to import csv files into a spreadsheet.
Problem is IT have moved them to a secure server, and i've been given FTP Access to this server: \00.0.00.0folderfolder.
I have a module which can locate a folder and count how many csv files are in that directory. Problem is if i put in the ftp address it doesnt connect because i need to login via the RUN window, by putting the FTp address then entering my userID and password.
Is there anyway i can bring up this dialog box without using the RUN window. i've attached a spreadsheet with a screen dump of the dialog box
I am trying to fine an easy way to sort the attached spread sheet. it is a down load from our supplier which has a lot af data that i am not interesed in the only ones i need are columns description (r) and units (o) and name (g).
I am wanting to split each waste i.e oil fitters, acid batteries etc and each site so that the total amount each site has returned can be tabled ,so that i can create graphs showing who has/ has not return their waste steams.
I am using a vlookup formula to a series of data sets. I am trying to get something so that it will display the relevant score for that site. However the lists are not the same size, how do i get a vlookup to read a score for a site if it is the the array but display "0" if the site name is not in the array?
It is coming up with #N/A and I can't do anything with that.
The following code works great:
VB:
Sub send_to_UCC()
Dim upcCode
Dim myTextField As Object
[Code] .....
But when the following code for a different page, does not work.
VB:
Sub send_to_UCC2()
Dim upcCode
Dim myTextField As Object
[Code] .....
Everything is the same except the URL and the textbox name.
I've attached a sample workbook. Data Table 2 on the Data Tables sheet is what I'm after. Basically I have a formula that sums up quantity 1 (Q1) and quantity 2 (Q2) for all widgets at a site name and month. So for example, go down through column site name and column month and add up all of Q1 for site1 in the month of Jun 2014 (all widgets). This works but it shows duplicate totals which makes sense as there are mutliple widget types at each site. I think the example workbook explains it better. Note the Pivot Table sheet is an example of what I'm showing currently and what I'd like to show. While I understand that depending on how I set up the Pivot Table I can get similar results using either Table 1 or Table 2 but the other thing is that my users like to do some filtering of the data sheet itself without regard to the Pivot Tables.
sum quantity and show total for each site.xlsx
import data from a website that requires a login/password (no login page, it pops up in a separate window like when trying to log onto an FTP).
I've got the login/password, and it's a simple call to the page to import it, but each time it asks me to authenticate when connecting (get the "Windows Security" popup asking me to authenticate).
Even when I select "Remember my credentials", it doesn't seem to, and so every time I end up having to manually hit enter to get by it.
Is there any way to pass the login/password information via VBA, or to get the "remember my credentials" to stick?
I have a website (National Lacrosse League - 2013 Regular Season - Standings), that I want to pull information off and automatically into Excel.
I have been using web queries on other websites, and they have worked beautifully, however the tables that I want aren't recognised by the web query wizard (no yellow/black arrows). I can import the whole page through a query, however that's not really practical.
Is there a way I can import just specific tables on this site?? I'd like both the 'east' and 'west' tables.
The following code works great:
Sub send_to_UCC()
Dim upcCode
Dim myTextField As Object
upcCode = "0001234512345"
Set appIE = CreateObject("INTERNETEXPLORER.APPLICATION")
appIE.navigate "http://directory.gs1.org/gtin"
appIE.Visible = True
Do While appIE.busy
DoEvents
Loop
With appIE
Set myTextField = .Document.all.Item("queryByGtin_key")
myTextField.Value = upcCode
End With
Set myTextField = Nothing
End Sub...........................
Everything is the same except the URL and the textbox name.
Cell A1 value is: www.yahoo.com B1 Value should automatically show "Possible"
Cell A1 value is: www.icallindia.net B1 Value should automatically show "Possible"
Cell A1 value is: www.jigarparekh.html B1 Value should automatically show "notvalid"
I need a formula which can automatically see the status of the website address and updated in B column. which means that one dose not need to go to the website page to see if it is correct or not.
I have lot of website in the one sheet and i don't want to go all this website and check if they are correct. I want the status of this website in b column once when i have the website name already in the A column.
We have a list of around 800 clients containing client id, name and e-mail and i need to add contract number. I can only get the contract number by accessing the admin (password-protected) using a URL that looks like this admin/index.php?client=id.
Problems:
1. if i use the From Web option in excel's data tab, i get the entire table not just the needed cell
2. if i get the data using the above mentioned option, i can only do it from one client at a time
Is there any way to have a web query stay connected and get live data from a site while still being able to use excel at the same time?
Basically the site has information that changes by the second and i need to keep a running record of it, and when it hits the variables needed i want to be able to trigger a set of code.
I've got a basic spreadsheet that I edit at home and at work, and I am always forgetting to either email it to myself or copy it to a flash drive. So I figure I'll use my ISPs webspace given to me, and then just edit it on the ftp site from home and work so there is just one copy. I can add the ftp site and my name and password in Excel fine. BUT when I open it, it is always read only. How do I open it with write access? I have specified my ftp username and password in Excel.
View 2 Replies View RelatedTrying to write an IF query looking for multiple returns that would equal the same result.
I have a series of number where the last digit would result in the same return if the digit were 1 or 6, 2 or 7, 3 or 8, etc.
1 or 6 = 1
2 or 7 = 2
I have been trying unsuccessfully to combine the IF and OR queries
I'm currently working on a side project for work that I believe will save many man hours as at the moment we're using paper and calculators!!! I'm scheduling buys. I've worked out formulas and formats to show how much we should buy and how they should be split (for example for UK purchases we buy x amount and split it 10% 90%). However, the dates of delivery are different. See below:
PORT L'poolPORT HKPORT Portsmouth
1.113-Aug-1206-Aug-1230-Jul-12
1.210-Sep-1203-Sep-1227-Aug-12
2.103-Sep-1227-Aug-1220-Aug-12
2.201-Oct-1224-Sep-1217-Sep-12
3.124-Sep-1217-Sep-1210-Sep-12
3.222-Oct-1215-Oct-1208-Oct-12
Campaign 1 first buy (1.1) I know that my product is sailing from port HK. Therefore I want it that in the 'delivery date' cell, it returns 6/aug/12 (that's the first lot of 10%, and underneath it returns 3/sep/12) which the remaining 90%...2.2).
However, both the campaign number AND port options are variable (using a data validation drop down list). In effect meaning if I choose campaign 2 instead of campaign one, it'll return the dates 27/aug and 24 sep....if I then change the port to Portsmouth, the dates will be 20 aug and 17 sep.
I've attached a quick view of the schedule I've created. The yellow cells are where I want the dates to be returned.
ScheduleEX.jpg
I have a program that uses a query to grab data from overseas. I have an issue where some precision is apparently lost and I was curious if there was a way around this.
As an example of what is going on I have a specific piece of data I am tracking. The value is 14.9 in the SQL database and it's datatype there is a real of length 4. After grabbing this item from the query I checked the record set and the value is still 14.9. After it reaches the worksheet though it is displayed as 14.89999962. The destination cell is currently formatted as General but I have tried Text as well. Both produce the same results. As this tool is very general I would not have it formatted as a number as I don't know what I am getting back exactly.
I know computers store real/single values inprecisely but I see it everywhere else as 14.9. I would think Excel would display what I am seeing. Is there anyway around this short of formatting the cell as number with 1 decimal place?
The report is a "template" that will be ran once a month every month and will look back at the previous month's data. What i've invisioned is writing a vb script to load on workbook open asking various questions via "inputbox()" method.
SET NOCOUNT ON
DECLARE @StartDate DateTime
DECLARE @EndDate DateTime
SET @StartDate = '20070731 10:10:51.450'
SET @EndDate = '20070731 10:11:51.450'
SET ROWCOUNT 100
SET NOCOUNT OFF
SELECT EventTagName = EventHistory.TagName, Value
FROM EventHistory
INNER JOIN AnalogSnapshot ON EventHistory.EventLogKey = AnalogSnapshot.EventLogKey
INNER JOIN SnapshotTag ON SnapshotTag.SnapshotTagKey = AnalogSnapshot.SnapshotTagKey
WHERE SnapshotTag.TagName IN ('SysSpaceMain')
AND DateTime >= @StartDate
AND DateTime
I'm trying to produce a spreadsheet that pulls infomation from different web pages throughout the day. It needs to pull quite a large amount of information from different web pages hence I wanted to produce a subroutine which could be called with different variables for each web page, i.e. url, field, destination, etc.
To actually produce the query I recorded a macro and then used the code it produced. I then changed the URL to url, a string variable which holds the urls of the pages. The destion address was changed to destination, a range variable to store the destionation location, and the webTable was changed to table also a string variable to store the table number. This is shown below.
With ActiveSheet.QueryTables.Add(Connection:= _
url, Destination:= destination)
.Name = "q?s=%5EFTSE&m=L_137"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True.............................
I want know how to pass a parameter through a cell for date in the following url
http://fc-web-phl1-101.phl1:8090/gp/...runReport.y=10
Fabrication and Site Visit in Budget/Spend Analysis - Budget, not pulling through information from drop down boxes - in both cost type columns (they dont seem to be active any more either, not sure what I have done there!
View 1 Replies View RelatedMy question is about webqueries... specifically how to set up a query that will automatically fetch data on different pages (same data, but includes page 2, page 3, page 4, etc )
I've just figured out how to import a "new web query," but it seems like I won't be able to import 63 pages of it unless I do all of them by hand.