Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1016to1020
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

Nach Enter Makrostart

Nach Enter Makrostart
22.10.2008 15:34:00
Tom
Hallo,
ich möchte erreichen, dass ein Makro startet, sobald in Zelle I (I31:I207) eine Zahl eingegeben wird und danach die Entertaste bestätigt wird.
Hat jemand ne Idee?
Gruß und Danke vorab
TOM

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

Betreff
Datum
Anwender
Anzeige
AW: Nach Enter Makrostart
22.10.2008 15:37:00
David
Hallo Tom.
Schreibe ins VBA-Fenster der betreffenden Arbeitsmappe:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("I31:I207")) Is Nothing Then
'hier kommt dann dein Code, ggf. auch per Call
End If
End Sub


Gruß
David

AW: Nach Enter Makrostart
22.10.2008 15:38:00
Rudi
Hallo,
sowas?
In das Modul der Tabelle:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("I31:I207")) Is Nothing And Target.Count = 1 Then
If IsNumeric(Target) Then
MsgBox "Zahl eingetragen."
End If
End If
End Sub


Gruß
Rudi

Anzeige
AW: Nach Enter Makrostart
22.10.2008 15:41:37
Chris
Servus,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column  9 then Exit Sub
If Target.Cells.Count > 1 then Exit Sub
If Target = "" Then Exit Sub
If Not Intersect(Target, Range("I31:I207")) is Nothing Then
If IsNumeric(Target) Then
'Hier dein Makro
End if
End if
End Sub


Gruß
Chris

AW: Nach Enter Makrostart
22.10.2008 15:47:30
Tom
Danke Euch allen - klappt super!
Gruß
TOM

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige