Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Blattschutz soll nur bestimmte Steuerelemente schützen!Excel 2003 - VBA

Frage Microsoft Microsoft Office

Mitglied: Dudelidude

Dudelidude (Level 1) - Jetzt verbinden

29.07.2011 um 13:28 Uhr, 9165 Aufrufe, 4 Kommentare

Hallo Leute auch wenn Freitaf ist, muss ich nochmal nerven.

Ich habe ein Sheet mit unterschiedliechen Steuerelmenten. Dazu habe ich ein Makro, dass alle Steuerelemente ungeschützt lässt.Soweit so gut.Allerdings können diese ungeschützten Steuerelemente auch verschoben oder versehentlich gelöscht werden. Nun würde ich gern, dass ich diese Steuerelemente irgendwie an Ort und Stelle verankern kann, ohne dabei deren funktionalität ein zu schränken.
Hat jemand eine Idee wie ich das anstellen kann?

Hier noch der Code:



Sub BlattschutzAllerBlätterSetzen()
'stellt den Blattschutz für alle Blätter wieder her
'Blattschutz erlaubt: Zeilen ausblenden, Objekte einfügen (Zeilen ausblenden wg. Buildings,
'Objekte einfügen wg. Photos)

For i = 1 To ThisWorkbook.Sheets.Count
Sheets(i).Protect "Passwort", DrawingObjects:=False, Contents:=True, Scenarios:=True
Sheets(i).EnableSelection = xlUnlockedCells
Application.WindowState = xlNormal
Next i
Mitglied: 76109
29.07.2011 um 19:55 Uhr
Hallo Dudelidude!

Das geht so nicht. Wenn Du die Steuerelemente schützen willst (DrawingObjects:=True), dann können keine Objecte (Bilder...) eingefügt werden.

Gruß Dieter
Bitte warten ..
Mitglied: Dudelidude
01.08.2011 um 09:24 Uhr
Hallo Didi

Okay danke. Aber gibt eine Möglichkeit meine Auswahlfelder zu schützen und einen Bereich zu definieren, indem ich dann die Bilder einfügen lassen kann?
Hast du dafür vielleicht eine Lösung?Vielen Dank schonmal für deine Hilfe bis hierhin.
Bitte warten ..
Mitglied: 76109
02.08.2011 um 00:24 Uhr
Hallo Dudelidude!

Ich sehe da leider keine Möglichkeit. Steuerelemente zählen genauso wie Bilder und sonstige Objecte zu den DrawingObjects und sobald diese Eigenschaft auf True gesetzt ist, können weder im geschützten noch in einem ungeschützten Bereich Objekte eingefügt werden...

Gruß Dieter
Bitte warten ..
Mitglied: Dudelidude
02.08.2011 um 09:17 Uhr
Hey Didi,

vielen Dank. Wenigstens muss ich jetzt keine Zeit mehr darauf verwenden. Noch eine schöne weitere Woche. Dank und Gruß vom Dudelidude!
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
VB for Applications
Excel VBA Sortierung von Daten (5)

Frage von easy4breezy zum Thema VB for Applications ...

Microsoft Office
gelöst Excel-Formel oder VBA (7)

Frage von nicki01 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...