Hilfe Zellen überwachen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column <> 3 Then Exit Sub If Target.Row > 14 Or Target.Row < 4 Then Exit Sub If IsDate(Target.Value) Then Range("D" & Target.Row).Value = Year(Target.Value) Range("E" & Target.Row).Value = Mid(Year(Date - Target.Value), 3) End If End Sub

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 Or Target.Column = 8 Then If Target.Row > 14 Or Target.Row < 4 Then Exit Sub If Target.Row = 3 Then If IsDate(Target.Value) Then Range("D" & Target.Row).Value = Year(Target.Value) Range("E" & Target.Row).Value = Mid(Year(Date - Target.Value), 3) End If End If If Target.Column = 8 Then If Target.Value < 47 Then gewicht = 1 If Target.Value > 47 And Target.Value < 52 Then gewicht = 2 If Target.Value > 51 And Target.Value < 57 Then gewicht = 3 Select Case gewicht Case 1 ' da ich nicht weiss was dann in die Zellen kommt, musst du´s selber nachtragen klasse = "Klasse 1" Case 2 klasse = "Klasse 2" Case 3 klasse = "Klasse 3" Case Else MsgBox ("Entweder kein Gewicht eingetragen oder Sie sind zu schwer ;)") End Select 'usw (da ich kein Beispiel hab, musst du´s selber weiterschreiben) Range("G" & Target.Row).Value = klasse End If End If End Sub

Zwei Sorgen habe ich noch vergessen!
Die Gewichtsklassen habe nach 2 Parametern unterschiedliche Bedeutung.
1.) männlich / weiblich.
Der Sportler trägt in ein Feld "M" oder "W" ein.
2.) Leistungsklassen.
Der Sportler trägt seinen Gürtel in ein Feld ein.
Daraus ergeben sich Leistungsklassen.
8.Kup = Leistungsklasse L2;
7.Kup = Leistungsklasse L2:
6.Kup = Leistungsklasse L2;
5.Kup = kann wählen Leistungsklasse L2 oder L1
Ab 4Kup bis zum 7Dan ist alle L1;
Die Leistungsklasse muss abhängig von Gürtel in ein Feld eingetragen werden.
Dann muss ich aus männlich/weiblich; Leistungsklasse und Gewicht eine Klasse zusammenstellen.
Es ist toll, das ich durch euch solle Hilfe bekomme und etwas lernen kann.
Mit Büchern komme ich nicht in mein Gehirn.
Mit freundlichen Grüßen
Wilfried

Hallo!
Die Gewichtsklassen habe nach 3 Parametern unterschiedliche Bedeutung.
1.) Wo wird männlich /weiblich eingetragen (Zeile von bis)
Männlich / Weiblich.
Der Sportler trägt in Feld J3 bis J52 "M" oder "W" ein.
2.) Leistungsklassen.
Der Sportler trägt seinen Gürtel in Feld H3 bis h52 ein.
Dort erlaube ich nur die unten aufgeführte Schreibweise.
Daraus ergeben sich Leistungsklassen.
8.Kup = Leistungsklasse L2;
7.Kup = Leistungsklasse L2:
6.Kup = Leistungsklasse L2;
5.Kup = Der 5.Kup Träger kann wählen
in welcher Leistungsklasse er startet. L2 oder L1
4Kup = Leistungsklasse L1;
3Kup = Leistungsklasse L1;
2Kup = Leistungsklasse L1;
1Kup = Leistungsklasse L1;
1Dan = Leistungsklasse L1;
2Dan = Leistungsklasse L1;
3Dan = Leistungsklasse L1;
4Dan = Leistungsklasse L1;
5Dan = Leistungsklasse L1;
6Dan = Leistungsklasse L1;
7Dan = Leistungsklasse L1;
3.) Jahrgänge
die Jahrgänge in der Leistungsklasse L1 sind:
Jugend D
Jugend C
Jugend BA
Senioren
(wobei die weiblichen Senioren Damen und männlichen Herren heißen.)
die Jahrgänge in der Leistungsklasse L2 sind:
Jugend D
Jugend C
Jugend B
Jugend A
Senioren
(wobei die weiblichen Senioren Damen und männlichen Herren heißen.)
Die Leistungsklasse muss abhängig von Gürtel in Feld 13 bis i52 eingetragen werden.
Dann muss ich aus: männlich / weiblich; Jahrgang; Leistungsklasse und Gewicht
eine Klasse zusammenstellen.
Ich habe eine Gewichtstabelle geschrieben, damit sichtbar wird, dass männlich,weiblich und die einzelnen Jahrgänge unterschiedliche Klassen haben und wie diese sich zusammen setzten.
Meine Tabelle send ich auch mit. Dann sind die Fragen vieleicht am besten beantwortet.
Da ich diese Tabellen alle in eine Daten Bank importier ist es halt gut, keine Formeln zu verwenden. Mit echten Einträgen läst sich eben nganz leicht eine CSV Datei erstellen.
Am Schluss solle jeder Verein das eine Blatt mit seiner Vereinsnummer per Mail
an turpmeldungen@.diepers.org senden.
Jetzt fällt mir aber wirklich nichts mehr ein. Danke für Deine Hilfe.
Mit freundlichen Grüßen
Wilfried

Beliebteste Forumthreads (12 Monate)

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread