I have two tables that pull data from two different SQL tables via an ODBC connection and refresh every 5 minutes. The table headers etc are all identical (it is support call information FYI) but what I want to do is display those tables as one as opposed to two seperate tables - can this be done relatively easily and hopefully without the use of VBA? (Unless anyone is willing to provide the code of course!!)
View 9 Replies
Using Excel 2010. I'm writing a macro that sets up a workbook to be used for estimating at the beginning of a project. In the code I need to create multiple tables (formerly known as "lists") in the workbook. Then later in the code I need to refer back to those newly created tables. Currently, the code that creates the table is part of a loop that creates the table on many different worksheets. The problem of course, is that I have to name the Table, and then it won't create a table of the same name on the next sheet. Then, later in the code, I need to make adjustments to the table that was just created before looping to the next sheet.
Is there a way to create a table without giving it a constant name? Or by giving it a name that builds off of other info in the sheet? For example, I would be good with the naming the table after the sheet name: "Sheet1_Table" or such.
Code:
Sub Auto_Open()
'
Dim sht As Worksheet
If Range("A1") = 1 Then
[Code].....
I wanted to know how to download live data (stock data from a a website) through VBA.
View 1 Replies View RelatedI have a cell (for example, "A1") which is inserted with a WINROS formula to retrieve some data into my spreadsheet. And it is running live at all time.
Actually, I can't think of any formulas to capture the value from cell "A1" to "B1". Because I do not want the value that I captured into cell "B1" running live. I just want the value "B1" fixed after captured.
I'd like to log live update data continuously,i.e. as the data in the cell changes. The problem I'm facing is that the data comes in at uneven intervals-- ranging from 30 to 50 ticks per second. So I can't really use a timer function. I need to use some function which saves the data as the cell value changes. So, for example, if cell A1 gets updated continuously, cell B1 could save the first value of A1 and then cell B2 could save the second value of cell A1-- and so forth.
I am looking to get a Live Clock changing every minute..
Lets say I put the Total Time in the Cell A2 = 15 minutes and I have a Command Button next to it "Start"..
On the Click Event I want the Actual Time time-stamped at that moment in the Cell A3 and in Cell A4 the Time should keep on Ticking...
Can someone attach a file in Windows 2003 i.e .xls format and also explain the code if possible.
I know that Excel has a function to import currnecy rates from the MSN Money web site. But MSN Money doesn't support all currencies. I would like to build an excel sheet where a user can maintain the currency codes and the currency rate is being fetched from the internet. Does anybody have a suggestion from where I could get currency rates into Excel?
View 9 Replies View RelatedI have a spreadsheet set up in the following way;
Excel Sheet Set Up.JPG
What I'm trying to replicate in column A is similar to the live bullet point numbering that can be found in Word documents where if a line is deleted the section numbering (think bullet points in Word) automatically fall into line and update i.e what was 1.4 automatically becomes 1.3 and so on.
So far I've tried the simple formula of = cell above +0.1 which works fine until i have to remove lines.
eg having a live rate of intrest or exchange rate from the internet that is updated live whenever you load up excel and you are connceted to the intenet.
View 14 Replies View RelatedI am not good at excel. I would like to split buy and sell orders from the live feed and updating when new feeds come in.
LIVE FEED
BUY/SELLQTYPRICE BUY QTY PRICESELL QTY PRICE
B 4150
S 6200
S 4300 CHANGE TO
B 3350 B 4 150
B 2180 B 3 350 S 6 200
S 2220 B 2 180 S 4 300
B 1120 B 1 120 S 2 220
I work with different currencies in my company, now I would to get an up to date state of the cask book. So I have $250, and 500EUR, now I want a formula (connecting to internet) that automatically multiplies the $250 with the current exchange rate, so I know how much I have in Euros in total.
View 5 Replies View Relatedi try create formula or macro, which will search in data during writing in cell.
F.e. i have column
A
1 dano black
2 dodo red
3 phil blue
4 black jack
I want something, what will be look in this column "A" up, during my writting in cell B1 and show results in C1. When i write „b“, it will show in B1 „dano black“, if i add „l“ (it will be written „bl“), it shown again „dano black“. If i add „u“ (it will be written „blu“) , it shows „phil blue“
I'm attempting to remove erroneous noise from a list of data by removing 20% of the highest numbers in that list.
For example: I have 2000 pieces of data, summed. when a new piece of data is added, the last one drops off. This is a rolling sum. When seen on a graph, there are occasional spikes of erroneous readings, causing large fluctuations in the graph. Of the total 2000 peices of data, I want to find and remove the highest 20% (400) of them, leaving behind 80%. Removing those erroneous spikes would show a softer version of the original data when looked at in a graph.
This needs to be done in such a way as to allow me to do it continuously. If I add live data points, I want to be able to find and remove the highest 20% automatically, or by copying the contents of this cell.
I've got a function called countcolor (which I take no credit for) which counts a particular color in a range.
---------------------------------------------------------------------
Function CountColor(rColor As Range, rSumRange As Range)
Dim rCell As Range
Dim iCol As Integer
Dim vResult
iCol = rColor.Interior.ColorIndex
For Each rCell In rSumRange
If rCell.Interior.ColorIndex = iCol Then
vResult = vResult + 1
End If
Next rCell
CountColor = vResult
End Function
I have then set up a couple of macros which, when ran, fills a range of cells with a particular color. These colors are closely related but as you can see from the two macros below they ARE different. I'm finding my countcolor function is counting them twice though even though as you can see the color values are different.....
---------------------------------------------------------------------------
Sub pegcharged()
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 25600...........................
I have set an excel spreadsheet set up to update live data from a URL every 5 minutes. However I am wanting to do try and save a bit of time if possible.
Basically I am monitoring horses bought on a game website. Each horse has the same URL except for the number at the end which goes up in 1 increments. The URL is already set up and when the horse is bought it changes from being blank to having the horses details etc.
At the minute I am able to autofill cells with each uinique URL using fill, then series menu. This is so I dont have to manually enter each URL, as hundreds may be bought each day so it would take too long to do this.
My question is this, am i able to have a automatic series linked to the 'data from web' function in data tab, instead of having to manually adjusting each URL for each individual horse.
How To Connect Live Data in an Excel Sheet?
I want to track changes in some Stocks, I have made a sample file in Excel and would like to make it Live by Connecting it to a website..
However, I do not know how to go about the same?Can some please provide some examples as well as a File if possible explaining how it was done..
Here's all I'd like to do~I'm a small business owner and I need to create an excel list of potential work contacts. The contacts are listed on a web page like this
aerographics Los Angeles 310. 240. 3308
Now, on the web page if you click on aerographics it takes you to the website. I'd like to copy and paste those same three entries from the webpage in to an excel sheet~and be able to click on aerographics and have it take me to the site. I searched this site and couldn't find the problem replicated. I've tried paste special~it formats the entries I want as URL's, but when I click on them nothing happens. I can type www.googl.com in to a cell and it instantly works as a link. And I have about 500 of this type entry/copy and paste to do so making a hyperlink is impractical.
Running excel 2002, windows vista (some machines on network are running xp). I have a spreadsheet that I want to be able to edit from all computers on the network so that it shows real time changes on all PC's.
It would be like using google docs, I can't use google docs because my file size is 2.5MB and it is too much for it.
I need a forex excel spreadsheet that shows me the last 60 min of usd/jpy in real-time. It has to update every 60 minutes automatically.
View 1 Replies View Related I need to calculate how much time I've got left before the earliest order needs to be despatched (it might be 2 or more on every day). This wouldn't be a problem if orders would be placed daily. But for every item it varies. For example: for "X" product there is an order in 3 days time to be despatched at 19:00. I have built a live clock in the spreadsheet but I can't work out the formula.
P.S. Also I need two time formats, first - days(text) hh:mm second - just a numeric value that can be formated as [hh:mm].
I new to excel and vba , and i have live stock feed data in excel.
The live feed has 17 rows..of ticker names and more column about values.live feed starts at 9.00 to 3.00
I want only 13th column data to save for every 5 min..in new spreedsheet.
I am also including a sample : live crude.xls‎
Is there a way to look at a cell's own value and then format it accordingly using VB?
I have a cell whose value changes based on DDE link to live price data.
Cell is "Q5".
When the new value is greater than the old value - i want to format the pattern color of the cell.
When the new value is less than the old value - i want to format the pattern color of the cell.
Does anyone know how to do this please or is there a way to do this using spreadsheet formulas as oppose to VB?
I have a line graph which I use in conjunction with live horseracing odds. On the vertical axis are the odds which are sourced from a worksheet. Each horse is represented by a data series that moves along the horizontal axis. The refresh rate is determined by the user embedded in the code.
I would like to expand the length of each data change along the horizontal axis as the data can be volatile. Sometimes there are rapid changes on the vertical axis which makes it difficult to interpret. With each refresh the line data moves about 3mm. It would be much better if it were about 5mm, especially as I now use a widescreen display.
There are no values on the horizontal axis as such, only time is suppose set by Excel?
use an address in a cell and http://local.live.com/. i would like to paste an address into http://local.live.com/ from a cell (or concatenation) into the "Where" textbox...?
View 2 Replies View RelatedI thought about using it for forecasting purposes. I might try to use it together with live data (temperature, seasonal patterns)... but if I graph it, it starts from left to right...
How to modify the code a bit...
VB:
Shift:=xlUp, CopyOrigin:=xlFormatFromRightOrDown
I tried to change the code, but it did not worked.
I am tracking figures over four weeks with a target of 4 sales per week. I have formatted the cells to light up - Green for 4 sales or more, Amber for 3, Red for 2 or less. I have set a monthly column up at the end of the table and want it to update the figure and colour that each member of my team is currently on. I can get it to change colour for the full 4 weeks worth of figure but want the montly column to be live and not cumulative. For example after 2 weeks if the total sales a member had achieved was 9, I would want the cell to be green. If after 3 weeks they had still only achieved 9 I would want the cell to change to amber once the 3rd weeks '0' figure had been added.
View 1 Replies View RelatedIs 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 have data that looks like this.
A1 B1 C1
1 2 100
2 3 100
3 4 100
My result should look like '1' in column A1, '4' in column B1 and '100' in column C1. I have hundreds of rows this way and any help will speed up my process. I tried writing a macro, but have no idea on how to delete the rows in between. Even if we can copy the result to the next column (i.e. have '1' in column D1, '4' in column E1, and '100' in column F1, that will solve the problem.
I have a sheet with the following information in rows:
PO# Acct# Item# QTY
There are multiple lines that share the same acct#.
How can I create the sheet so that each row combines the records for the same acct#.
For example:
PO# Acct# Item# Qty PO# Item# Qty PO# Item#
There are never more than 6 rows that share the same acct#.
I have written a macro to consolidate multiple sheets into one sheet. I have two sheets which are to be copied one below the other.I am attaching the code for this here.
ub Bingo()
Dim ws As Worksheet, n As Long, flg As Boolean, last As Long
On Error Resume Next
Application.DisplayAlerts = False
Sheets("Consolidated-Input").Delete
Application.DisplayAlerts = True
On Error GoTo 0
Sheets.Add(before:=Sheets(1)).Name = "Consolidated-Input"
n = 3
For Each ws In Worksheets
If ws.Name "Consolidated-Input" And ws.Visible And ws.Name "DCS-User" And ws.Name "Cal" And ws.Name "DCS" = True Then
If Not flg Then
ws.Range("a:c").copy
Sheets("Consolidated-Input").Range("a1").PasteSpecial xlPasteValues
Sheets("Consolidated-Input").Range("a1").PasteSpecial xlPasteFormats
flg = True...................................
