Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Einträge unterbinden / ermöglichen

Einträge unterbinden / ermöglichen
04.07.2007 10:26:31
Salim

Hallo zusammen,
meine VBA-Kenntnisse reichen für folgende Geschichte nicht aus und ich würde mich über einen Feedback freuen:
Für den Bereich F558:X1076
Falls in Zeile X einen Eintrag in den Spalten G bis X gemacht wird wobei Spalte F leer ist, dann Msg Box "Bitte zuerst Monat und Jahr auswählen" sonst ok.
Gruss
Salim

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Einträge unterbinden / ermöglichen
04.07.2007 16:28:57
Beni
Hallo Salim,
kopiere diesen Code in das Modul der Tabelle, mit rechte Maustaste auf Tabellenregister/Code anzeigen.
Gruss Beni

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("F558:X1076")) Is Nothing Then Exit Sub
z = Target.Row
If Cells(z, 6) = "" Then
If Not Target = "" Then Target = "": MsgBox "Bitte zuerst Monat und Jahr auswählen"
End If
End Sub


Anzeige
AW: Einträge unterbinden / ermöglichen
04.07.2007 16:40:00
Salim
Vielen Dank,
werde ich gleich ausprobieren ;)))
Gruss
Salim
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige