Search:

We all are.. ask your question.. We may be able to help

Looking for some help on a fairly easy code.

1) Range("A" & i - 3).Range("$A$1:$s$1").Copy _
2) Destination:=Worksheets("Covers").Range("a1")

This code repeats everytime a cell has a...

I tried it briefly, but wouldn't cut the mustard. I tried a different site, with more work than SBR, I got it to pull in exactly how I wanted it.

Importing with your standard template as shown at the start of thread Sbr for some odd reason doesn't import as is.
It fills all the info into column A



With...

I wanted a final score with the line from the previous days and years.

A4, I believe that Webselection type is where you can change what tables to bring in. Just need to add a line below it that indicates which tables from a page.

No matter what I do, covers takes...

That's currently what I'm working on.
Thanks for the reply!

All is trying to do is pull in the odds for each game this year.

here is my basic import layout


For gameday = 63274 To 63849


Sheets("Temp").Select
With Sheets("Temp").QueryTables.Add(Connection:= _...

I would like to know if there is a way to only import the "Summary" table of the following link,
...

Hi thom321,
I ended up re- coding my vba and seems to be working better,
i had too much stuff out of place.

Has anyone ever had their code do so much stuff it goes to not responding?
Over a full nhl season i need to pull in about a month at a time. it will not handle the full 6- 7 months.

Hey guys!

Looks like I missed quite a bit

I think you need to be a bit more specific

Great, what did you end up using?

I thought we already got this working for you?

=IF(AND(o7>0.5,n7>0.5),"match","dontmatch")

if there is a value in the era + whip, match else dontmatch

where did i go wrong?

Sorry guys.. I had no time to work on this. Work has picked up, so all my free time is gone!
I ended up just doing the easy text splitting to match and adding a column.

I have not had time to try, i did something similar on my nhl project using search function. But I have not combined anything with vlookup yet

I was thinking on not adding any columns, rather to text split from right to the first space in a formula, combined with vlookup. Object is to take the probable pitcher for the game, match it with...

How would I search a name such as D. Duffy (L) on sheet a. Then to look for that name in a different format such as Danny Duffy on another sheet, once matched, get data from a cell 3,4,5 or 6 rows...

Looks good. You should start a php thread, so it doesn't get confusing in here.

In the time it took you to do that, how long would it take to accomplish it in php?

I had to add Dim i As Integer, then it worked great!

Thanks!

Rusty or not. Point us in the direction and we should be able to help out!

On the probables page it all there and easy to get. The pitching link you posted, its over many of pages. I'm not advanced enough to take on this task.

I would love to make a sheet that has every...

a12 = Jorge De La Rosa (L)

=LEFT(A12,1) & ". " & MID(A12,SEARCH(" ", A12,1)+1,(SEARCH(" (",A12,SEARCH(" ",A12,1)+1)-1)-SEARCH(" ",A12,1))


b12 = J. De La Rosa

You will need to play around with that one. Do a Google search for excel text splitting from space to bracket.

I was able to overcome my problem by using

Dim URL As Range


For Each URL In...

I had an error! copy and paste this in b1.


=LEFT(A1,1) & ". " & MID(A1,SEARCH(" ", A1,1)+1,(SEARCH(" ",A1,SEARCH(" ",A1,1)+1)-1)-SEARCH(" ",A1,1))

To be a bit more clear on what i want to do is to get data from 5 different pages (all with different names) with a loop to avoid having 5 different set of info. Just a bit more simpler code... and...

Oil,

give this a try

=LEFT(A1,1) & ". " & B1 & MID(A1,SEARCH(" ", A1,1)+1,(SEARCH(" ",A1,SEARCH(" ",A1,1)+1)-1)-SEARCH(" ",A1,1))

a4u2fear

im looking to import 5 different web pages with a "loop" doing the exact same formatting, then renaming the tab to a specific name.

as of now, after the standard pull in code i have...

I'm looking to import pitcher stats that include WHIP

I'm currently using http://espn.go.com/mlb/probables

But there is no walks, so I cannot use a formula to figure out WHIP stats.

Any...

I was able to do it with INDEX. Looks like there may be 2 ways!

=IFERROR(INDEX(RPI!$C$3:$C$32,MATCH($R4,RPI!$B$3:$B$32,0)),"")

How advanced are you?

Im looking take a team name and match it to another sheet and grab some cells based on the team, can you help with that?

Sub indirect()


Dim r As Range
Dim i As Long
Dim cell As Range


Set r = Range("A1:A300")
For i = r.Rows.Count To 1 Step -1

On the current sheet that I'm using to import my data from Web. If I type in a formula and fill down it keeps all the same result, but the actual formula updates by row like it should. I need to...

Got it =TRIM(RIGHT(SUBSTITUTE(A64," at",REPT(" ",LEN(A64))),LEN(A64)))

New York Mets at Atlanta Braves =RIGHT(A59,LEN(A59)-(1)-FIND("at",A59))
that works to get Atlanta

Pittsburgh Pirates at Chicago Cubs =RIGHT(A64,LEN(A64)-(1)-FIND("at",A64))
same formula doesn't...

Text Splitting...

Pittsburgh Pirates at Chicago Cubs
Milwaukee Brewers at Philadelphia Phillies
New York Mets at Atlanta Braves

That's a1 trough a3

I would like to have the home teams in...

Instead of copying I just deleted un wanted stuff and formatted on the main page. At the end of my code it renames the sheet.
So I guess you could say I figured it out.

This is my current copy selection

Worksheets("Test").Range("A22:p99").Copy _


this is a way i found to get to a cell and clear it.

Dim cell As Range
For Each cell In [a:a]
If cell.Value =...

I ended up just erasing the last part and moved my formulas to the page that brings in the table.

Got it Oil...

This will search row a1 through a100. Look for the word STARTERS. Once found it will move up 2 rows and color the entire row as well as change the font color.


Dim r As Range...

It would be nice if there is an option to import the colours from the site with the table

Im just trying to add some colours to the table but only when there are certain key words.
Your way does work oil but, if there are more games then others it won't have the proper colours, if I add...

I have this

Dim cell As Object


For Each cell In ActiveSheet.UsedRange
If cell.Value = "STARTERS" Then
'cell.Interior.ColorIndex = 36
Range("A1: p1").Interior.Color = RGB(25, 25, 112)...

Maybe it would be easier to say something like

if a1 contains "at" then
Range("a1: p1").Interior.Color = RGB(25, 25, 112)
Range("a1: p1").Font.Color = vbWhite

or would i need to use a $a$1?
...

Also I have a cell with 1:05 PM ET

How can i search from n1:n100 , when it finds a cell with time , I would like to
Change colors for every time it finds time

Range("a1:p1").Interior.Color =...

Thanks solring!

I tried replacing lastrowsheetone with a1, "a1", "$A$1". Type mismatch...

Im not sure what type of value it needs. I will keep plugging away at it!

I'm currently using the following to bring in my NHL standings. Problem I have is that I have formulas in R1:T31 and it loads my table to A31.
I would like to force it to start at A1.



Public...