Clever-Excel-Forum

Guten Tag liebe Exceller,

ich habe folgendes Problem.

Ich habe eine Datei, die im fortschreitenden Prozess öfters und anders angewendet wird.

Ich habe einen Maßnahmenplan. Dieser hat verschieden spezifische Topics und Kategorien.

Ich hätte jetzt gerne, dass
1. in jeder Zeile, wenn in der Spalte A etwas drin steht eine Checkbox in D;E;F kommt. Praktisch per Kopfdruck.
2. habe ich eine bedingte Formatierung für die Zeile 6. Es wäre spitze wenn diese bedingte Formatierung damit auch übernommen oder eben angepasst werden könnte sodass ich per Knopfdruck sofort alles bereit habe.

Das wäre echt eine super Sache :)

ich weiß dass es händisch geht aber für die nächsten Sachen wäre das echt ne Hilfe

Hallo,

im Archiv habe ich diesen Code gefunden:

Code:
Sub Angelegen()

With ActiveSheet.CheckBoxes

    For i = 8 To 208

        .Add(Cells(i, "J").Left, Cells(i, "J").Top, 0, 0).Select

        Selection.Caption = ""

        Selection.OnAction = "Tabelle1.Kontrollkästchen_Klicken" 'im Kopf des sheets

        Selection.LinkedCell = Cells(i, "K")

    Next i

End With

End Sub

Aber ich hätte eine Gegenfrage:

Dein Code:

Code:
Sub unklick_Checkbox()

Attribute unklick_Checkbox.VB_ProcData.VB_Invoke_Func = " \n14"

Dim chb As checkbox

For Each chb In ActiveSheet.CheckBoxes

    chb.Value = False

Next

End Sub

Was bedeutet die Zeile mit dem "Attribute ..."?

mfg

Hallöchen,

Zitat:Was bedeutet die Zeile mit dem "Attribute ..."?

so was bekommst Du beim Export von Modulen, UF usw. Das dient der Sicherung diverser Eigenschaften, die ein Code nicht abbildet. Deutlicher wird das z.B. bei Userforms ... Nach dem Import solche Zeilen wieder weg. " \n14" zeigt den zugewiesenen Shortcut. Gib da mal z.B. v ein, dann siehst Du es Smile

CHASiN1994

Fennek

schauan