![]() |
#1
|
|||
|
|||
![]()
Hello all VBA Members
I am trying to auotmate a process of word I get lots of different wordjobs, they always have a job number, for example 741443 we have a webpage where we can see all active jobs, as we see both job numbers (741443) and also an EP-number (E7295_EP2586715) I want to copy this part of the EP-number (EP2586715) to a word document. the word document is always in the folder called 741443. my problem is, when there are several different jobs with different EP-numbers, the macro need to copy the correct EP-Code from the webpage to the document. here is a picture how it looks like Attachment 116359 Do have someone a solution for this? here is a sample I did, but the pastemethod doesn't work HTML Code:
Sub CopyWebContent() Dim IE As Object Dim rng1 As Range Dim thisdoc As Document Dim newdoc As Document Dim st Set thisdoc = ActiveDocument Set newdoc = Documents.Add Documents(thisdoc).Activate Set IE = CreateObject("InternetExplorer.Application") With IE .Visible = True .navigate "tsq/" Do Until .ReadyState = 4: DoEvents: Loop End With IE.ExecWB 17, 0 '// SelectAll IE.ExecWB 12, 2 '// Copy selection Selection.Paste Set rng1 = Selection.Range ' IE.Quit End Sub Thank you in advance all VBA Members Cheers! Daniel |
#2
|
||||
|
||||
![]()
Cross-posted at: http://www.vbaexpress.com/forum/show...-to-a-document
For cross-posting etiquette, please read: http://www.excelguru.ca/content.php?184 I note you have previously been asked to provide cross-post links (e.g. https://www.msofficeforums.com/word-...directory.html). Please don't make a habit of ignoring such basic courtesies. Those who do soon find their posts being ignored and, on some forums, being banned.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
![]() |
Tags |
copy content, copy page, copy web |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
GreenBoy | Word | 2 | 06-22-2014 12:12 PM |
Copy table to another location in the same document | Sektor | Word VBA | 2 | 03-31-2014 09:28 PM |
Anyway to copy a complete page full of objects into a new document? | MuffinStud | Word | 1 | 12-20-2012 04:43 AM |
![]() |
Loretti | Word | 1 | 11-12-2012 03:35 PM |
![]() |
gmurphy | Word | 3 | 09-07-2011 04:28 AM |