Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1968to1972
1968to1972
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle blinken lassen

Forumthread: Zelle blinken lassen

Zelle blinken lassen
25.03.2024 10:38:57
Camille Stirn
Hallo,
ich will Zelle A1 blinken lassen wenn nicht leer. In Zelle A1 steht folgende Formel: =WENN(B1="";"";B1). Also soll Zelle A1 blinken, wenn in Zelle B1 ein Wert oder Text steht.
Danke für Eure Bemühungen.
Camille
Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle blinken lassen
25.03.2024 11:06:05
{Boris}
Hi,

Excel ist ne Tabellenkalkulation und keine Disco ;-)
Blinkende Zellen sind genau so out wie

Laufschrift

Färbe sie mittels bedingter Formatierung sichtbar (z.B. rot) ein.

VG, Boris
Anzeige
AW: Zelle blinken lassen
25.03.2024 11:09:41
daniel
Hi
lege für die Zelle A1 zwei bedingte Formatierungen für die beiden Blinkfarben an mit der Regel: 
=Und(A1>"";Rest(Sekunde(Jetzt());2)=0)

=Und(A1>"";Rest(Sekunde(jetzt());2)=1)


füge dann folgende Makros ein:
- in ein allgemeines Modul: 
Option Explicit

Public xxx As Date



Sub Blinken()

If ActiveSheet.Name = "Tabelle1" Then Range("A1").Calculate

xxx = Now + TimeSerial(0, 0, 1)

Application.OnTime xxx, "Blinken"

End Sub


- ins modul des Tabellenblatts wo geblinkt werden soll: 
Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("B1")) Is Nothing Then If Range("B1") > "" Then Call Blinken

End Sub


- ins Modul "DieseArbeitsmappe" 
Private Sub Workbook_BeforeClose(Cancel As Boolean)

If xxx > Now Then Application.Run xxx, "Blinken", schedule:=False

End Sub



Private Sub Workbook_Open()

Call Blinken

End Sub


Gruß Daniel
Anzeige
AW: Zelle blinken lassen
26.03.2024 11:16:04
Camille Stirn
Hallo Daniel,
habe deine Lösung genommen und alles funktioniert perfekt.
Vielen Dank.
AW: Zelle blinken lassen
27.03.2024 11:17:57
Camille Stirn
Hallo Daniel,
habe dir gestern etwas voreilig geschrieben, dass alles perfekt funktioniert, als ich später die Datei schließen wollte kam folgende Meldung in einem Fenster:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If xxx > Now Then Application.Run xxx, "Blinken", schedule:=False
End Sub

Private Sub Workbook_Open()
Call Blinken
End Sub

"schedule:=" ist blau markiert.
In einem kleineren Fenster "Microsoft Visual Basic for Applications" steht: "Fehler beim Kompilierten: Benanntes Argument nicht gefunden".
Kliche ich auf "Ok", meldet ein anderes kleine Fenster: Code kann im Haltemodus nicht ausgeführt werden". Klicke auf "ok", dann kommt eine nächste Meldung: "Dieser Befehl beendet den Debugger". Klicke auf "ok" und die Datei schließt sich.
Da klappt irgend etwas nicht. Kannst du mir bitte weiterhelfen. Danke.
Anzeige
AW: Zelle blinken lassen
28.03.2024 11:42:40
daniel
Hi
schau mal in der Hilfe, wie der Parameter korrekt benannt werden muss, kann sein das ich mich da vertippt habe.
im notfall gehts auch ohne Parameternamen, dann muss man aber zwei Kommas setzen, damit die reihenfolge stimmt.

If xxx > Now Then Application.Run xxx, "Blinken", , False
Anzeige
AW: Zelle blinken lassen
28.03.2024 13:35:45
Camille Stirn
Hallo Daniel,
habe die Zeile jetzt so eingegeben:
If xxx Now Then Application.Run xxx, "Blinken", , False
Habe das Zeichen > durch ersetzt und jetzt klappt es, war sicherlich ein Tippfehler.
Danke für deine Hilfe.
AW: ist dein google auch abgestürzt?
25.03.2024 10:58:13
Camille Stirn
Nein Google funktioniert, habe auf deiner angegebener Adresse alles durchstöbert aber kein Lösung gefunden, Text blinken, aktive Zelle blinken habe ich gefunden und klappt wunderbar, nur Zelle blinken wenn "nicht leer" habe ich nicht gefunden.
Anzeige
AW: ist dein google auch abgestürzt?
25.03.2024 11:43:13
ralf_b
"Zelle blinken wenn nicht leer" ist doch nur eine zusätzliche Bedingung. Wenn du immer nur genau das suchst was auf deine spezielle Anwendung passen muss, dann wird's mit finden schwer.
AW: ist dein google auch abgestürzt?
25.03.2024 12:51:47
Camille Stirn
Hallo ralf_b,
habe deinen Link kopiert und eingegeben, doch die Zeile:
Public Const BlinkCell As String = "Tabelle1!B2"
wird rot geschrieben und Const wird markiert. Schreibe ich PublicConst aneinander, dann wird As markiert. Da muss doch irgendwie etwas nicht stimmen.
Das war bei Sheet1 und bei Tabelle1, muss ja den richtigen Namen des Blattes eingeben. Was soll ich unternehmen?
Anzeige
AW: ist dein google auch abgestürzt?
25.03.2024 13:10:00
ralf_b
eine Konstante wirst du nicht nutzen können wenn du es mit variablen Zellen machen willst.
Activecell kann man als Ersatz für BlinkedCell nehmen. Das ist schon eine Variable in der die aktive Zelle auf dem Aktiven Blatt representiert wird. Dann müsstest du in einer der Makros die Prüfung ob die Zelle leer ist oder nicht machen.
oder in einem Neuen Makro. darin dann die blinkemakros aufrufen, je nach Zellwertprüfung 


sub blinkanaus()

if activecell="" then

   StartBlinking Activecell.address

else

  StopBlinking ActiveCell.address

end if  

end sub



'diese Methodenköpfe so anpassen

Private Sub StartBlinking(BlinkCell$)



Private Sub StopBlinking(BlinkCell$)


Warum nimmst nicht Daniels Lösung? Gut erklärt. Wahrscheinlich funktioniert sie auf Anhieb.
Anzeige
AW: ist dein google auch abgestürzt?
25.03.2024 13:40:27
Camille Stirn
Ok Danke, versuche es einmal mit Daniels Lösung...
AW: ist dein google auch abgestürzt?
26.03.2024 11:18:25
Camille Stirn
Hallo,
habe Daniels Lösung genommen und alles funktioniert perfekt.
Danke dir für deine Bemühungen.
;

Forumthreads zu verwandten Themen

MSGBox wenn Zelleninhalt geleert wurde?!
Tom

Hallo!
Ist es denn eigentlich möglich zu überprüfen ob eine Zelle gerade geleert wurde?
Hintergrund ist, dass ich gern sicherstellen möchte, dass der User wirklich den Zelleninhalt löschen wollte.
Ich würde gern eine Mitteilung erscheinen lassen wenn eine Zelle vom Inhalt her gelösc...
26.08.2008 15:07:01
Thread-ID: 1004826
6 Beiträge
Anzeige
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Anzeige
Kopieren von Nichtleeren Zellen per Formel
Nichtleeren

Moin,
auf der Arbeit soll ich eine Tabelle anpassen:
In Tabellenblatt1 ist eine Matrix M6:P109, in einigen Zeilen (Artikelnummern in loser Reihenfolge) stehen Werte, (die Artikel, die im Bürobestand fehlen) in den meisten nicht.
Die Zeilen, in denen Werte stehen, sollen nun in Tabel...
10.01.2009 20:43:46
Thread-ID: 1038525
4 Beiträge
vba Leere zellen löschen wenn
Carmen

Hallo liebe Wissenden,
möchte gerne wenn die zellen in Spalte B UND C leer sind dass die gesamte Zeile gelöscht wird, aber vba will keine überlappung.
Sub Leerzeilen_löschen() Range("B1:C100").SpecialCells(xlCellTypeBlanks).EntireRow.delete End Sub
hab das ganze mit if davor und...
06.04.2009 21:26:03
Thread-ID: 1067195
8 Beiträge
Wenn bistimmte Werte in zwei Zellen dann Zeile ..
Micha

Hallo zusammen,
habe folgendes Problem:
habe eine große Datentabelle (B1:O31407); in dieser sollen diejenigen Zeilen gelöscht werden
in denen sowohl in der Spalte B als auch in der Spalte H der Zellwert "1" ist.
steht in einer der besagten Zellen ein anderer Werte soll nichts...
14.05.2009 08:36:57
Thread-ID: 1074984
4 Beiträge
Leere Zellen löschen wenn
walli

Hallo Fachfrauen u. Männer,
ich möchte gern zellen löschen wenn beide Spalten Leerzellen sind.
Beispiel:
In an D5 u. E5 stehen zahlen
D6 u. E6 stehen keine zahlen dann bitte beide also d+E nnach oben schieben
siehe Beispiel Mappe:
https://www.herber.de/bbs/user/62422...
14.06.2009 14:16:37
Thread-ID: 1081380
24 Beiträge
Formeln sollen im nur arbeiten wenn Zelle leer ist
Andy

Hallo,
ich weiß nicht ob das überhaupt machbar ist.... aber hier meine Frage.
Wenn ich in Zellen, Formeln stehen habe die mir Werte ausgeben, und ich aber manchmal den Wert nicht akzeptieren möchte und Ihn deswegen Überschreibe. Dann ist normalerweise die Formel in der Zelle weg.
Kö...
26.06.2009 12:01:06
Thread-ID: 1084556
24 Beiträge
Wenn/Und - Oder - Formel
steffex

Hallo zusammen,
suche eine Wenn/und/oder Formel, mit der ich folgende Bedingungen gleichzeitig überprüfen kann:
- wenn Spalte x=1 und Spalte y="Bürgermeister(in)" ---> dann "z. Hd. Herrn Bürgermeister"
oder
- wenn Spalte x=2 und Spalte y="Bürgermeister(in)" ---> dann "z....
22.07.2009 09:28:09
Thread-ID: 1090397
6 Beiträge
Wenn-und Formel vereinfachen
Reinhardt

Hallo Liebe Excelgemeinde,
ich habe mal wieder eine Frage:
Ist es möglich diese u.g. Formel zu vereinfachen?
Die Formel soll Ergebnisse "kleiner 1" zuordnen in cluster von z.B. 1-5 Tage zu früh/6-10 Tage zu früh etc.
Derzeit habe ich die Formel ziemlich umständlich gebaut:
...
04.08.2009 18:29:46
Thread-ID: 1093595
5 Beiträge
Anzeige
WENN UND ODER in einer Formel
Claudia

Hallo an alle Helfer,
ich verstehe es einfach nicht mit einer WENN / UND / ODER Formel umzugehen und im Archiv habe ich zwar vieles gefunden, kann es aber irgendwie nicht richtig anwenden.
Mein Problem ist folgendes:
In den Spalten F und G stehen die Bedingungen, weibl., männl.(in S...
02.09.2009 21:55:04
Thread-ID: 1100197
4 Beiträge
Wenn Null nach Buchstaben, dann weglassen
mehmet

Guten Tag Forum,
in Spalte Q stehen folgende Werte:
ABX009
THG08
HJG0509
KLU00080
Nun möchte ich gern die Nullen weglassen, die hinter den Buchstaben stehen (incl. Buchstaben).
Das ganze sollte dann so aussehen:
9
8
509
80
Leider finde ich keine g...
13.10.2009 09:26:14
Thread-ID: 1109241
5 Beiträge
formelproblem Istfehler und Summewenn
ray

Hallo,
ich mache etwas falsch. Ich möchte: in einer Tabelle alle Zeilen alle Werte der Spalte G addieren, wenn in der selben Zeile in Spalte G #NV steht.
Summewenn(Istfehler(J:J);G:G;"") geht nicht.
Was mach ich falsch
Viele Grüße aus dem kalten morgendlichen Hamburg bei 7 Grad...
23.10.2009 09:16:48
Thread-ID: 1111542
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige