Web query help

Excel Help for Web Query Help in Analyzing Corporate Financial Data

Web Query Help

Rate this: (2.5/5 from 2 votes)

	tried your idea but it did not like your constants, stated that i have to declare them.  Sub Login_WebQuery() Dim MyPost As String Const MyUrl As String = "https://www.btwholesale.com/siteminderagent/forms/login.fcc" Const PostUser As String = "USER=" & Worksheets("Login Data").Range("C5").Value Const PostPassword As String = "&PASSWORD=" & Worksheets("Login Data").Range("D5").Value     MyPost = PostUser & PostPassword     With ActiveSheet.QueryTables.Add(Connection:= _     "URL;" & MyUrl, Destination:=Cells(1, 1))     .PostText = MyPost     .BackgroundQuery = True     .TablesOnlyFromHTML = True     .Refresh BackgroundQuery:=False     .SaveData = True End With     End Sub
	Posted by tophs1012 on 26 Nov 2010

View Full Post