Avatar billede micaud Mester
11. marts 2019 - 20:13 Der er 5 kommentarer

Link til Virk.dk

Hej.

Jeg vil gerne have mit Excel ark til at finde navn, adresse mv. fra datacvr.virk.dk

Nedenstående viser uddrag af HTML koden fra hjemmesiden og min VB kode, og her i første omgang, vil jeg bare hente adresse. Det virker fint at slå op via CVR, som jeg har i en celle, men hvad skal der stå i min vb linje, før msgbox ??

HTML kode:
<div class="row dataraekker">
    <div class="col-sm-6 datatitler" data-pdf-class="column4">
        <h2><strong>Adresse</strong><div class="help_element help_acc Help-stamdata-data-adresse"></div></h2>
    </div>
    <div class="col-sm-6
            " data-pdf-class="column8">
        HER STÅR ADRESSEN  </div>


VB KODE:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Row = Range("CVR").Row And Target.Column = Range("CVR").Column Then
    Dim IE As New InternetExplorer
    IE.Visible = True
    IE.Navigate "https://datacvr.virk.dk/data/visenhed?enhedstype=virksomhed&id=" & Range("CVR")
    Do
    DoEvents
    Loop Until IE.ReadyState = READYSTATE_COMPLETE
    Dim Doc As HTMLDocument
    Set Doc = IE.Document
    Dim sAD As String
    sAD = Doc.getElementsByTagName("?????").innerText
    MsgBox sAD

  End If

Håber I kan hjælpe, tak.


End Sub
Avatar billede micaud Mester
11. marts 2019 - 21:18 #1
Avatar billede micvbang Praktikant
18. november 2020 - 12:56 #3
Det kan være en fordel at benytte et decideret API til dette, i stedet for at scrape virks hjemmeside. Prøv https://cvr.dev eller cvrapi.dk.
Avatar billede micaud Mester
20. april 2021 - 12:53 #4
Hej. Beklager jeg først ser dit svar nu micvbang, men koster det ikke penge?
Avatar billede micvbang Praktikant
30. april 2021 - 14:59 #5
Jeg udvikler selv https://cvr.dev ogdet koster ikke penge. Med tiden kommer jeg til at tage lidt betaling for det, da det ikke er gratis at holde det kørende. Men jeg regner bestemt med, der kommer til at være en gratis version for folk, der ikke skal lave mange forespørgsler :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester