Office - Word, Excel und Co. 9.744 Themen, 41.399 Beiträge

Verfolgung starten Optionen

Excel nd Bedigte Formatierung

pappnasen / 11 Antworten / Flachansicht Nickles

Hallo Helfer.

Mich ärgert die Bedingte Formatierung.

Fall 1
=UND(SUMME(A1:C3)=5;AB2<>1) Hier ist das Feld rot
=SUMME(A1:C3)=B2                    Hier wird es schwarz

Fall 2
=UND(SUMME(A10:C12)=5;AB11<>1)
=SUMME(A10:C12)=B11

Fall3
=UND(SUMME(A19:C21)=5;AB20<>1)
=SUMME(A19:C21)=B20

Ich habe drei Zahlenfelder. Wenn ich alle Zahlen bis auf eine lösche wird die einzelne Zahl rot. Klicke ich nun die rote Zahl an, dann wird sie schwarz.

Das funktioniert aber nicht bei Fall 2.  Hier bleibt das Feld rot

Was mache ich faisch oder ist Excel doof.

Das hat was mit Sudoku zu tun.
Wird eine Zahl angeklickt, dann werden alle infrage kommenden Zahlen in den anderen Feldern gelöscht.

bei Antwort benachrichtigen
Ich habe den Fehler gefunden. Beim Kopieren von einem Tabellenblatt in ein anderes mittels Makro werden merkwürdigerweise ... pappnasen
Na na - und nee, das Teil ist total schlau und sehr sehr nützlich. Aber weil es so viel kann, können die meisten Nutzer ... Anne_21
Was ist LiteOffice ? Oder meinst Du LibreOffice? mumpel1
Danke für die Korrektur. Das Lite kam aus einem anderen Zusammenhang leider hinein. Natürlich arbeite ich jetzt mit ... Anne_21
Kannst ja den VBA-Code mal posten, vielleicht findet jemand das Problem? mawe2
pappnasen mawe2 „Kannst ja den VBA-Code mal posten, vielleicht findet jemand das Problem?“
Optionen

Sub Resetten()
    Dim Zeile As Integer, Spalte As Integer
    Blattname = ActiveSheet.Name
    Sheets("Vorlage").Select
    Range("A1:AB28").Select
    Selection.Copy
    Sheets(Blattname).Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ' ActiveSheet.Paste
    Range("AD30").Select
    
    For Zeile = 3 To 21 Step 9
        For Spalte = 34 To 40 Step 3
            Cells(Zeile, Spalte) = ""
        Next Spalte
    Next Zeile
        
End Sub

bei Antwort benachrichtigen
Hier werden nur Werte eingefügt, keine Formate. Dies dürfte der Grund sein, weswegen die bedingten Formatierungen beim ... mawe2
Danke. Bis jetzt habe ich es aber so erlebt, wenn ich was markiere und dann kopiere, wird alles mitgenommen einschließlich ... pappnasen
Vielleicht hat sich ja eine Einstellung so verändert, dass nicht mehr alles automatisch kopiert wird. mumpel1
Genau. Im Übrigen sollte man auf Select verzichten. Und wenn man alles kopieren möchte, braucht man PasteSpecial nicht. ... mumpel1
Funktioniert prächtig. Herzlichen Dank. pappnasen