Einsatz von Platzhaltern in Excel-VBA möglich?

Forumthread: Einsatz von Platzhaltern in Excel-VBA möglich?

19.10.2019 17:50:14

Platzhaltern

Hallo Leute,
ich will ankommende und abgehende Telefonnummern (werden in einer Telefonanlage gespeichert) in Excel einlesen und weiterverarbeiten.
Das funktioniert auch einwandfrei solange die Auslandsvorwahlnummer bis zu 4 Stellen enthält, z.b. 0033 für Frankreich.
Nun gibt es aber auch viele Vorwahlnummern die bis zu 6 Stellen enthalten, z.B. 001242 für Bahamas.
ich suche eine einfache Möglichkeit diese Nummern über eine Abfrage auszufiltern, wie im nachstehenden Beispiel:

ZelleAktVerkürzt = Left(ActiveCell.Value, 3)
ZelleAkt = Left(ActiveCell.Value, 6)
If ZelleAkt = "0012##" Then '001242 Bahamas
Programmcode
Programmcode
Programmcode
End If

Ist es möglich über Platzhalter verschiedene Nummern auszufiltern wie in vorstehendem Beispiel?
Dabei sollen die Zeichen "##" für beliebige Ziffernfolgen stehen, z. B.: -42, -46, -64, -68, -84 und von dem nachfolgenden Programmcode weiterverarbeitet werden.
das Zeichen "##" eignet sich aber nicht als Platzhalter; ist es überhaupt in Excel -VBA Platzhalter einzusetzen und welches Zeichen müsste das sein?
mfg
reiner

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Einsatz von Platzhaltern in Excel-VBA möglich?

19.10.2019 17:57:58

Platzhaltern
AW: Einsatz von Platzhaltern in Excel-VBA möglich?

19.10.2019 19:41:27

Platzhaltern

AW: Einsatz von Platzhaltern in Excel-VBA möglich?

19.10.2019 17:57:58

Platzhaltern

Hallo Reiner,
so klappts:

 If ZelleAkt Like "0012##" Then

Gruß
Nepumuk

AW: Einsatz von Platzhaltern in Excel-VBA möglich?

19.10.2019 19:41:27

Platzhaltern

klappt super,
danke Nepumuk

Infobox / Tutorial

Einsatz von Platzhaltern in Excel-VBA für Auslandsvorwahlnummern

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Öffne den VBA-Editor:
- Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.
Erstelle ein neues Modul:
- Klicke mit der rechten Maustaste auf „VBAProject (DeineArbeitsmappe)“ und wähle „Einfügen“ > „Modul“.

Füge den VBA-Code ein:

Kopiere und füge den folgenden Code in das Modul ein, um die Auslandsvorwahlnummern mithilfe von Platzhaltern zu filtern:

Sub FilterAuslandsvorwahlnummern()
   Dim ZelleAkt As String
   ZelleAkt = ActiveCell.Value

   If ZelleAkt Like "0012##" Then ' Beispiel für Bahamas
       ' Hier kannst du den gewünschten Programmcode einfügen
       MsgBox "Nummer gehört zu den Bahamas"
   End If
End Sub

Aktiviere das Makro:
- Schließe den VBA-Editor und kehre zu Excel zurück. Wähle eine Zelle mit einer Telefonnummer aus und führe das Makro aus.

Häufige Fehler und Lösungen

Fehler: "Typ nicht übereinstimmend"
- Lösung: Stelle sicher, dass die Zelle, die du analysierst, tatsächlich eine Telefonnummer im richtigen Format enthält.
Fehler: "Kein Ergebnis"
- Lösung: Überprüfe, ob die verwendeten Platzhalter korrekt in der Bedingung verwendet werden. Der Platzhalter # steht in VBA für eine beliebige Ziffer.

Alternative Methoden

Eine alternative Methode zur Verarbeitung von Auslandsvorwahlnummern ist die Verwendung der InStr-Funktion, um gezielt nach bestimmten Zeichenfolgen in den Telefonnummern zu suchen. Hier ein Beispiel:

If InStr(ZelleAkt, "0012") > 0 Then
    ' Hier kannst du den gewünschten Programmcode einfügen
    MsgBox "Nummer gehört zu den Bahamas"
End If

Praktische Beispiele

Hier sind einige praktische Beispiele, wie du Platzhalter in Excel-VBA verwenden kannst:

Filter für mehrere Vorwahlnummern:

If ZelleAkt Like "0012##" Or ZelleAkt Like "0033##" Then
   ' Programmcode für Bahamas oder Frankreich
End If

Verwendung einer Funktion zur Validierung:

Function IstGültigeNummer(num As String) As Boolean
   IstGültigeNummer = num Like "0012##" Or num Like "0033##"
End Function

Tipps für Profis

Nutze die Option Explicit-Anweisung am Anfang deines Moduls, um sicherzustellen, dass alle Variablen deklariert sind.
Experimentiere mit verschiedenen Platzhaltern wie ? für ein einzelnes Zeichen und * für beliebige Zeichenfolgen.
Halte deinen Code modular, indem du häufig verwendete Funktionen in separate Module auslagerst.

FAQ: Häufige Fragen

1. Kann ich Platzhalter auch in Strings verwenden? Ja, du kannst Platzhalter in Strings verwenden, aber beachte, dass die Syntax in VBA spezifisch ist. Verwende Like für Vergleiche mit Platzhaltern.

2. Was ist der Unterschied zwischen # und ? in VBA? Der Platzhalter # steht für eine beliebige Ziffer, während ? für ein beliebiges Zeichen steht. Wähle den Platzhalter entsprechend deiner Anforderungen aus.

Beliebteste Forumthreads (12 Monate)

Einsatz von Platzhaltern in Excel-VBA möglich?

Forumthread: Einsatz von Platzhaltern in Excel-VBA möglich?

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Einsatz von Platzhaltern in Excel-VBA für Auslandsvorwahlnummern

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread