VBA Code für Checkboxen

[CHASiN1994]

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

[Fennek]

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

[schauan]

Hallöchen,

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