Hallo,
gibt es mit Excel die Möglichkeit eine Homepage mit Zahlen zu durchsuchen. So wie mit STRG + F.
es soll diese HP sein:
http://www.lions-club-varel.de/Adventska...mmern.aspx
die die Nr. lautet 2333
Ist das auch mit einer Liste, die mehrere Zahlen enthält möglich?
Vielen Dank :)
Hi,
importiere die Seite über Daten==> externe Daten abrufen. Danach kannst du mit STRG-F suchen.
Hallo, also ich finde diese Nummer nicht...:
| Arbeitsblatt mit dem Namen 'Tabelle4' |
| A | B | C | D | E |
| 1 | Nummer | Wert der Nummer | | | |
| 2 | 3270 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | 2333 | #NV |
| 3 | 2767 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | 0 |
| 4 | 529 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | |
| 5 | 4248 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | |
| 6 | 342 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | |
| 7 | 1067 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | |
| 8 | 5143 | P.S. Schuhe und Trends 1 Warengutschein im Wert von 20 Euro | | | |
| 9 | 4365 | Parfümerie Schuback 1 Präsent im Wert von 100 Euro | | | |
| 10 | 3943 | Nordwest Zeitung 1 x 2 Karten für Phantom der Oper im Wert von 124 Euro | | | |
| 11 | 2019 | Nordwest Zeitung 1 x 2 Karten für Die Nacht der Musicals im Wert von 124 Euro | | | |
| 12 | 1735 | Nordwest Zeitung 1 x 2 Karten für Die Schöne und das Biest im Wert von 58 Euro | | | |
| 13 | 967 | Malerfachbetrieb Padtberg 1 Gutschein Euronics im Wert von 20 Euro | | | |
| 14 | 834 | Malerfachbetrieb Padtberg 1 Gutschein Euronics im Wert von 20 Euro | | | |
| 15 | 2640 | Malerfachbetrieb Padtberg 1 Gutschein Euronics im Wert von 20 Euro | | | |
| 16 | 5157 | Malerfachbetrieb Padtberg 1 Gutschein Euronics im Wert von 20 Euro | | | |
| 17 | 4009 | Malerfachbetrieb Padtberg 1 Gutschein Euronics im Wert von 20 Euro | | | |
| 18 | 3168 | Kochschule S-Kultur A. Lange 1 Gutschein Kochseminar im Wert von 98 Euro | | | |
| 19 | 1536 | Kochschule S-Kultur A. Lange 1 Gutschein Kochseminar im Wert von 98 Euro | | | |
| 20 | 3273 | Flott-Tex 1 Gutschein im Wert von 20 Euro | | | |
| 21 | 4417 | Flott-Tex 1 Gutschein im Wert von 20 Euro | | | |
| 22 | 2403 | Flott-Tex 1 Gutschein im Wert von 20 Euro | | | |
| Zelle | Formel |
| E2 | =SVERWEIS(D2;A:B;2;0) |
| E3 | =ZÄHLENWENN(A:A;D2) |
| Verwendete Systemkomponenten: [Windows (32-bit) NT 6.01] MS Excel 2010 |
| Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
Hallo, :19:
die Nummer "
2333" ergibt
kein Ergebnis - hier mal mit der Nummer "
3236": :21:
Code:
Option Explicit
Public Sub Main()
Dim strTMP() As String
On Error GoTo Fin
With CreateObject("MSXML2.XMLHTTP")
.Open "Get", "http://www.lions-club-varel.de/Adventskalender/Gewinnnummern.aspx", False
.Send
Do While .ReadyState <> 4
DoEvents
Loop
strTMP = Split(Split(.ResponseText, "3236")(1), "<")
MsgBox strTMP(0)
End With
Fin:
If Err.Number <> 0 Then MsgBox "Error: " & _
Err.Number & " " & Err.Description
End Sub