Top-Themen

Aktuelle Themen (A bis Z)

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

Zellenkommentar ausblenden oder sperren

Frage Microsoft Microsoft Office

Mitglied: xaumichi

xaumichi (Level 1) - Jetzt verbinden

23.08.2010 um 15:40 Uhr, 5717 Aufrufe, 6 Kommentare

Hallo!

Also, ich habe in ein paar Zellen einen Kommentar stehen, der Hinweise zur Eingabe geben soll.
Nun gibt es allerdings eine Bedingung, wenn diese erfüllt ist, wirden diese Zellen gesperrt und der Kommentar ist hinfällig.
Gibt es nun eine Möglichkeit, diesen Kommentar so zu "manipulieren", dass dieser nicht mehr angezeigt wird, wenn diese besagt Bedingung erfüllt ist?
oder besteht nur die möglichkeit, dann diesen Kommentar zu löschen.
Wobei die schlecht wäre, denn sobald die Bedingung nicht mehr erfüllt ist, soll der Kommentar wieder angezeigt werden...!

Oder muss ich entweder den Kommentar löschen und wenn die Bedingung nicht mehr erfüllt ist, den Kommentar wieder neu einfügen??

mit freundlichen Grüßen
Mike
Mitglied: sk4r
23.08.2010 um 15:56 Uhr
Hi xaumichi,

da hab ich doch ein kleines Beispiel für dich.

01.
Option Explicit 
02.
 
03.
Private Sub Worksheet_Change(ByVal Target As Range) 
04.
    'entspricht der Zellfunktion =ZÄHLENWENN(A:A,3)>=5 
05.
    If WorksheetFunction.CountIf(Rows(Target.Row), 3) >= 5 Then 
06.
        MsgBox "In dieser Reihe gibts schon 5 Dreier", vbInformation + vbOKOnly, "Info" 
07.
    End If 
08.
    'entspricht der Zellfunktion =ZÄHLENWENN(1:1,3)>=5 
09.
    If WorksheetFunction.CountIf(Columns(Target.Column), 3) >= 5 Then 
10.
        MsgBox "In dieser Spalte gibts schon 5 Dreier", vbInformation + vbOKOnly, "Info" 
11.
    End If 
12.
End Sub
Das ist ein VB Script, dass mir Dr. Google geflüstert hat.
Selbstverständlich musst du das für dich anpassen.
Bitte warten ..
Mitglied: bastla
23.08.2010 um 16:54 Uhr
Hallo xaumichi!

Am ehesten könnte ich mir vorstellen, anstelle des Kommentars eine Gültigkeitsregel zu hinterlegen (darf als Kriterium gerne auch "Jeden Wert" haben ) und dazu eine "Eingabemeldung" zu erstellen - die lässt sich dann nämlich per
Range("A5").Validation.ShowInput = Not Range("A5").Validation.ShowInput
"umschalten" (oder eben per True oder False ein- / ausschalten).

Grüße
bastla
Bitte warten ..
Mitglied: 76109
24.08.2010 um 08:47 Uhr
Hallo bastla!

Super Idee Nach so ner Kommentar-Ersatzmöglichkeit für hatte ich auch schon mal gesucht und keine vernünftige Lösung gefunden

Gruß Dieter
Bitte warten ..
Mitglied: xaumichi
24.08.2010 um 14:46 Uhr
Naja, ist halt ein bisschen lässtig, wenn jedes mal,wenn man die Zelle selektiert, ein Fenster kommt...!
Aber gut eine Lösung wärs schon mal.
Danke!

Lg Mike
Bitte warten ..
Mitglied: 76109
24.08.2010 um 15:27 Uhr
Hallo Mike!

Was für ein Fenster?

Teste mal folgendes Beispiel, in dem ich die Gültigkeitsregel per Makro setze und den Zelleinhalt nur auf Leer/Wert teste.

Quellcode im Tabellenblatt:
01.
Option Explicit 
02.
 
03.
Private Sub Worksheet_Change(ByVal Target As Range) 
04.
    If Target.Count > 1 Then Exit Sub 
05.
     
06.
    Call InitCellsInputInfo(Target) 
07.
End Sub 
08.
 
09.
Private Sub InitCellsInputInfo(ByRef Rng) 
10.
    Dim Test As Long 
11.
     
12.
    On Error Resume Next:  Test = Rng.Validation.Type 
13.
     
14.
    If Err.Number = False Then 
15.
        With Rng.Validation 
16.
            If IsEmpty(Rng) Then .ShowInput = True Else .ShowInput = False 
17.
        End With 
18.
    End If 
19.
End Sub
Quellcode im Modul:
01.
Sub SetCellsInputInfo() 
02.
        With Range("A1").Validation 
03.
            .Delete 
04.
            .Add Type:=xlValidateInputOnly 
05.
            .InputMessage = "Das ist der Infotext" 
06.
             If IsEmpty(Range("A1")) Then .ShowInput = True Else .ShowInput = False 
07.
        End With 
08.
End Sub
Dieses Makro über <Menü><Extras><Makro><Makros> einmal starten und sehen was passiert, wenn die Zelle A1 Leer ist oder ein Wert eingegeben wird.

Gruß Dieter
Bitte warten ..
Mitglied: xaumichi
24.08.2010 um 15:46 Uhr
Hm...okey!
Das Ergebnis war doch anders, als ich erwartet habe...! :-S
Aber es war auf jeden fall positiv!

Gut, somit kann ich meinen Kommentar von vorerst zurücknehmen bedanke mich an dieser Stelle für die großtige Hilfe!

Lg Mike
Bitte warten ..
Ähnliche Inhalte
Webbrowser
Fronmotion Firefox Version 38.0.1 - Menü ausblenden oder Private Surfing ausblenden oder sperren
Frage von mksadmWebbrowser6 Kommentare

Hallo liebe Gemeinde, vorab ein paar Details über meine Umgebung: Virtuelle Windows Umgebung (VM-Ware mit Vcenter) mit Domäne (Server2008R2) ...

Windows Server
Windows 7 Bibliotheken per GPO sperren oder verhindern oder ausblenden
Frage von VitalyFischerWindows Server6 Kommentare

Moin, ich möchte eine GPO in einer Schule einrichten. Schüler dürfen nicht in Verzeichnisse Musik, Bilder, Dokumente, Videos (also ...

Microsoft Office
Acces Spalte im Berichtsmodus ausblenden
Frage von Florian86Microsoft Office

Hallo, ich habe eine Accessdatenbank worauf ich einen Bericht aufgebaut habe. Nun möchte ich eine Spalte in der Entwurfsansicht ...

Windows Userverwaltung
Adressleiste im Explorer ausblenden
Frage von chris123Windows Userverwaltung7 Kommentare

Hallo! Gibt es eine Möglichkeit per Gruppenrichtlinie, ADM oder ADMx die Adressleiste im IE bzw. auch im Explorer auszublenden? ...

Neue Wissensbeiträge
Batch & Shell

Open Object Rexx: Eine mittlerweile fast vergessene Skriptsprache aus dem Mainframebereich

Information von Penny.Cilin vor 16 StundenBatch & Shell8 Kommentare

Ich kann mich noch sehr gut an diese Skriptsprache erinnern und nutze diese auch heute ab und an noch. ...

Humor (lol)

"gimme gimme gimme": Automatischer Test stolpert über Easter Egg im man-Tool

Information von Penny.Cilin vor 18 StundenHumor (lol)6 Kommentare

Interessant, was man so alles als Easter Egg implementiert. Ist schon wieder Ostern? "gimme gimme gimme": Automatischer Test stolpert ...

MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 1 TagMikroTik RouterOS8 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 1 TagSicherheit1 Kommentar

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Heiß diskutierte Inhalte
Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server17 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows 10
Windows 10 dunkler Bildschirm nach Umfallen
Frage von AkcentWindows 1015 Kommentare

Hallo, habe hier einen Windows 10 Rechner der von einem User umgefallen wurde (Beine übers Knie, an den PC ...

Windows 10
Bitlocker nach Verschlüsselung nicht mehr aufrufbar!
gelöst Frage von alexlazaWindows 1013 Kommentare

Hallo, ich besitze ein HP ZBook 17 G4 mit einem Windows 10 Pro Betriebssystem. Bei diesem Problem handelt sich, ...

Batch & Shell
Neuste Datei via PowerShell kopieren
gelöst Frage von kaiuwe28Batch & Shell11 Kommentare

Hallo zusammen, ich hatte mir mit Hilfe der Suche im Forum einen kleinen Code von colinardo rausgesucht und versucht ...