I have a pivot table with two row fields (Brand and Boutique). When I add a calculated item to the data field, EVERY Boutique shows up for EVERY Brand even when none of the source data has these combinations. Thus, each boutique is listed multiply times – within the Brand that it truly belongs, as well as in each of the other Brands. Of course the values for all data in these unwanted data fields is blank with the exception of the calculated items which are #DIV/0.

When I take the Brand row field out of the pivot table, the boutiques each show up once. But I really need the Brand rows, too.

Any ideas???

Try adding this as a calculated field (quantity*(price/price))

this will only work if you will not change prices. :)

Please help.

I thought I fixed that. Thanks, good onion.

Should ‘intY’ be ‘intG’?

@Al, you were right about the variable mismatch, but the function still will not work from my office computer. It just exits the function after reaching the line “Set inet1 = New Inet”. They lock these computers down pretty hard, so it may be a user restriction, or it could be a firewall issue. As you know, the part that you found different on the Brittish msn site did not post, and I am interested to know the difference. If you would be so kind as to repost, you can get the html string to post as text – rather than hypertext – by using { } instead of < >. It will not be a literal representation, but we will get the point.

You’ve mixed your variables a little – creating myhttp but using mypage in your inStr()

Also, they may have changed the site or it’s different for Brits:”"
works for me:

Function Temp(strCity As String)
strCity = Replace(strCity, “,”, “&2C+”)

Dim myURL As String
myURL = “http://search.msn.com/results.aspx?q=current+temperature+” & strCity

Dim inet1 As Inet
Dim myhttp As String

Set inet1 = New Inet
With inet1
.Protocol = icHTTP
.URL = myURL
myhttp = .OpenURL(.URL, icString)
End With
Set inet1 = Nothing

Dim intStart As Integer, intEnd As Integer
intStart = InStr(myhttp, “”) + 39
intEnd = InStr(intStart, myhttp, “&”)

Temp = Mid(myhttp, intStart, (intEnd – intStart))

End Function