Matrix-Formel & VBA-Script+Passwort
09.11.2006 10:30:17
Fabio
folgende "Matrix"-Formel (also die mit den {}-Klammern) habe ich :
=SUMME(SUMMEWENN(F35:F76;{"d";"u";"g";"s"};INDEX(Stammdaten!$F35:$BN76;1:4;GANZZAHL((SPALTE()+1)/7))))
Die funktioniert auch fantastisch.
Nun will ich per Script einen Passwortschutz für alle Tabellenblätter einfügen - mit folgendem Script :
Sub YesProtect()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
If wks.ProtectContents Then
wks.Unprotect "testpasswort"
End If
wks.Range("A1").Value = "Blattschutz: Ja"
wks.Protect "festus62"
Next wks
End Sub
Und wenn ich das Script ausführe, geht die Matrix-Formel nicht mehr, bzw. Excel schreibt in die Felder in denen die Makro-Formel steht "#Wert!
Verstehe ich einfach nicht. Wenn ich jedes Tabellenblatt einzeln schütze (also "zu Fuss") - adnn macht das der Matrix-Formel gar nichts aus.
Weiß jemand Rat ?
Danke
Fabio