Das Archiv des Excel-Forums

Klick in definierten Rangebereich startet Dialog

Bild

Betrifft: Klick in definierten Rangebereich startet Dialog
von: Karsten Böhme

Geschrieben am: 16.06.2008 15:34:39

Hallo,
ich möchte, das wenn der User in einen Bestimmten Rangebereich des Arbeitsblattes klickt (ist geschützt), das dann geprüft wird was dort in der Zelle steht und dann ein Dialog geöffnet wird.
Soweit klappt das. Nur wir das auch außerhalb des definierten Ranges gemacht und produziert einen Fehler.
Wer kann helfen?
Hier das Script:


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.Intersect(Target, Range("$L$17:$BY$57")) <> "" Then
Call Auswertung
End If
End Sub


Schon einmal vielen Dank im vorraus.
Gruß Karsten

Bild

Betrifft: AW: Klick in definierten Rangebereich startet Dialog
von: Rudi Maintaire
Geschrieben am: 16.06.2008 15:42:04
Hallo,
falsche Abfrage!
If Not Application.Intersect(Target, Range("$L$17:$BY$57")) Is Nothing Then
Gruß
Rudi

Bild

Betrifft: AW: Klick in definierten Rangebereich startet Dialog
von: UweD

Geschrieben am: 16.06.2008 15:47:49
Hallo
so herum klappt es.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("$L$17:$BY$57")) Is Nothing Then
MsgBox "Liegt im Bereich"
Call Auswertung
Else
MsgBox "Liegt außerhalb"
End If
End Sub


Gruß UweD

Bild

Betrifft: AW: Klick in definierten Rangebereich startet Dialog
von: Karsten Böhme
Geschrieben am: 16.06.2008 16:00:21
@Rudi Maintaire und @UweD
vielen Dank, das Problem ist somit gelöst!
gruß Karsten

 Bild

Excel-Beispiele zum Thema "Klick in definierten Rangebereich startet Dialog"

Ausgabe einer benutzerdefinierten Funktion in Matrixformel download Daten in benutzerdefinierten Datentyp ein- und auslesen download
Neuer Menüpunkt zum Einfügen eines benutzerdefinierten Kommentars download In einem Dialog ausgewählte Spalten drucken download
Excel für die Zeit eines Dialogaufrufes ausblenden download Dialog-Datumseingabe vereinfachen und kontrollieren download
Adressdaten via Dialog in eine Adressdatei eintragen download Bestellfax über Dialog download
Bedingte Übergabe des Focus und Setzen der Schreibmarke im Dialog download Dynamischen Dialog erstellen download
Arbeitsmappe aus Dialog schließen download xlSaveAs-Dialog in einem bestimmten Verzeichnis aufrufen download
Laufwerke im Dialog zur Auswahl anzeigen lassen download Dialoggesteuerte Druckmehrblattauswahl download
Offene Arbeitsmappen in Dialog listen download Blattschutzdialog über VBA aufrufen download
Assistent zum Dialog aufrufen und Eingaben auswerten download Bei Dialoganzeige Blattauswahl wechseln download
Datei auswählen, öffnen und Formelsuchdialog anzeigen download Ordnerdialog mit nachfolgendem Dateidialog aufrufen download
Aus Dialog Verzeichnis auswählen, dann neuen Ordner erstellen download Farbauswahldialog generieren, aufrufen und löschen download
Über VBA den Excel-Sortierdialog aufrufen download Dialog nach 3 Sekunden schließen download
Dialogaufruf, wenn zwei Zellen Werte enthalten download Aufruf des GetOpenFilename-Dialogs download
Beim Öffnen Dialog mit Dateiname und Dateidatum download Zahlen-Formatierungs-Dialog aus UserForm aufrufen download
String mit Prüfziffer über Dialogeingabe erstellen download Aus GetOpenFilename-Dialog eine Mehrfachauswahl auslesen download
Anpassen-Dialog über VBA aufrufen download Verknüpfungsdialog aus VBA aufrufen download
Outlook-Maildialog aus UserForm aufrufen download Datei-Speichern-Dialog zusammen mit Paßwortdialog aufrufen download
ComDlg-Dialog aufrufen download Verzeichnisdialog mit vorgegebenem Verzeichnis aufrufen download
Vorlagendialog beim Öffnen einer Arbeitsmappe aufrufen download Dateiauswahl-Dialog mit vorgegebenen Dateinamen aufrufen download
Speichern-Dialog mit Dateinamen-Vorschlag aufrufen download Suchdialog über VBA aufrufen download
Word mit leerem Dokument und Druckdialog aufrufen download Aufruf des Symbolleisten-Anpassen-Dialogs verhindern download
Drucken aus einem DialogSheet download Zusammenstellung der eingebauten Dialoge download