• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

1 Waarde tussen 2 andere waardes weergeven

Status
Niet open voor verdere reacties.

jelee

Gebruiker
Lid geworden
3 feb 2006
Berichten
54
Ben aan het experimenteren met de webservice function
=webservice("google.nl")
hierdoor krijg ik de html broncode van Google
Graag zou ik dan de tekst willen die bijvoorbeeld tussen de <title> en de </title> tags staat.
Wat zijn de mogelijkheden hiervoor?
 
Zoiets:
Code:
Sub tst()
    a = "<title> en de </title>"
    MsgBox TextInTags(a)
End Sub

Function TextInTags(Regel) As String
    Dim p1 As Integer
    Dim p2 As Integer
    
    p1 = InStr(1, Regel, ">") + 1
    p2 = InStr(p1, Regel, "</") - 1
    
    TextInTags = Mid(Regel, p1, p2 - p1)
End Function

Lees ook dit:
http://analystcave.com/excel-webservice-filterxml-functions/
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan