Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
268to272
268to272
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Application.inputbox

Forumthread: Application.inputbox

Application.inputbox
16.06.2003 14:13:52
COT
Liebes Forum,
wenn ich die u.a. inputbox über 'Abbrechen' beende kommt es zu einem Fehler. Wie kann ich das abfangen/ umgehen??

Set ausgewählterBereich = Application.InputBox("Bitte Zelle auswählen", , "Bereich auswählen", , , , , 8)

Vielen Dank für die Hilfe...
Carsten

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Application.inputbox
16.06.2003 14:15:19
L.Vira

if ausgewählterBereich = false then exit sub

Re: Application.inputbox
16.06.2003 14:23:14
COT

Hallo L.Vira,
vielen Dank für den Hinweis. Funktioniert aber leider nicht. Springt schon in der Zeile set... raus, kommt also nicht bis zur Abfrage...
Noch eine Idee?
Gruß,
Carsten

Re: Application.inputbox
16.06.2003 14:38:20
xxx

Hallo,
das ist prinzipiell falsch, da Inputbox einen String liefert und kein Objekt. Bei Abbrechen ist der String leer. Du musst also etwa so vorgehen:
Bereich =Inputbox(.......)
If Bereich ="" then exit sub
set ausgewählterBereich=Range(Bereich)


Gruß aus'm Pott
Udo

Anzeige
Re: Application.inputbox
16.06.2003 14:59:51
L.Vira

Option Explicit
Sub Auswahl()
Dim ausgewählterBereich As Range
On Error Resume Next
Application.DisplayAlerts = False
Set ausgewählterBereich = Application.InputBox(prompt:="Bitte Zelle auswählen", Type:=8)
If ausgewählterBereich Is Nothing Then Exit Sub
MsgBox ausgewählterBereich.Address
Application.DisplayAlerts = True
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Application.InputBox Verhalten
Peter

Hallo Forum,
bin schon eine ganze Zeitlang am suchen, finde aber nix.
Meine Aufgabenstellung:
Der Benutzer soll eine Zelle auswählen können, in dem sich der von ihm gewünschte Dateiname befindet.
Das Ganze wird über eine Application.Inputbox abgefragt.
Sub Dateiname() strDat...
23.05.2012 18:01:48
Thread-ID: 1264546
2 Beiträge
Application.InputBox
G_Heit

Hallo,
trotz recherche im Archiv habe ich für mein Problem keine Antwort gefunden.
Mein Code lautet:Sub eintragen()
Dim zelle_1 As Range
Dim text1
Set zelle_1 = Application.InputBox( _
Prompt:="Markieren Sie eine Zelle:", Type:=8)'Hier meine Frage:wenn ich den Abbruch-Button d...
13.02.2003 10:54:31
Thread-ID: 218469
3 Beiträge
Rückgabewert von Application.InputBox
MikeS

Hallo Leute,ich weise den über Application.InputBox (Type:=8 =Range)
erhaltenen Wert einer Variablen zu.Wenn der User allerdings auf den Zeilenkopf/Spaltenkopf klickt,
erhalte ich eine Fehlermeldung, da ich später mit Variable.Row
z.B. die Zeilennummer weiterverarbeiten will.Vielen Dan...
08.04.2003 13:01:25
Thread-ID: 241997
7 Beiträge
Application.InputBox + ListBox ?
calle
Hallo Leute,
bin mit meinem latein(vba) am ende.
wie bekomme ich meine Zellen von der InputBox in mein Listenfeld in der UserForm?
also den Inhalt der Zellen die ich ausgewählt habe (sind alle in einer Zeile)
...
lstBox.Clear
Set a = Application.InputBox("Zellen angeben", Typ...
20.01.2004 21:23:49
Thread-ID: 367490
6 Beiträge
Anzeige
application.inputbox
choutko

Liebe Leute,
Zuerst vielen Dank an Ralph, dani und Reinhard.
Ich habe folgendes Problem.
Ich schreibe einen Programm. Es sortiert ein Paar Daten aus einem xls Dokument und speichert sie in ein anderes xls
Ich würde gerne eine Inputbox aufrufen, in der ich nach dem Namen des Files,...
11.05.2005 22:43:29
Thread-ID: 610512
8 Beiträge
Anzeige
Wann Application.InputBox ?
Maxine

Hallo allerseits!
meine Frage bezieht sich auf die Inputbox, und zwar:
Wann verwende ich:
Set Bereich = Application.InputBox("Bitte wählen Sie einen Bereich", Type:=8)
Und wann:
Set Bereich = InputBox("Geben Sie einen Titel ein")
Also ohne Application. ?
Hat das was...
05.07.2005 23:51:47
Thread-ID: 633317
5 Beiträge
Application.Inputbox Type:=8 - Abbrechen
MichaV

Moin,
wie kann ich die Abbrechen- Taste abfangen? So gehts nicht:
Set rngZelle = Application.InputBox("Ab wo soll eingefügt werden?", , , , , , , 8) If rngZelle Is Nothing Then Exit Sub
Wenns nur mit On Error geht dann reicht kurze Info, das krieg ich hin.
Vielen Dank- Micha
14.09.2005 00:38:33
Thread-ID: 666800
3 Beiträge
Methode Application.Inputbox liefert Fehler 424
Masanja

Hallo,
bei Ausführung des folgenden denkbar einfachen Codes kommt es zum Laufzeitfehler 424 'Objekt erforderlich' in Zeile 7.
Das ist mir schleierhaft, denn in Zeile 2 wird ClassR als Range-Objektvariable definiert und in Zeile 7 sollte durch die Set-Anweisung das Ergebnis der Inputbox-...
13.04.2006 11:59:12
Thread-ID: 754850
9 Beiträge
Application.Inputbox
Mühlberger

Hallo, liebe Spezialisten !
In einer Prozedur hat der Benutzer die Möglichkeit, eine Zelle zu markieren, die dann weiter verarbeitet wird:
Set rngMarkierteZelle = Application.InputBox(prompt:="Bitte eine Zelle, die zur Veranstaltung gehört, anklicken. Weiter mit OK .", Title:="Auswahl...
12.07.2006 09:53:05
Thread-ID: 781328
5 Beiträge
Application.InputBox autom. bestätigen?
Rene

Hallo!
Gibt es eine Möglichkeit, eine Application.InputBox automatisch zu bestätigen (OK-Schaltfläche)? Beim Aufruf wird das Textfeld der Inputbox automatisch ausgefüllt. Es wäre vorteilhaft, wenn ich nicht extra auf OK klicken müsste, da die Werte in der Inputbox nicht geändert werden müss...
23.08.2006 01:28:48
Thread-ID: 794452
10 Beiträge
In Application.InputBox Bereich auswählen
Wolfgang

Hallo,
wegen schlechter Erfahrungen mit dem RefEdit-Control verwende ich Application.InputBox mit der Option 8, um einen Bereich zu erhalten - aus verschiedenen Gründen in einer separaten Funktion.
Function Boxen() As Range Set Boxen = Application.InputBox(Prompt:="Bitte Bereich wähle...
05.07.2007 15:09:00
Thread-ID: 884369
6 Beiträge

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige