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

Excel VBA - Wie Sperre ich eine Zelle die per CommanButton ihre Werte bekommt?

Frage Microsoft Microsoft Office

Mitglied: Amiga500

Amiga500 (Level 1) - Jetzt verbinden

24.02.2012 um 14:15 Uhr, 6530 Aufrufe, 2 Kommentare

Moin,

ich habe leider keine Ahnung von VBA und habe mir jetzt die letzte Woche schon etwas selber angeeignet, aber mir fällt es immer noch schwer entsprechende Codes aus dem Netz für meine Zwecke anzupassen.

Jedenfalls habe ich in meiner Tabelle in der Zelle i30 ein Commandbutton. Wenn dieser geklickt wird, dann wird in der Zelle G30 der vorhande Wert um +1 erhöht.

Private Sub button1_Click()

With Range("G30")
.Value = .Value + 1
End With
End Sub
Soweit so gut... Ich möchte jetzt allerdings die Zelle G30 vor Veränderungen schützen. Die Zelle soll per Hand nicht zu löschen sein, damit die Vorgangsnummer für unsere Aufträge nicht verändert wird und mein CommandButton dann nicht wieder von 0 anfängt zu zählen.

Wie kann ich das mit VBA umsetzen?


Viele Grüße

Amiga500
Mitglied: bastla
24.02.2012 um 17:45 Uhr
Hallo Amiga500!

Wenn Du vorweg den Blattschutz aktivierst, könnte das so gehen:
01.
Private Sub button1_Click() 
02.
ActiveSheet.Unprotect 
03.
With Range("G30") 
04.
    .Locked = False 
05.
    .Value = .Value + 1 
06.
    .Locked = True 
07.
End With 
08.
ActiveSheet.Protect 
09.
End Sub
Grüße
bastla
Bitte warten ..
Mitglied: Amiga500
28.02.2012 um 12:23 Uhr
Danke Dir...


ohne .Locked = False und .Locked = True funktioniert es, allerdings möchte ich nur die eine Zelle gesperrt haben...
es gibt noch viele andere Zellen in der Tabelle wo Eintragungen notwendig sind...

Gibt es evtl. eine Möglichkeit die Sperrung auf die eine Zelle G30 zu beschränken?




Edit: Hat sich erledigt... Ich habe allen Buttons und checkboxes jetzt ActiveSheet.Unprotect + ActiveSheet.Protect hinzugefügt
Jetzt können alle relevanten Felder bearbeitet werden und alle anderen sind gesperrt...

Danke nochmal


Grüße

Amiga 500
Bitte warten ..
Neuester Wissensbeitrag
Off Topic

"Ich habe nichts zu verbergen"

(2)

Erfahrungsbericht von FA-jka zum Thema Off Topic ...

Ähnliche Inhalte
VB for Applications
gelöst Excel - VBA: Automatisches Setzen von Kommentaren in eine Zelle (3)

Frage von d4shoerncheN zum Thema VB for Applications ...

VB for Applications
gelöst Excel VBA Werte von 2 verschiedenen Sheets vergleichen und aktualisieren (4)

Frage von drimrim zum Thema VB for Applications ...

Microsoft Office
gelöst Excel VBA: Automatische Konvertierung von Textdatei (.txt) zu Exceldatei (.xlsx) (7)

Frage von Booster07 zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel VBA Tabelleblätter kopieren und Umbenennnen (8)

Frage von Florian86 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
CPU, RAM, Mainboards
Kaufberatung für mind. 8 verschiedene HighEnd-Mainboards (23)

Frage von yperiu zum Thema CPU, RAM, Mainboards ...

Mac OS X
Mac kann nicht im LAN pingen alle anderen schon (19)

Frage von smartino zum Thema Mac OS X ...

Hyper-V
Langsames Netzwerk i210 LAN Karte (10)

Frage von Akcent zum Thema Hyper-V ...

Netzwerke
Abisolierwerkzeug (10)

Frage von SarekHL zum Thema Netzwerke ...