Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1020to1024
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
Inhaltsverzeichnis

Eintrag nur in einem Feld zulassen

Eintrag nur in einem Feld zulassen
30.10.2008 09:34:00
Stephan
Hallo,
ich habe den alten Beitrag "Eintrag nur in einem Feld zulassen" gelesen und die Beispiel Datei https://www.herber.de/bbs/user/43570.xls in mein Formular eingearbeitet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A3:C3")) Is Nothing Then
Range("A3:C3").ClearContents
ActiveCell = "X"
End If
End Sub


Die gleiche vorgehensweise würde ich jetzt gerne für jede Zeile meiner Tabelle anwenden, bis runter zu A120:C120.
Vielen Dank für die Unterstützung,
Stephan.

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

Betreff
Datum
Anwender
Anzeige
AW: Eintrag nur in einem Feld zulassen
30.10.2008 09:46:16
Tino
Hallo,
meinst Du so?
Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("A3:C120")) Is Nothing Then
Range(Cells(Target.Row, "A"), Cells(Target.Row, "C")).ClearContents
ActiveCell = "X"
End If
End Sub


Gruß Tino

Anzeige
AW: Eintrag nur in einem Feld zulassen
30.10.2008 10:35:00
Stephan
...perfekt - vielen Dank.
Und wie sieht's aus, wenn ich das "X" in allen 3 Zellen einer Zeile zulassen möchte?
Vielen Dank nochmal.
Gruß, Stephan.
AW: Eintrag nur in einem Feld zulassen
30.10.2008 10:42:00
Tino
Hallo,
vielleicht könnte dies eine Lösung für Dich sein.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A3:C120")) Is Nothing Then
ActiveCell = IIf(Target = "X", "", "X")
End If
End Sub


Gruß Tino

www.VBA-Excel.de


Anzeige
AW: Eintrag nur in einem Feld zulassen
30.10.2008 10:49:36
Stephan
Vielen Dank.

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige