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

Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür

Forumthread: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür

Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 13:52:08
J.Becker
Hallo Forum,

Kann ich mittels Formel in Zelle A1 feststellen, ob in einem Zellbereich (z.B. B1:D1) eine Notiz (früher Kommentar genannt) hinterlegt ist?
Wenn ja soll ein X oder noch besser die Anzahl der Notizen ausgegeben werden.

Besten Dank im voraus,
ciao Jörg
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 13:59:18
Onur
Nur mit VBA.
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 15:18:25
Raimund
Hi Jörg

In VBA neues Modul erstellen und einfügen:

Function CountComments(rng As Range) As Long
Dim cell As Range
Dim count As Long
count = 0
For Each cell In rng
If Not cell.Comment Is Nothing Then
count = count + 1
End If
Next cell
CountComments = count
End Function

In Zelle A1 kannst du jetzt folgende Funktion verwenden, um die Anzahl der Notizen in dem Bereich B1:D1 zu zählen:

=CountComments(B1:D1)

Gruss
Anzeige
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 16:33:45
J.Becker
Hallo Raimund,
Danke für Deinen Code, ich hab es gleich ausprobiert.
Was muß ich machen, damit die Funktion permanent den Bereich überwacht?
Aktuell liefert Dein Code das richtige Ergebnis, aber neue Kommentare werden nicht mitgezählt.
F9 für Neuberechnung hilft auch nicht, nur wenn ich direkt in der Formelzelle Enter drücke wird neu berechnet.
Dnke Ciao Jörg
Anzeige
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 16:53:05
Raimund
Hi Jörg


Füge den Conde in DeineArbeitsmappe. Nicht in ein neues Modul

Workbook_Open: Dieser Code wird ausgeführt, wenn die Arbeitsmappe geöffnet wird.

ws_Change: Diese Subroutine wird aufgerufen, wenn sich eine Zelle im überwachten Bereich ändert. Wenn der Bereich B1:Z1 betroffen ist, wird die Formel in A1 aktualisiert, um die neue Anzahl der Kommentare zu zählen.

Ersetze "Sheet1" durch den tatsächlichen Namen deines Arbeitsblatts, falls nötig.

https://www.herber.de/bbs/user/172934.xlsm

Dim WithEvents ws As Worksheet

Private Sub Workbook_Open()
Set ws = ThisWorkbook.Sheets("Sheet1") ' Ersetze "Sheet1" durch den Namen deines Arbeitsblatts
End Sub

Private Sub ws_Change(ByVal Target As Range)
If Not Intersect(Target, ws.Range("B1:D1")) Is Nothing Then
ws.Range("A1").Formula = "=CountComments(B1:Z1)"
End If
End Sub

Gruss

Anzeige
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 17:02:48
Raimund
Hi Jörg

Kleiner Fehler korrigiert für den Bereich B1:Z1 in Private Sub ws_Change(ByVal Target As Range)

https://www.herber.de/bbs/user/172935.xlsm

Dim WithEvents ws As Worksheet

Private Sub Workbook_Open()
Set ws = ThisWorkbook.Sheets("Sheet1") ' Ersetze "Sheet1" durch den Namen deines Arbeitsblatts
End Sub

Private Sub ws_Change(ByVal Target As Range)
If Not Intersect(Target, ws.Range("B1:Z1")) Is Nothing Then
ws.Range("A1").Formula = "=CountComments(B1:Z1)"
End If
End Sub

Gruss
Anzeige
AW: Ist in einem Zellbereich eine Notiz hinterlegt? Formel dafür
16.10.2024 17:36:37
J.Becker
Besten Dank für die Hilfe.

Forumthreads zu verwandten Themen

Formel gesucht: Anzahl vesch. Werte in Zellbereich
Martin

Hallo liebe Excelianer,
gibt es eine Formel, die die Anzahl verschiedener Zelleninhalte für einen Bereich ermittelt? Zum Beispiel wenn ich 15 Zellen hätte, in denen 3mal die 5 steht und 12mal die 7 steht. Da ja nur 2 verschiedene Werte in den 15 Zellen stehen, müsste also 2 herauskommen. Nu...
19.09.2008 13:25:00
Thread-ID: 1011022
4 Beiträge
Anzeige
dynamischer Zellbezug in vba
Andi

Hallo Experten,
Ich wär euch sehr dankbar wenn ihr mir bei folgendem Problem weithelfen könnt. Ich versuch im beigelegten Dokument, Daten aus einer Pivottabelle über ein Makro darzustellen. Ich kann jedoch die Referenzzelle nicht gemäss der entsprechenden Zeile anpassen.
Bitte schauts...
09.01.2009 12:49:25
Thread-ID: 1038197
3 Beiträge
Anzeige
Änderung von Zellbezügen in einer Formel
Zellbezügen

Liebe Forumexperten,
ich habe eine Formel, die ich durch horizontales ziehen des Ausfüllkästchens automatisch kopieren möchte. Die Formel lautet:
=wenn(Register1!B3="";wiederholen(Register1!C3;1);weiderholen(Register1!B3))
ich möchte jetzt das die nächste Formel so aussieht:
=we...
18.01.2010 12:58:23
Thread-ID: 1130724
4 Beiträge
Anzeige
Variabler Bereich in Excel Formeln
valentin

Hallo
ICh hätte ein kleines problem:
ICh würde gerne in VBA die Formel "count if" für einen Bereich einsetzen, welcher von der Anzahl der ausgefüllten Zeilen abhängt... Sprich es sollen immer alle ausgefüllten Zeilen gezählt werden so soll der Bereich bei 5 Zeilen etwa A1:A5 betragen.
05.03.2010 10:40:42
Thread-ID: 1143585
7 Beiträge
Bereichsanpassung z. einfärben d. Formelergebnisse
sharky1000

Hallo,
ich möchte in einer Tabelle Formelergebnisse abhängig vom Ergebnis einfärben.
Zur automatischen Aktualisierung verwende ich die Funktion =HEUTE() in einer Zelle.
Wie passe ich das folgende, hier gefundene Makro an, dass es nur für den Zellbereich C4:N33 greift?
Option Exp...
29.12.2010 18:36:06
Thread-ID: 1193250
11 Beiträge
Anzeige
Dynamischer WErt einer Formel Kopieren
Christian

Hallo zusammen.
Ich habe mehrere Excel Tabellen welche alle ein Ergebniss ausgeben.
Dieses Ergebniss Kopiere ich über ein Makro in eine Ergebnisstabelle.
Mein Problem ist jetzt das die Formel kopiert wird und nicht der Wert.
Der Wert ändert sich täglich daher sollte wohl das Kop...
29.03.2011 11:31:47
Thread-ID: 1208064
5 Beiträge
Dynamischer Wert in Formel
Karl

Hallo Excel Profis,
ich stehe vor dem Problem, dass ich in einem Tabellenblatt auf eine Zelle in einer anderen Datei verknüpfe: z.B: ='C:\2011\[Monat_01.xls]Tabelle1'!$U$5
Nun möchte ich aber diese Verlinkung dynamisch halten, sprich der Teil der Formel "... Monat_01 ..." soll in in abh...
10.08.2011 14:38:13
Thread-ID: 1225483
2 Beiträge
in WENN-Formel Link 2 * einbinden mit Zellbezug
Holger

Hallo,
gegeben sei eine Exceltabelle, wo in Feld D8 ein Wert von 0 € steht, wenn ich für eine Dienstleistung meines Unternehmens keine Fahrtkosten berechnet habe. Je nach Anfahrtstrecke steht in Zelle D8 ein Wert wie etwa 3 €.
Ich möchte nach der Datenerfassung in der Kundenübersichts-T...
15.05.2012 20:24:18
Thread-ID: 1263604
5 Beiträge
Formeln in Zellbereich eintragen per VBA-Array
Herbert

Hallo,
eine Formel kann ich mit VBA in eine Zelle mit folgendem Code eintragen:
ActiveCell.FormulaR1C1 = "=IF(RC[-64]="""","""",maxBlock2(ADDRESS(ROW()-1,COLUMN()-63)&"":""&ADDRESS(ROW()-1,54)&"",""&ADDRESS(ROW(),7)&"":""&ADDRESS(ROW(),COLUMN()-64),1)/2)"
Da...
31.01.2013 16:48:57
Thread-ID: 1296973
3 Beiträge
Formel in variablen Bereich einfügen
Markus
Hallo zusammen,
per VBA stelle ich eine Formel ein.
Range("AJ2").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-4]="""","""",VLOOKUP(RC[-3],Personalnummer!C[-35]:C[-34],2,0))"
Selection.AutoFill Destination:=Range("AJ2:AJ50"), Type:=xlFillDefault
Diese Formel ist, wie Ihr sehen...
15.06.2014 16:13:13
Thread-ID: 1365953
3 Beiträge
Wie kann man Formeln zu einem Bereich verknüpfen
Sebastian

Hallo,
vermutlich ist die Lösung ganz einfach - finde aber nichts dazu ...
Ich möchte mit der TREND-Funktion eine lineare Interpolation zwischen zwei Punkten durchführen. Nichts leichter als das: TREND(A1:A2;B1:B2;C1).
Nun sollen die Werte für x1, x2, y1 und y2 aber aus je einer For...
17.09.2014 12:31:50
Thread-ID: 1382063
8 Beiträge
Wie kann man Formeln zu einem Bereich verknüpfen
Sebastian

Hallo,
vermutlich ist die Lösung ganz einfach - finde aber nichts dazu ...
Ich möchte mit der TREND-Funktion eine lineare Interpolation zwischen zwei Punkten durchführen. Nichts leichter als das: TREND(A1:A2;B1:B2;C1).
Nun sollen die Werte für x1, x2, y1 und y2 aber aus je einer For...
17.09.2014 12:33:14
Thread-ID: 1382064
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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