Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Pop-Up-Fenster bei bestimmtem Zellinhalt

Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:19:43
front0708
Hallo Forum,
ich würde gerne ein POP-Up-Fenster erscheinen lassen, dass die Meldung ausgibt: "Bitte die Anrede 'Herrn' verwenden".
Dieses Pop-Up-Fenster soll dann erscheinen, wenn in einem Feld der Spalte A das Wort "Herr" eingegeben wird.
Wer kann mir dabei helfen?
Vielen Dank für Eure Hilfe
Liebe Grüße
front
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:24:35
Reinhard
Hi front
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 1 Or Target.Cells.Count <> 1 Then Exit Sub
If Target = "Herr" Then MsgBox "so nicht"
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:29:52
front0708
Hallo Reinhard,
vielen Dank für Deine Antwort. Leider weiß ich nicht genau, wie ich das Makro richtig in das Tabellenblatt einfüge.
Kannst Du noch mal einem Laien auf die Sprünge helfen?
Dank Dir.
Grüße
front
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:49:51
Reinhard
Hi front,
Alt+F11, Doppelklick auf "Tabelle1"
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 15:01:03
front0708
Hallo Reinhard,
vielen Dank. Es fiel mir dann nach einigem Probieren wieder ein...und Deine Lösung funktioniert wirklich prima!
Vielen Dank und liebe Grüße
front
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:28:29
Bertram
HI front,
etwa so:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "A1" And Target.Value = "Herr" Then MsgBox ("Bitte die Anrede 'Herrn' verwenden")
End Sub

Gruß
Bertram
Anzeige
AW: Pop-Up-Fenster bei bestimmtem Zellinhalt
29.05.2006 12:56:03
Beni
Hallo front,
dieser Code bringt keine Meldung, sondern korrigiert es.
Füge diesen Code mit rechte Maustaste auf Blattregister, Code anzeigen, in das Tabellenmodul ein.
Gruss Beni

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target = "Herr" Or Target = "herr" Then Target = "Herrn"
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Pop-Up-Fenster bei bestimmtem Zellinhalt in Excel


Schritt-für-Schritt-Anleitung

Um ein Pop-Up-Fenster in Excel zu erstellen, das bei der Eingabe eines bestimmten Wortes erscheint, kannst du die folgende Schritt-für-Schritt-Anleitung befolgen. Diese Anleitung setzt voraus, dass du mit Excel 2016 oder höher arbeitest.

  1. Öffne die Excel-Datei, in der du das Pop-Up-Fenster erstellen möchtest.
  2. Drücke Alt + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.
  3. Im VBA-Editor suchst du im Projektfenster nach dem entsprechenden Tabellenblatt (z.B. "Tabelle1").
  4. Doppelklicke auf das Tabellenblatt, um das Codefenster zu öffnen.
  5. Füge den folgenden Code ein:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Target.Column = 1 And Target.Value = "Herr" Then
           MsgBox "Bitte die Anrede 'Herrn' verwenden"
       End If
    End Sub
  6. Schließe den VBA-Editor und kehre zu deinem Excel-Blatt zurück.
  7. Teste die Eingabe in Spalte A, um sicherzustellen, dass das Pop-Up-Fenster erscheint.

Häufige Fehler und Lösungen

  • Fehler: Das Pop-Up-Fenster erscheint nicht.

    • Lösung: Überprüfe, ob der Code im richtigen Tabellenblatt eingefügt wurde. Du solltest sicherstellen, dass der Code in das Modul des spezifischen Arbeitsblatts eingefügt wurde, wo du die Eingabe machst.
  • Fehler: Das Pop-Up-Fenster erscheint bei jeder Eingabe.

    • Lösung: Stelle sicher, dass die Bedingungen im Code korrekt gesetzt sind. Der Code sollte nur für die spezifische Spalte (z.B. Spalte A) ausgeführt werden.

Alternative Methoden

Es gibt mehrere Möglichkeiten, Pop-Up-Fenster in Excel zu erstellen. Eine alternative Methode ist die Verwendung von Datenvalidierung:

  1. Wähle die Zelle oder den Zellbereich aus, in dem du die Eingaben einschränken möchtest.
  2. Gehe zu Daten > Datenvalidierung.
  3. Wähle unter „Erlauben“ die Option Liste und gib deine erlaubten Werte ein.
  4. Aktiviere die Checkbox für "Eingabemeldung" und gib den Text ein, der angezeigt werden soll.

Diese Methode zeigt jedoch kein echtes Pop-Up-Fenster, sondern eine Eingabemeldung, die nur beim Fokus auf die Zelle erscheint.


Praktische Beispiele

Ein einfaches Beispiel für die Verwendung eines Pop-Ups in Excel:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address(False, False) = "A1" And Target.Value = "Herr" Then
        MsgBox "Bitte die Anrede 'Herrn' verwenden"
    End If
End Sub

In diesem Beispiel wird das Pop-Up-Fenster nur angezeigt, wenn der Benutzer in Zelle A1 das Wort "Herr" eingibt. Dies ist nützlich für Anwendungen wie Wichteln in Excel, wo korrekte Anredeformen wichtig sind.


Tipps für Profis

  • Nutze Option Explicit am Anfang deines Codes, um sicherzustellen, dass alle Variablen deklariert sind.
  • Teste deinen Code gründlich, um sicherzustellen, dass das Pop-Up-Fenster nur dann erscheint, wenn es wirklich notwendig ist.
  • Experimentiere mit verschiedenen Bedingungen, um den Code an deine spezifischen Anforderungen anzupassen.

FAQ: Häufige Fragen

1. Wie kann ich das Pop-Up-Fenster anpassen?
Du kannst den Text innerhalb der MsgBox-Funktion ändern, um unterschiedliche Meldungen anzuzeigen.

2. Funktioniert das auch in älteren Excel-Versionen?
Ja, der VBA-Code sollte in den meisten Excel-Versionen funktionieren, die VBA unterstützen, wie Excel 2010 und höher.

3. Was, wenn ich mehrere Bedingungen abfragen möchte?
Du kannst zusätzliche If-Bedingungen im Code hinzufügen, um mehrere Zellinhalte zu überprüfen und unterschiedliche Meldungen anzuzeigen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige