Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
300to304
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Eingabeüberprüfung mittels VBA

Eingabeüberprüfung mittels VBA
27.08.2003 13:23:56
Björn
Hallo User!

Ich habe ien Frage. Wie kann ich Excel mittels VBA dazu bringen, dass nach jeder Eingabe in einem bestimmten Bereich der Tabelle (z.B. in den Spalten B,C und D) überprüft wird, ob Werte zwischen 0,000 und 2,000 oder "N/A" eingegeben wurden? Wenn es unzulässige Werte sind, soll der Inhalt der entsprechenden Zelle wieder gelöscht werden.

Könnt ihr mir da weiterhelfen?

Gruß,

Björn

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eingabeüberprüfung mittels VBA
27.08.2003 13:34:05
Nike
Hi,
ich würde über das menü Daten/Gültigkeit... Einstellungen|Benutzerdefiniert|
folgende Funktion eingeben:
=ODER(UND(B1>0;B1<=2);B1="N/A")

und diese Bedingung dann durch kopieren der formatierten Zelle runterkopieren...

Alles ohne VBA

Bye

Nike
AW: Eingabeüberprüfung mittels VBA
27.08.2003 13:39:20
Björn
...und wie könnte man das mit VBA lösen?
AW: Eingabeüberprüfung mittels VBA
27.08.2003 13:45:36
Nike
Hi,
so:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rngCheck As Range
Set rngCheck = Range("B:D")
If Not Intersect(rngCheck, Target) Is Nothing Then
Select Case Target.Value
Case 0 To 2
Case "N/A"
Case Else
Application.EnableEvents = False
Target.Value = ""
Application.EnableEvents = True
End Select
End If
End Sub


Bye

Nike
Anzeige

303 Forumthreads zu ähnlichen Themen

7 a in eine Zelle schreiben
Kai

Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke
07.08.2008 16:45:31
Thread-ID: 1000024
6 Beiträge
Anzeige
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Anzeige
Wert nach Änderung einer Zelle schreiben
Markus

Hallo Leute,
ich werde Excel nie wirklich verstehen. Habe wieder eine Frage: Bei Veränderung des Wertes einer Zelle möchte ich einen Wert in eine andere Zelle schreiben (klingt einfach - gelingt mir nicht!):
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorHandle...
01.10.2008 18:26:00
Thread-ID: 1013729
31 Beiträge
in Zellen Schreiben wenn Kriterium erfüllt
Nikolay

Guten Tag verehrte Damen und Herren,
lieber Namensvetter,
ich habe derweilen ein kleines Problem. Ich gestalte schon seit einigen Jahren meine persönliche Buchführung mit Excel.
Von Jahr zu Jahr wird das ganze komplizierter. Nun stehe ich vor einem Problem, welches ich selbst nicht...
05.10.2008 14:57:00
Thread-ID: 1014252
4 Beiträge
In Zelle mit Namen schreiben
fga

Hallo
Ich habe ein Tabellenblatt. In dem Blatt habe ich für die Spalten einen Namen definiert. Ebenso für die Zeilen. (links oben im Namensfeld)
Z.B.:
..... Sh1 Sh2 Sh3
Rh1
Rh2
Rh3
Nun möchte ich über den Namen der Zeile und Spalte die betreffende Zelle lesen,...
08.10.2008 15:27:04
Thread-ID: 1015078
12 Beiträge
Textbox Werte in Zellen schreiben
pritt

Hallo zusammen, ich komme nicht so richtig klar: Ich habe eine Userform mit 4 Textboxen, die zu Laufzeit vom User mit Werten gefüllt werden. Wenn alle 4 Textboxen gefüllt sind, sollen diese Werte in 4 verschiedene Zellen eines Tabellenblatts geschrieben werden. Folgenden Code habe ich bisher er...
13.11.2008 12:59:19
Thread-ID: 1024171
7 Beiträge
Datum/Autor für Eingabe mit "Historie" (vba)
Lukas

Hallo liebe Forumnutzer,
in meiner Unwissenheit wurde ich gebeten, folgendes umzusetzen:
In A5 wird ein Wert eingegeben, in A7 und A8 sollen einmal Autor und einmal Datum der Änderung notiert werden. Jetzt wird in A5 ein neuer Wert eingetragen, der alte Wert aus A5 soll inklusive Autor...
18.11.2008 17:52:05
Thread-ID: 1025721
4 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
2
4
16
5
30
3
11
6
3
8
3
3
12
12
2
2
14
1
6
6
2
1
8
1