Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
164to168
164to168
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

wo ist der Fehler?

Forumthread: wo ist der Fehler?

wo ist der Fehler?
08.10.2002 17:28:26
Jörg
Habe folgendes eingefügt, um der aktiven Zelle ein anderes Aussehen zu geben (Hat mir Martin B. zur Verfügung gestellt)

Public oldTarget As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error Resume Next
ActiveSheet.Unprotect "test"
oldTarget.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 36
Set oldTarget = Target
ActiveSheet.Protect "test"
End Sub

Wenn ich jetzt den Blattschutz aufhebe, aktiviert er sich automatisch wieder. Kann also in der Datei nichts mehr verändern. Wenn ich es wieder lösche, funktioniert alles wieder. Was muss ich ändern, um den Blattschutz wieder ohne Probleme ausführen und aufheben zu können und trotzdem die aktive Zelle andersfarbig gestalten zu können?

Wer kann mir helfen?

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: wo ist der Fehler?
08.10.2002 18:00:29
Chris
Hallo Jörg

Bin mir nicht ganz sicher, aber könnte es sein, dass du den Passwortschutz wie folgt aufheben musst:

ActiveSheet.Unprotect PASSWORD:="test"
...
ActiveSheet.Protect PASSWORD:="test"


Gruss
Chris

leider nein
08.10.2002 18:08:01
Jörg
so funktioniert es leider nicht
Re: leider nein
08.10.2002 18:59:07
edi
Probier mal folgendes:

Worksheets("Dein Blatt").Activate
Worksheets("Dein Blatt").Select
Worksheets("Dein Blatt").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

Ich hatte heute auch schon das Problem, daß sich der Blattschutz zwar entfernen läßt, aber beim neuen Schützen der Bezug scheinbar verloren ging. Durch vorheriges Activieren bzw. selektieren hat es dann geklappt. (bei mir aber ohne PW).

vielleicht hilft es dir ja weiter.

Gruß Edi

Anzeige
;

Forumthreads zu verwandten Themen

Wo ist der Fehler?
Bernd

Einen schönen guten Morgen,
folgendes Problem habe ich:
Wie Ihr in der Tabelle sehen könnt, ist Andy auf platz 4 und Hery und Bernd auf Platz 5.
Wo ist da der Fehler in der Formel?
Tabelle2

 ABCD12PlatzNameverlorenhilfsspalte134Andy        1,30 €...
30.08.2008 07:15:00
Thread-ID: 1006008
3 Beiträge
wo ist der fehler?
stefan

Hallo,
ich habe eine spalte mit domainnamen (z.b domain.de oder domain.net). ich will daraus den wert ermitteln. wenn .de-domain, dann 1 ansonsten 1,5
habe folgende formel: =WENN(FINDEN(".de";$B2);1;1,5)
leider wirft er bei nicht .de-domains einen fehler aus und schreibt nicht 1,5 h...
09.12.2008 11:57:11
Thread-ID: 1031321
8 Beiträge
Formel: Summe= Monat, Jaht und Text
Frank

Hallo, bräuchte mal eure Hilfe.
Habe eine Tabelle und möchte nur die Anzahl des Textes die in A stehen
aber nur von bestimmtem Jahr und Monat
es wird erst in M der Monat gesucht den ich in B2 eingebe
dann das Jahr in M das ich in F1 eingebe
und nun der Text der in A steht.
14.12.2008 10:38:00
Thread-ID: 1032734
2 Beiträge
Zahl im Text herausfinden vba
Harald

Hallo im Excelforum,
ich möchte aus einer Zelle in der Text und Zahlen stehen, eine sechstellige Zahl finden deren erste 3 Zahlen immer gleich sind zb 208xxx und das mit vba. In Spalte vier steht der Text und in Spalte 9 sollte dann nur noch die Zahl stehen.
mfg
Harald
30.12.2008 16:07:13
Thread-ID: 1036013
22 Beiträge
Anzeige
KW Funktion funktioniert nicht
Peter

Hallo Excelfreunde
Ich bekomme in einer Datei die KW Funktion nicht hin.
Bei mir zu Hause funktioniert die Ausgabe der jeweiligen Kalenderwoche.
Die Analysefunktion muss dafür per Add in angewählt werden.
Dann "=KALENDERWOCHE(A1205)" eingeben - fertig.
Aber im Betrieb läuft...
14.03.2009 19:26:55
Thread-ID: 1060238
4 Beiträge
Anzeige
wo ist der fehler?
Hirschi

Sub mal4() Dim a As Integer For a = 1 To 100 If Cells(a, 1).Caption "" And Cells(a, 1).Caption Mod Cells(a, 2).Caption = 0 Then Cells(a, 3).Caption = CLng(Cells(a, 2)) / 5 * 4 Else Cells(a, 3).Caption = "" End If Next End Sub
Vielen Dank für eure Hilfe! Gruss Hirschi
27.03.2009 12:46:02
Thread-ID: 1064581
9 Beiträge
Anzeige
wo ist der fehler?
Emil

Hallo zusammmen
könnt ihr mir sagen wo hier der Fehler ist?
=WENN(L12="";RANG(C12;C$12:"C"$&Zeile(11+C9));"")
C$12:"C"$&Zeile(11+C9) darf man einen Bereich so formulieren?
in diesem falle müsste das dann geben den Bereich C12:C20
Gruss Emil
06.04.2009 15:14:56
Thread-ID: 1067119
6 Beiträge
wo ist der fehler?
Michel

Hallo
=SUMMENPRODUKT((A1:A1000)="Neue Formatdaten)"*((D1:D1000)="ZugriffLevel0"))
Vielen Dank für eure Hilfe!
Gruss Michel
08.05.2009 14:05:10
Thread-ID: 1073889
4 Beiträge
wo ist der Fehler?
Reto

Hallo zusammen
bekomme mit dieser Formel nur die Fehlermeldung #Wert..
=SUMMENPRODUKT((JAHR('einmalige Bestellungen'!D2:D5000)=Gesamtübersicht!A6)*1)
in D2:D5000 stehen Daten, in A6 ist 2004
wieso geht das nicht?
Vielen Dank für eure Hilfe!
Gruss Reto
15.05.2009 14:03:32
Thread-ID: 1075467
4 Beiträge
Wo ist der Fehler?
Jay

Hallo,
ich bin noch nicht so bewandert mit Schleifen, habe vesucht ein Textfeld einzublenden, falls folgende Zellenwerte Null sind, das klappt aber leider nicht, ist da vielleicht ein Fehler drin?
If Worksheets("Tabelle1").Cells(10, 11) = "0" Then
If Worksheets("Tabelle1").Cells(11...
21.05.2009 14:51:53
Thread-ID: 1076559
12 Beiträge
Anzeige
Formel interpretiert Feldwerte als Text
pietsch.st@gmx.de

Hallo Forum,
habe Werte in vier Zellen. Die Werte stammen jeweils aus folgender selbstgeschriebener Funktion mit Rückgabewert Long:
= Anz_Unf($B$2, "Arbeitsunfall", "3","e").
Die Werte dieser Formel sind im Feld als Zahl dargestellt und sind korrekt. Als Zahl gemäß Excel "Format-Zel...
08.07.2009 22:59:54
Thread-ID: 1087292
3 Beiträge
Text als Formel
chrissey

Hey Leut,
hab folgendes Problem:
Hab in Spalte C folgenden Text:
50*3,2+8,4
möchte nun diesen Text in Spalte F berechnet haben. Wie mach ich das,
weil =C1 oder ="="&C1 geht net.
Grüße und DANKESCHÖÖÖÖN schon mal
09.08.2009 18:29:54
Thread-ID: 1094551
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige