Excel VBA Portrange Angabe 50:2000 jeden Port einzeln

Moderator: ModerationP

Excel VBA Portrange Angabe 50:2000 jeden Port einzeln

Beitragvon BloodyRulz » 09. Aug 2018, 17:32

Hallo,

Ich habe eine große XML Datei welche ich in Excel importiert habe.
Diese enthält ganz viele Zeilen mit EInzelports und Portranges.
Die Portranges bringen mich zum grübeln.
Gibt es eine einfache Möglichkeit für das Aufsplitten der Einzelports für z.B. sport="50000:62799".
D.h er muss in dem importierten XML Tabellenblatt auch den Port z.B 50123 finden.
Das somit die Angabe von-/bis mit : auch komplett von-/bis gesucht wird.

Ich hoffe ich konnte es einigermaßen erklären.

Vielen Dank im Voraus
Gruß
Andreas
BloodyRulz
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 26
Registriert: 09. Feb 2010, 14:27

Re: Excel VBA Portrange Angabe 50:2000 jeden Port einzeln

Beitragvon Gast » 12. Aug 2018, 12:09

Hallo Andreas.

Ich bin mit nicht sicher was du genau machen möchtest.
Wenn du für jede Portadresse eine Zeile möchtest, das geht in etwa so:

Code: Alles auswählen
For i = 50000 To 62799
    Cells(i, 2) = "Sport"
Next


Aber eigentlich reicht es ja, wenn du den Anfangs- und Endadresse in einer separaten Spalte hast.
Dies kannst du ganz leicht mit Formeln lösen.

Code: Alles auswählen
      A         B          C       D
1   Sport   50000:62799  50000   62799


Formeln:
    C1 : =WERT(LINKS(B1;WENNFEHLER(FINDEN(":";B1);99)-1))
    D1 : =WERT(RECHTS(B1;WENNFEHLER(FINDEN(":";B1);99)-1))

Den Eintrag für Portadresse 50123 in Spalte A --> Sport kannst du dann ebenfalls mit einer Formel finden.

Lg. Tim
Gast
 


Zurück zu Excel Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: MisterBurns und 25 Gäste