Posts by RAMLAL123

Re: Replace Match

Bump.........

Hello please find attached file ,I want replace column "A" Value with column "C" Value
and match column "E" Value with column "A" values.
http://imgur.com/zNnU6OL

also find attached file with solution that I want
regards

Re: Import data from multiple pages of a website into an Excel workbook

Quote from John_w;744659

Please post links to your multiple cross-posts.

http://www.excelforum.com/exce…el-sheet.html#post4056026
http://www.mrexcel.com/forum/e…ingle-excel-workbook.html

I want to download data from multiple pages of this website .
only the date changes in the link .
I want to download Result calender from 07-01-2014 to 25-04-2015
here is the link http://www.moneycontrol.com/earnings...014-01-07.html
Is it possible to have month wise sheets in the excel workbook.

I have created this macro ,but it fetches data for specific date only.How do I make changes to it to down load data from say 1/4/2015 till current day .
previous day url can be accessed by changing date in url

Sub CompanyResults()'
' CompanyResults Macro
'




'
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.moneycontrol.com/earnings/results-calender_2015-04-28.html", _
Destination:=Range("$A$1"))
.Name = "results-calender_2015-04-28"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = False
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingAll
.WebTables = """myTable"""
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub

Re: Get data from another file

file ACC attached

Hi
I want to pull data from another file.
File pl4 should pull data from file ACC in D:\Data folder (not able to upload file ACC in this post so uploading this file in next post)
Please check attached files don't know why is it not working

I have already posted this in another forum http://www.excelforum.com/exce…te-range.html#post3810327
regards

Re: web query not return table values

Quote

'This VBA project requires the following references (in Tools -> References):'Microsoft Internet Controls
'Microsoft HTML Office Library
Sub webtable()
Dim HTMLDoc As New HTMLDocument
Dim objElementsTd As Object
Dim objTd As Object
Dim lRow As Long
Dim myarray()
Dim oIE As InternetExplorer
Set oIE = New InternetExplorer
oIE.Navigate "http://www.nseindia.com/live_market/dynaContent/live_watch/live_index_watch.htm"
Do Until (oIE.ReadyState = 4 And Not oIE.Busy)
DoEvents
Loop
Application.Wait (Now + TimeValue("0:00:03"))
HTMLDoc.body.innerHTML = oIE.Document.body.innerHTML
With HTMLDoc.body
Set elemcollection = .getElementsByTagName("Table")
For t = 0 To elemcollection.Length - 1
For r = 0 To elemcollection(t).Rows.Length - 1
For c = 0 To elemcollection(t).Rows(r).Cells.Length - 1
ThisWorkbook.Sheets("Sheet1").Cells(ActRw + r + 1, c + 1) = elemcollection(t).Rows(r).Cells(c).innerText
Next c
Next r
ActRw = ActRw + elemcollection(t).Rows.Length + 1
Next t
End With
oIE.Quit
End Sub
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:01:00"), "webtable"
End Sub

Display More

I have added Private sub hope it works
regards

Re: web query not return table values

Thanks pike
going through the threads to learn excel
how can I set automatic refresh after every 1 minute ?
thanks
regards

Re: web query not working

Thanks pike plz check attached file ,I can't get data
thanks
regards

Hi I want to pull real time data from following links to excel.I have tried web query but it is not working .
http://www.nseindia.com/live_m…/equities_stock_watch.htm
http://www.nseindia.com/live_m…atch/live_index_watch.htm
any other method to pull data to excel ?
thanks
regards