MarieLuise1983
10.04.2017, 09:35
Mit Excel Sportzeiten auswerten?

Ich möchte mit Excel Differenzen/Verbesserungen/Verschlechterungen ausrechnen lassen. Ganz konkret geht es um Zeiten von Schwimmwettkämpfen. Es soll ausgerechnet werden was jeweils die Differenz (positiv/negativ) zum letzten Wettkampf ist. Ich habe 4 Disziplinen in der Tabelle. Meine Tabelle habe ich folgendermaßen gegliedert:

  • A= Datum
  • B= Wettkampf/Veranstaltung
  • C= Disziplin 1
  • D= Differenz1
  • E= Disziplin 2
  • F= Differenz2
  • G= Disziplin 3
  • H= Differenz3
  • I= Disziplin 4
  • J= Differenz4

Vielleicht wäre eine andere Einteilung besser?!

Vielen Dank im Voraus.

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
10.04.2017, 11:03

Wie Suboptimierer schon anmerkte, ist der Aufbau zur Auswertung geeignet.

Zu beachten ist allerdings: es sind zwangsläüfig negative Zeiten (Verschlechterung) zu erwarten. Da Excel damit nur um "1904"-Modus rechnen kann, ist VOR Einrichtung der Tabelle auf "1904" umzustellen:
Excel Optionen / Erweitert / Beim Berechnen dieser Arbeitsmappe / 1904-Datumswerte verwenden, hier den Haken setzen.

Mit dieser Einstellung erstellte ich mit den von Dir vorgeschlagenen Angaben mal eine Mustertabelle (siehe angefügte Bildschirmkopie).

In den Spalten mit der Differenz wird der aktuelle Wert der linken Spalte vom vorhergendem abgezogen, also die Verbesserung/Verschlechterung dargestellt. Damit wären Deine Anforderungen erfüllt, eine Übersicht ist möglich.

Zur besseren Übersicht dienen in meinem Beispiel die Zeilen 1 und 2.
Es wird die Ober-Untergrenze der gesamten Spalte angezeigt:
Zeile 1, Beste Zeit (geringster Wert): = MIN(C4:C7)
Zeile 2, schlechteste Zeit (höchster Wert): =MAX(C4:C7)

Diese besten/schlechtesten Zeiten werden in der Tabelle (hier nur bis Zeile 7 ausgeführt, ist natürlich erweiterbar) in der "Bedingten Formatierung" mit grünem/rotem Hintergrund hervorgehoben, die Markierungen passen sich damit den Gegebenheiten an.
In den Differenzspalten werden Verschlechterungen mit rotem Hintergrund angezeigt, ebenfall mit der "Bedingten Formatierung" erstellt.

Die "Bedingten Formatierung" sind in der Bildschirmkopie zu sehen.

Kommst Du damit klar?

Gruß aus Berlin

 ...zur Antwort
Holger4211
28.06.2016, 10:30
Ausgeblendete Spalten nicht mit berechnen?

Hallo User,

Ich habe noch eine Frage an die Experten. Das mit dem Drucken hat ja super geklappt. Ich habe in meiner Exel Tabelle ca . 10 Namen stehen in der ersten Spalte in der zweiten und dritten stehen Uhrzeiten. In der 4 werden diese als Dauer des Aufenthaltes angezeigt. In der letzten Spalte werden die 10 Aufenthalte als gesamt Dauer des Aufenthaltes angezeigt. Gibt es eine Möglichkeit das ich jetzt wenn ich eine Spalte ausblende diese dann von der gesamtdauer abgezogen wird und beim einblenden wieder dazu. Vielen Dank schon mal.

Viele Grüße Holger

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
28.06.2016, 10:50

Eine Berechnung der "sichtbaren" Zellen erreichst Du mit
=TEILERGEBNIS(9;A2:A50)
Wobei die "9" Summe bedeutet (1=Mittelwert, 2=Anzahl,...)

Deine Frage mit dem Drucken scheint ja erledigt zu sein. Wie wäre es, in den dazugehörigen Antworten das mal zu erklären, sich zu bedanken, die beste Antwort auszuzeichnen, kurzum: Dich dort mal zu äußern?

Gruß aus Berlin

 ...zur Antwort
Gadget268
19.04.2016, 08:50
Wie kann man in Excel eine "Bedingte Formatierung" auf alles anwenden?

Hallo Zusammen,

Ich möchte in Excel eine bzw. mehrere bedingte Formatierungen auf das ganze Excel-Dokument anwenden. Auf das ganze "Sheet/Tabelle" ist kein problem, aber auf mehrere Sheets/Tabellen klappt bei mir nicht. Schön wäre, dass es, wenn ich ein neues "Sheet/Tabelle" erstelle, die bedingte Formatierung automatisch dann auch auf das neue "Sheet/Tabelle" erstellt.

Falls nicht klar ist was ich mit "Sheet/Tabelle" meine habe ich ein Bild eingefügt.

Vielen Dank für ihre Antwort

Gadget268

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
19.04.2016, 12:25

Die Antwort von TheHunter kann ich ebenfalls nicht nachvollziehen (XL2007).

Lösungsvorschlag:

Bedingte Formatierungen in Tabelle1 einsetzen
Tabelle1 mit "verschieben/kopieren" kopieren
jetzige Tabelle "Tabelle1 (2)" umbenennen in "Tabelle2"
(BedFormatierungen sind enthalten)
so oft wiederholen, bis die Anzahl benötigter Tabellen erreicht ist.

Jetzt ggf. diese "Mastertabelle" als Datei oder als Vorlage speichern.

Ist Dir damit geholfen?

Gruß aus Berlin

 ...zur Antwort
Marcel0531
05.12.2014, 15:39
Wie kann ich bei Excel eine Tabelle(Personennamen) in andere Tabellenblätter per Formel kopieren?

Hallo zusammen,

und zwar möchte ich eine Tabelle mit Personennamen in Excel automatisch in andere Tabellen-Blätter kopieren. Dabei sollen auch Änderungen automatisch in die anderen Tabellen implementiert werden, z.B. wenn ein neuer Name zwischen zwei bestehenden Namen eingefügt wird, soll das auch so in den anderen Tabellen eingefügt werden.

Danke im Voraus!

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
06.12.2014, 08:47

Die Formel, die hier hilft, ist:

=INDEX(Tabelle1!A:A;ZEILE())

Annahme: Die Quelle ist Tabelle1, Spalte A
Ziel ist Tabelle 2, Spalte A

dann übernimmt die Formel alle Werte aus Tabelle 1, auch eingefügte Zellen, in Tabelle2

Die Quellspalte (hier A:A) ist natürlich anpassbar.

Gruß aus Berlin

 ...zur Antwort
marinus94
03.12.2014, 09:26
Vba Programm schleife um viele Variablen zu deklarieren

hey habe folgendes Problem: ich brauche in meinem Programm sehr viele Variablen und möchte allen einen wert zuweisen kann ich das übersichtlich in eine schleife packen also nicht so: W1=3 W2=3 W3=3 W4=3 ....... statt dessen will ich alles in eine schleife packen erster versuch:

Dim schleife As Integer
schleife = 1
Do While schleife < 73
W& schleife = 3        'hier ist das problem^^
schleife = schleife + 1
Loop

schon mal danke für eure vorschläge ;)

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
03.12.2014, 10:56

Wenn die Arbeit mit Array möglich ist, ist es die bessere Variante (Antwort tooob)

Dein Gedanke mit dem Zuweisen von Werten im Array ist richtig.
Allerdings würde ich eine einfachere Schleifenform wählen:

For i = 1 to 100 : W(i) = 3 : Next i

Danach ist den Variablen W(1) bis W(100) der Wert 3 zugewiesen.

Übrigens kann man auch mehrfach dimensionieren: W(1,1) oder W(1,1,1)

Gruß aus Berlin

 ...zur Antwort
Vacifica
27.11.2014, 22:08
Excel: Abfrage beim Öffnen

Hi,

ich möchte eine Excel Vorlage erstellen.

In einem Beispiel soll in A1 die Anrede stehen und in B2 der Name von einer Person.

Beim Öffnen der Vorlage soll mich Excel fragen ob es sich um "Herrn" oder "Frau" handelt, also mich vor eine Auswahl stellen. Wenn ich Herrn anklicke, soll dies in A1 erscheinen.

Nachdem ich auf OK geklickt habe soll ein zweites Fenster geöffnet werden, bevor Excel mich in die Tabelle lässt, indem ich den Namen eintragen kann, der dann in B2 erscheint.

Vielen Dank im Voraus für alle ernst gemeinten Bemühungen :)

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
28.11.2014, 10:47

Dein Vorhaben, Eingaben bei Öffnung der Datei zu verlangen, ist nur mit einem Makro zu erreichen.

Für das Schreiben von Makros ist VBA (Visual Basic for Applications) nötig. Dieses ist in Excel bereits implementiert. Man muss es nur noch kennen und beherrschen.

Hier wäre ein Makro erforderlich, das beim Öffnen anfängt zu arbeiten: Private Sub Workbook_Open()

Kennst Du Dich mit Makros aus ?

Gruß aus Berlin

 ...zur Antwort
Schubbydu
14.11.2014, 19:17
Excel-Diagramme

Hallo,

ich habe folgendes Problem :

Für ein Praktikum in der Uni muss ich ein Diagramm mit Hilfe von Excel erstellen. Anfangs dachte ich ist ja nicht so schwer, doch dann stellte sich folgendes Problem auf :

Ich soll die Werte von Ua
0,003
0,625 1,25 1,875 2,5 3,125 3,75 4,375 5 5,625 6,25 6,875 7,5 8,125 8,75 9,375 und die Werte von Uv 0,625 1,25 1,875 2,5 3,125 3,75 4,375 5 5,625 6,25 6,875 7,5 8,125 8,75 9,375

auf der Y-Achse auftragen und auf der X-Achse sollen die Werte von (0,1,2,3......,15) stehen. Das Diagramm bekomm ich auch hin, aber dann scheitert es daran das die Differenz, der einzelnen Werte, so klein ist, dass Excel mir das nicht vernünftig darstellen kann ( es liegt nicht an Excel, sonder an mir, das weis ich auch :D ) D.h im Grunde, dass sich die einzelnen Punkt überdecken und größten Teils kaum sichtbar ist, dass es sich um zwei eigenständige Funktionen handelt. Ich hab schon alles mögliche versucht und auch ausprobiert mit Skalierung ändern etc., aber nicht half, machte es eher noch schlimmer. Also wenn mir jemand helfen könnte wäre das echt sehr nett :)

Ich werde auch noch ein Bild anhängen wie es am Ende aussehen soll (Stufentabelle), vorab schon mal ich wollte mir durch Excel nur die Punkte der beiden Graphen darstellen lassen und sie dann per Hand verbinden ( auf das angehängte Foto bezogen)

MfG

Schubbydu 8)

P.s Alles was mit Grammatik und Syntax oder sonstigem zutun hat interessiert mich nicht :) also einfach gar nicht ansprechen.

...zur Frage
Hilfreichste Antwort
von Britzcontrol
15.11.2014, 10:34

So kann das Stufendiagramm aussehen.

Da Du ja keine Erklärung wünschst, nur kurz der Hinweis auf "Punkte mit geraden Linien".

Gruß aus Berlin

 ...zur Antwort
drosophilia
22.04.2014, 23:57
Excel Balkendiagramm - wie mache ich eine doppelte Achsenbeschriftung der x- Achse?

Liebe Community und Excel- Profis,

ich würde gerne ein Balkendiagramm erstellen, bei dem meine x- Achse doppelt beschriftet ist. Jeder Balken steht für einen Tag (24, 48,72h), 9 insgesamt. 3x3 Balken (=3 Tagesmessung) und sollte einzeln mit 24h, 48h und 72 h beschriftet sein. Diese Einzelbeschriftungen stehen eigentlich in der Legende, die will ich eben vermeiden und die Daten lieber in das Diagramm eintragen. Unter diesen einzeln beschrifteten Balken sollen die Beschriftungen stehen, die einzeln die Dreitageseinheit beschriften. Also sodass ich damit sage: 3 Versuchsreihen à 3 Tage, an denen gemessen wurde. In jeder Versuchsreihe von den dreien wurde eine andere Konzentration eines Stoffes benutzt.

Ich hoffe, das klang jetzt nicht zu verwirrend. Zur Erleichterung nochmal grob, was ich will: - X- Achse doppelt beschriften -Legenden- Werte als Beschriftung der X-Achse für die einzelnen Säulen

Ich danke euch vielmals, liebe Grüße, Eure Drosophilia

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
23.04.2014, 07:23

Wenn ich Dich richtig verstehe, siehe mein Beispiel.

Auf Balken klicken, rechte Maustaste, "Datenbeschriftungen formatieren..."
anklicken: "Datenreihenname" ("Wert" abwählen)
und "Basis innerhalb"
und im Diagramm die "Legende" löschen.

Gruß aus Berlin

 ...zur Antwort
martinob73
22.04.2014, 08:13
Wie kann ich in Excel das erste Wort in einer Spalte immer gross schreiben lassen

Also sagen wir mal ich habe die beiden Wörte: red car in einer Zelle.

Jetzt soll die Zelle so aussehen : Red car . Also immer nur das erste Wort gross geschrieben.

Gibt es dafür eine Umwandlung? Zur Not auch mit einem Programm wie Notepad ++ oder ähnlichem.

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
22.04.2014, 09:07

In einer Hilfsspalte (im Beispiel Sp B) setzt man eine Formel ein.

Wahlweise je nach gewünschtem Ergebnis die entsprechende Formel.

XL wandelt bei GROSS() alles in Großbuchstaben
bei GROSS2() die Wortanfänge in Großbuchstaben, oder
mit einer kleinen Manipulation, nur den ersten Buchstaben um.

Hier wird die Formel aus Zeile 3 die richtige sein.

Bei Bedarf kann man jetzt die Hilfsspalte kopieren und in Spalte A die Werte überschreiben.

Gruß aus Berlin

 ...zur Antwort
albinoguitar
10.04.2014, 15:48
Excel Suchfunktion für Spalte

Hallo an alle,

ich arbeite zur Zeit an einer Excel-Tabelle und benötige etwas Hilfe bei einer integrierten Suchfunktion.

Die Tabelle ist recht groß - das einzige, das mich allerdings interessiert ist Spalte B, in der inzwischen mehrere hundert Wortkürzel stehen (z.B. ABS, TPP, KVP).

Um es benutzerfreundlicher zu machen möchte ich ein Suchfeld integrieren, mit dem ich die Spalte B nach Wörtern durchsuchen kann. Hier mal kurz die Eckdaten, wie ich mir das ganze Vorstelle:

  • Einzelnes Suchfeld, in das ein Wort eingegeben werden kann

  • Programm springt nach Eingabe zur Position des Kürzels

  • Suche soll genau das eingegebene Wort suchen und nicht alle Wörter, in denen diese Textkombination enthalten ist. Wenn ich nach PA suchen würde, würde er mir sonst wahrscheinlich 300 Wörter markieren!

Wunschanforderung wäre, dass Excel mir einfach alle Wörter markiert (z.B. rot umrandet), da manche Kürzel auch mehrfach in der Tabelle stehen.

Ich habe zwar schon eine Formel aber die benötigt 2 Felder und das findet mein AG nicht genial genug :D

Bestens wäre natürlich ein VBA-Code, die kann ich aber leider nicht selbst programmieren und finde kein Tutorial dafür, noch einen geeigneten Code im Internet.

Falls jemand bereit wäre mir dabei zu helfen, schreibe ich natürlich gerne mehr Informationen zur Tabelle. Ansonsten Danke für alle (Verbesserungs-)Vorschläge und konstruktiven Kommentare ;)

LG

...zur Frage
Hilfreichste Antwort
von Britzcontrol
11.04.2014, 08:28

Hier mal auf die schnelle ein ganz einfaches Makro, das in der Sp B das Vorkommen (auch mehrfaches) des Wertes in Zelle C1 mit roter Füllfarbe markiert:

Sub suchen1()
such = Cells(1, 3) 'Suchwort aus C1
letzteZ = Range("B65536").End(xlUp).Row
For i = 2 To letzteZ
  If Cells(i, 2) = such Then
    Cells(i, 2).Select
    Selection.Interior.Color = 255 'rot
  End If
Next
End Sub

Um die Markierungen wieder zu löschen:

Sub Markierung_weg()
Range("B2:B2000").Select
Selection.Interior.Pattern = xlNone
Range("c1").Select
End Sub

Weiterer "Firlefanz" wie "geben Sie Ihr Suchwort in C1 ein" oder "Groß/Kleinschreibung beachten" kann und sollte in Deiner Tabelle von Dir selbst ohne Schwierigkeiten machbar sein, oder ?

Gruß aus Berlin

 ...zur Antwort
KBS880
09.04.2014, 09:10
An Alle Excel-Experten: Optionsfeld in Formel Einbinden

Hallo zusammen,

ich habe folgendes Problem:

Ich möchte, dass der Kunde eines der beiden Punkte anklicken kann. Ich verwende dazu das Formularsteuerelemtent "Optionsfeld"

Die Formel wird in den "F"-Feldern stehen.

Die Erste Option ist Kostenlos.

= Wenn D43 ausgewählt, dann in Zelle F43 0,00€ lassen

Falls die Zweite Options (Support Premium) ausgewählt ist, dann sollen einmal 300,00€ berechnet werden.

=WENN D44 ausgewählt, Dann in F44 berchechnen: E44*1 Das also 300€ im F44 drin stehen.

Das immer so weiter. Wenn Support High Availability ausgewählt wird, die andern Felder wieder 0,00€ und im Feld F45 dann 600,00€

Wenn ein Feld ausgewählt, den jeweiligen Betrag hinten bei F einfügen.

Ich hoffe jemand kann mir helfen !

Gruß KBS880

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
09.04.2014, 10:28

Hier die passende Bildschirmkopie zur Antwort von ProRatione.

angepasst ist Zelle D43 (statt x100) und Ausgabe (statt "0") = nichts

Gruß aus Berlin

 ...zur Antwort
DonnieYen
10.12.2013, 16:39
Excel VBA: Werte in jeweils vorgegebene Zelle schreiben

Die VBA-Programmierung ist für mich Neuland und ich bitte um Untersützung bei einer Sache:

Ich möchte Werte eines Arbeitsvorgangs, die in einem Excelsheet "WO-Vorgangsliste" sich befinden, in ein anderes Sheet "WO-Ablaufplan" in die jeweils vorgegebene Zelle schreiben. In der "WO-Vorgangsliste" sind mehrere Vorgänge als Datensätze gelistet. Jeder Vorgang bzw. jeder Datensatz beinhaltet in Spalte 9 als Wert die Zellenposition, wo er hinkopiert werden soll.

Konkret: -für ersten Vorgang: Wert in Zeile 5 Spalte 7 (5,7) soll gemäß (5,9) in "WO-Ablaufplan" in Zelle (Z41S9)

-für zweiten Vorgang: Wert in Zeile 6 Spalte 7 (6,7) soll soll gemäß (6,9) in "WO-Ablaufplan" in Zelle (Z76S17)

-für dritten Vorgang: Wert in Zeile 7 Spalte 7 (7,7) soll soll gemäß (7,9) in "WO-Ablaufplan" in Zelle (Z36S12)

-allgemein: Schleife für: Wert von Zeile i Spalte 7 gemäß hinterlegter Zellenposition aus Zeile i Spalte 9 der"WO-Vorgangsliste" in entsprechende Zelle von "WO-Ablaufplan" (gemäß hinterlegtem Wert aus Zeile i Spalte 9) kopieren.

Ich hoffe, das ist soweit verständlich und freue mich auf eure Unterstützung!

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
12.12.2013, 07:58

Der Text des Makros schein wohl zu klein zu sein. Darum hier nochmal das Makro:

'Wert in x9 kommagetrennt
Dim Transp(10), Ort(10)
Sub AblPl_VorgL()
'Einlesen
Worksheets("WO-Vorgangsliste").Select
For i = 5 To 7
Transp(i) = Cells(i, 7)
Ort(i) = Cells(i, 9)
Next i
'Ausgeben
Worksheets("WO-Ablaufplan").Select
For i = 5 To 7
Cells(Int(Ort(i)), ((Ort(i) - Int(Ort(i))) * 10)) = Transp(i)
Next i
End Sub

Gruß aus Berlin

 ...zur Antwort
Liteon
09.12.2013, 08:34
Kalender erstellen mit VBA

Ich stehe grad auf dem Schlauch und würde mich wirklich sehr über aussagekraftige Antworten freuen.Ich würde gern einen Kalender erstellen mit VBA in Ecxel in den ich mit einen Commandbutton einen Kalender erstellen kann und dieser dir Wochentag,Monat und so weiter anzeigt aber du auch in einer Tabelle z.B. Urlaub eintragen kannst und er dir das gleich mit im Kalender anzeigt wenn er erstellt wird.Habe schon ein wenig Quellcode zusammengeschrieben es kommt aber immer Laufzeitfehler 1004 Anwender- oder opjektdefinierter Fehler der Debugger sagt mir es wäre etwas an der Zeile: With Worksheets("Kalender").Range("A1;L35") = Worksheets("Kalender").Cells = "bytMonth" falsch.

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
10.12.2013, 07:22

So läuft es:

    Private Sub Kalender_Click()

Dim ws As Worksheet
Dim strMeldung As String
Dim strTitel As String
Dim strAntwort As String
Dim varYear As Variant
Dim bytMonth As Byte
Dim bytDay As Byte
Dim bytWeekday As Byte
Dim strWeekday As String
Dim bytWeeknumber As Byte
Dim bytDummy As Byte

' Das Jahr des Kalenders der ausgegeben werden soll

strMeldung = "Geben Sie das Jahr ein!"
strTitel = "Eingabe Jahr"

strAntwort = InputBox(strMeldung, strTitel)
varYear = strAntwort

' Falls bereits ein Blatt mit dem Namen "Jahr xxxx" entsteht, ' soll dieses gelöscht werden
For Each ws In Worksheets
If ws.Name = "Jahr " & varYear Then ws.Delete
Next ws
' Ein neues Tabellenblatt mit dem Namen "Jahr xxxx" einfügen
Worksheets.Add
ActiveSheet.Name = "Jahr " & varYear

' Monatsüberschriften einfügen und formatieren

For bytMonth = 1 To 12
Cells(1, bytMonth) = bytMonth ' Monatszahl in Zeile 1
  'With Worksheets("Kalender")
     '.Range("A1:L35") = Worksheets("Kalender")
     '.Cells = "bytMonth"
     '.Value = Format(DateSerial(varYear, bytMonth, 1), "mmmm")
     '.Interior.ColorIndex = 36
     '.Font.Bold = True
  'End With
  
  ' Tage aufbereiten
  For bytDay = 1 To Day(DateSerial(varYear, bytMonth + 1, 0))
     With Cells(bytDay + 1, bytMonth)
       bytWeekday = Weekday(DateSerial(varYear, bytMonth, bytDay))
       
       ' Wochentage in Textformat aufbereiten
       Select Case bytWeekday
          Case 1
             strWeekday = "So"
          Case 2
             strWeekday = "Mo"
          Case 3
             strWeekday = "Di"
          Case 4
             strWeekday = "Mi"
          Case 5
             strWeekday = "Do"
          Case 6
             strWeekday = "Fr"
          Case 7
             strWeekday = "Sa"
       End Select
       
       ' Wochentage und Tage eintragen
       .Value = strWeekday & ", " & bytDay
       ' Samstage hellgrau hervorheben
       If bytWeekday = 7 Then
          .Interior.ColorIndex = 15
       End If
       
       ' Sonntage dunkelgrau hervorheben
       If bytWeekday = 1 Then
          .Interior.ColorIndex = 48
       End If
       ' Kalenderwoche eintragen
       bytWeeknumber = _
          Format(DateSerial(varYear, bytMonth, bytDay), "ww")
       If bytDummy < bytWeeknumber And strWeekday <> "So" Then
          bytDummy = bytWeeknumber
          .Value = .Value & " (" & bytDummy & ")"
          ' Formatierung Kalenderwoche >ZWEI FARBEN IN EINER ZELLE
          With .Characters _
               (Start:=InStr(1, .Value, "("), Length:=4).Font
             .Size = 8
             .Color = vbRed
          End With
       End If
     End With
  Next bytDay

Next bytMonth
End Sub

Einige Änderungen:
Name des TabBl (Active Sheet.Name ...)
Monatszahl in Zeile 1
Range("A1:L35") von Oubyi richtig bemerkt
'With Worksheets("Kalender")... als Kommentar

Sieht zwar nicht toll aus, aber funktioniert.

Gruß aus Berlin

 ...zur Antwort
Holsty
21.04.2013, 13:50
Excel Tabelle Hilfe Rangliste

Griaz euch Leute, ich brauch eure Hilfe!

Wir machen ein Fußballturnier, das sich über ein paar Monaten erstreckt. Passend dazu, habe ich mich bereit erklärt, eine Excel-Tabelle anzufertigen, um die jeweiligen Punkte festzuhalten. In diesem Fall kriegt nicht die Mannschaft, sondern jeder einzelne Spieler Punkte, da die Mannschaften ja nach jedem Spiel neu gemischt werden. Ich muss es so auf die Reihe bekommen, dass sich die Spielernamen im direkten Zusammenhang mit deren Punkten sich auf der Rangliste hoch und runter bewegen. Also wenn Ali z.B. 10 Punkte hat, Marco aber nur 5, dass Ali automatisch auf Rank 1 geht, und Marco abrutscht. Natürlich müssen sich auch die Punktetabellen mitverschieben, wenn ihr versteht was ich meine. Ich habe einen Ausschnitt von dem Ganzen, bin für jede Hilfe dankbar. ;)+

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
22.04.2013, 08:28

Eine weitere Möglichkeit wäre das Sortieren.

Die Einträge in Spalte B bis H markieren,

Sortieren/Filtern
Benutzerdefiniertes Sortieren,
Sortieren nach: Spalte H
Reihenfolge: nach Größe (aufsteigend)

Spalte A (Rang) wird nicht mitsortiert.

Somit sind die Erfordernisse des Fragestellers erfüllt.

Gruß aus Berlin

 ...zur Antwort
Rotfuxs
04.09.2012, 09:47
Microsoft Excel - Februar / Schaltjahr im automatisierten Kalender

Juten Morjen - Again! (^_^)

Ich bastle - immer noch - an einem Excel-Kalender, der sich automatisch an das aktuelle Jahr anpasst. Das klappt bisher auch wunderbar. Die Tage und auch die Wochentage ändern sich von alleine, ganz entsprechend dem Jahr, welches man ein Tabellenblatt weiter hinten frei ändern kann.

Was fehlt sind zum einen die Kalenderwochen, die sich noch nicht selbstständig anpassen (im Bild ist z.B. die 4. Kalenderwoche zu sehen) und zum anderen das Ende vom Februar. Die Umstellung zum Schaltjahr macht mir ordentlich zu schaffen.

Nun suche ich Ideen, wie ich das so hinbiege, dass der Februar automatisch 28, bzw. 29 Tage hat, je nach Schaltjahr oder nicht.

Und eben, wie ich die Kalenderwochen automatisch korrekt angezeigt bekomme. Daran tüftle ich selbst gerade noch, aber vielleicht habt ihr ja flux 'ne gute Idee. (^.^)

So weit erstmal. Vielen Dank! ^^

Gruß, Rot-Fuxs

PS: Wen es interessiert, die Formeln die ich bisher nutze. Repräsentativ, hier vom 28. Februar:

Tage: =DATUM('Jahr anpassen'!$B$21;SPALTE()-7;ZEILE()-2)

Wochentage: =DATUM('Jahr anpassen'!$B$21;SPALTE()-8;ZEILE()-2)

'Jahr anpassen' ist das zweite Kalenderblatt. Da ist nur eine große Jahreszahl drauf, die verändert werden kann um den gesamten Kalender automatisch umzustellen.

Im Endeffekt ist das Format der formal dann dieses: =DATUM(Jahr;Monat;Tag)

'Jahr anpassen'!$B$21 = 2013

SPALTE()-7 = I-7 = 9-7 = 2 = Februar

ZEILE()-2 = 30-2 = 28

Im Prinzip sind alle Tage gleich, da ja immer die Spalten / Zeilen als Ausgangspunkt genommen werden. So funktionieren eben auch die Tage und Wochentage genau gleich, nur eben mit einem Spaltenversatz. und bei den Wochentagen sind die Zellen eben auf Wochentage (MO, DI, MI, ...) formatiert und nicht auf Zahlen.

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
04.09.2012, 10:41

zum 29. Februar:

In der Zelle, in der der 29. (im Schaltjahr) erscheint oder nicht erscheint, prüfst Du, ob das anzuzeigende Datum noch Februar ist, oder schon März. Wenn schon März, dann KEINE Anzeige.
= WENN(MONAT(DATUM('Jahr anpassen'!$B$21;SPALTE()-7;ZEILE()-2))=2;DATUM('Jahr anpassen'!$B$21;SPALTE()-7;ZEILE()-2);"")

Gruß aus Berlin

 ...zur Antwort
MrAnonym87
06.08.2012, 11:57
Exel Zellenfarbe einer anderen Zelle übernehmen

Hi, ich habe eine Frage zu Exel und geht schon recht tief in die Materie:

Ich habe eine Bedingte Formatierung für einen Zeilenbereich angelegt (3-Farben-Skala), was natürlich kein Problem darstellt, mein Problem liegt nun darin, dass ich bestimmte benachbarte Zellen Gleichfarbig darstellen möchte wie die sich farblich ändernden Zellen.

eine Formel ist leider nicht anwendbar, da die Werte in der bedingt Formatierten Spalte variabel sind und eventuell auch gleiche Werte haben können, also keine feste Anzahl von unterschiedlichen Farben vorhanden ist und mein Problem folglich nur mit übernahme einer Zellenfarbe möglich scheint.

Um es vorweg zu nehmen: es ist eine größere Berechnungstabelle, in der jede Zelle eigene Werte (über Formeln) errechnet und die zu ändernden Zellen mit der Hintergrundfarbe haben auch beinhaltende Formeln (wenn,.....)

Danke im Vorraus

 ...zur Frage
Hilfreichste Antwort
von Britzcontrol
07.08.2012, 10:32

Dieses Makro wird ausgeführt, wenn neu berechnet wird (...Calulate).
Im VBA-Monitor (erreichbar mit F11) in das entsprechende Arbeitsblatt (hier(Tabelle 1) kopieren und .... fertig. 

Private Sub Worksheet_Calculate()
For i = 8 To 23 'von...bis Zeile
    Cells(i, 14).Select 'Zeile 8, Spalte 14 (N)
        Selection.Copy 'Formatierung holen
    Range(Cells(i, 15), Cells(i, 19)).Select 'auswählen Zielbereich 1
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False

Cells(i, 14).Select 'nochmal Formatierung holen
Selection.Copy
Range(Cells(i, 21), Cells(i, 24)).Select 'auswählen Zielbereich 2
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
    SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False

Next i
End Sub

(natürlich gehören Next I und End Sub mit ins Makro, das will hier aber nicht in den Code)

Berichte mal, ob es so gedacht war.

Gruß aus Berlin

 ...zur Antwort
Weitere Inhalte können nur Nutzer sehen, die bei uns eingeloggt sind.