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
1972to1976
1972to1976
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl Zellen mit Formel ermitteln

Forumthread: Anzahl Zellen mit Formel ermitteln

Anzahl Zellen mit Formel ermitteln
04.04.2024 11:53:11
Born
Hallo Forum,
ich möchte alle Zellen in einem Sheet per VBA selektieren, wenn diese eine Formel beinhalten. Dafür nutze ich den folgenden Befehl: 
Cells(1, 1).SpecialCells(xlCellTypeFormulas).Select

Funktioniert auch, solange ich mindestens eine Zelle mit einer Formel habe. Ist das Sheet leer oder nur mit Konstanten gefüllt bekomme ich eine Fehlermeldung. Gibt es einen Weg, die Anzahl der Zellen mit Formeln vorab zu ermitteln, ohne dass ich mit For-Schleifen oder On Error Konstrukten arbeiten muss?

Vielen Dank,
M. Born
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Anzahl Zellen mit Formel ermitteln
04.04.2024 12:01:56
Oberschlumpf
Hi,

versuch mal das hier 


Sub test()



    Dim lrgFrm As Range

    

    On Error Resume Next



    Set lrgFrm = Selection.SpecialCells(xlCellTypeFormulas)

    

        If Not lrgFrm Is Nothing Then

            Cells(1, 1).SpecialCells(xlCellTypeFormulas).Select

        End If

        

End Sub

Hilfts?

Ciao
Thorsten
Anzeige
AW: wie wär's mit .count statt .select ??
04.04.2024 12:53:28
JoWE
AW: Anzahl Zellen mit Formel ermitteln
04.04.2024 13:24:01
Onur 
    Dim rng

    Set rng = Cells.SpecialCells(xlCellTypeFormulas)

    If Not rng Is Nothing Then rng.Select
AW: wie wär's mit .count statt .select ??
04.04.2024 12:56:24
JoWE
Hallo M.

also zum Beispiel so: 
Sub checker()

  If Cells(1, 1).SpecialCells(xlCellTypeFormulas).Count > 0 Then

    Cells(1, 1).SpecialCells(xlCellTypeFormulas).Select

  End If

End Sub

Gruß
Jochen
Anzeige
AW: wie wär's mit .count statt .select ??
04.04.2024 13:04:18
Born
Leider wirft SpecialCells immer einen Fehler, wenn keine Zelle mit Formeldn im Sheet enthalten ist, egal ob ich danach ein Select oder Count anhänge. Aber ich habe mit Try-Catch das Ganze abfangen können, auch wenn ich es nicht optimal finde.
Prüfung mit Find vielleicht?
04.04.2024 13:17:53
Kuwer
Hallo, 

  If Not Cells.Find(What:="=*", LookIn:=xlFormulas2, LookAt:= _

        xlPart, MatchCase:=False, SearchFormat:=False) Is Nothing Then

    Cells.SpecialCells(xlCellTypeFormulas).Select

  Else

    MsgBox "Keine Zellen mit Formeln vorhanden!"

  End If


Gruß, Uwe
Anzeige
AW: Prüfung mit Find vielleicht?
04.04.2024 13:26:24
Born
Die Idee hatte ich auch schon, aber auch diese Variante wirft einen Fehler, den ich abfangen müsste.
welch seltener Gast!
04.04.2024 16:40:15
Uduuh
Hallo Uwe,
hast du dich verklickt? Oder ist woanders nix los?

Gruß aus'm Pott
Udo
Hallöchen
04.04.2024 17:10:47
Kuwer
Hi Udo,

und ich hab mich schon gewundert, dass das auf einmal ganz anders aussieht. :-D
Gerade ist wirklich nicht viel los.

Viele Grüße
Uwe
Anzeige
AW: Prüfung mit Find vielleicht?
04.04.2024 13:53:33
Kuwer
Welchen Fehler?
AW: Anzahl Zellen mit Formel ermitteln
04.04.2024 12:20:09
Born
Hallo Torsten,
da ich das Ganze innerhalb von VB.NET einsetzen will, hat es leider nicht funktioniert. Ich habe daher doch eine Try-Catch verwenden müssen. Trotzdem Danke für Deine Hilfe.
Viele Grüße
M. Born
grmpff!!!
04.04.2024 18:38:40
Oberschlumpf
Hi!

zuerst schreibst du: "ich möchte alle Zellen in einem Sheet per VBA selektieren"

Als Antwort auf meine Idee in VBA schreibst du: "da ich das Ganze innerhalb von VB.NET einsetzen will"

grrrr...WIESO erwähnst du VB.NET nicht gleich im 1. Beitrag?????...man ey!

...ach ja! Meine VBA-Lösung funktioniert - innerhalb einer VBA-Umgebung - übrigens sehr gut!...hab ich getestet...
Anzeige
;

Forumthreads zu verwandten Themen

Zellen kopieren (mit Formatierung)
Yves

Hallo zusammen,
ich möchte Daten von einem Tabellenblatt (Tabelle2) in ein anderes Tabellenblatt (Tabelle1) kopieren.
Habe dies bis anhin so gelöst:
sheets("Tabelle1").cells(1,1).value = sheets("Tabelle2").cells(5,1).value
Somit wurden einfach nur die Werte 'kopiert'. Nun würde...
08.08.2008 14:09:18
Thread-ID: 1000289
8 Beiträge
Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
VBA Zellen mit x kopieren aber nur bestimmte Zellen
balta

Hallo zusammen,
habe folgendes problem, undzwar sieht meine Tabelle so aus
__A____B______C______D_____E_______F_____G____H
1_x___alf___test1_________________1234___a____ist ein Auto
2_y________________Ulf____test2__________b____ist ein Krad
3
4
5
6_y_____________...
26.09.2008 23:48:47
Thread-ID: 1012775
6 Beiträge
Zellen formatierung mit Formeln
Peter

Hallo
habe eine Formatierung in einer Zelle, in der er die 0 als 00 anzeigen soll.
Das macht er so lange ich keine Formel drin habe.
Sobald die Formel drin ist., zeigt er mir nur eine 0 (Null an.
die Formel ist
RECHTS(SUMMEWENN(C14:C40;">0";G14:G40);2)
Wie bekomme ic...
08.11.2008 18:25:00
Thread-ID: 1022970
7 Beiträge
Anzeige
Formel mit VBA kopieren
Hartmut_M

Hallo, ich möchte mit VBA aus einem Bereich die Formeln in einen anderen Bereich kopieren.
Nutze hierfür folgenden code, wobei die variablen spalte und spalteneu für die Spaltennummern stehen:
Range(Cells(5, spalte), Cells(130, spalte)).Select
Selection.AutoFill Destination:=Range(C...
12.12.2008 10:02:26
Thread-ID: 1032307
3 Beiträge
nicht die Formel mitkopieren
TomTom

Hi,
Ich habe in meinem Sheet eine Funktion, mit der will ich verschiedene Zeilen kopieren:
MeineQuelle.Rows(lngZeile).Copy Destination:=MeinZiel.Cells(lngZeile, 1)
Wenn ich nun in einer gefundenen Zeile, die kopiert wird, irgendwo eine Formel drin habe, (die sich auf irgend was bezi...
30.01.2009 11:15:07
Thread-ID: 1045327
8 Beiträge
Formel runterkopieren und bestimmte Zellen ausl.
Tom

Hallo zusammen,
vielleicht kann mir jemand bei folgendem Problem helfen:
In Zelle C1 steht eine Formel die ich ab und zu verändern muss, nun möchte ich diese Formel mit Doppelklick runterkopieren, in der Spalte C sind aber bestimmte Zellen, die bestimmte Werte enthalten und die dürfen n...
10.05.2009 18:13:07
Thread-ID: 1074184
6 Beiträge
Anzeige
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
VBA - Formeln kopieren mit Bezug auf andere Sheets
Fabian

Hallo Zusammen,
ich habe folgende Problemstellung:
Eine Exceldatei *xlsx mit insgesamt 4 Tabellenblättern.
Tabellenblatt 1 - Material Data - Dateneingabe ab Zeile 2.
Tabellenblatt 2 - ABCXYZ - nicht relevant für das Problem
Tabellenblatt 3 - Life Time Cycle - Berechnung, di...
16.09.2009 09:14:54
Thread-ID: 1103102
5 Beiträge
Wennformel mit Gültigkeit in Zellen
Sebastian

Hallo Excel-Freunde,
im Anhang findet ihr eine Tabelle die ich soweit schon versucht habe zum laufen zu bringen. Ich habe jetzt nur ein Problem mit einer Wenn-Abfrage wenn in einem Feld schon eine Gültigkeit vorgegeben ist.
Hier die Tabelle: https://www.herber.de/bbs/user/65096.xls
...
15.10.2009 13:25:58
Thread-ID: 1109770
7 Beiträge
Anzeige
Zellengültigkeit Dropdown mit Formeleinschrenkung
Sascha

Hallo Zusammen,
ich habe eine Dropdown Auswahlleiste die sich auf die Gütligkeit in Z:Z bezieht.
Eine zweite Auswahlleiste solldie Daten aus AA:AA als Auswahl bieten, allerdings nur wenn diese in selber Zeile steht wie die Auswahl aus Z:Z.
Um es etwas klarer zu machen:
in A1 wir...
15.10.2009 22:26:14
Thread-ID: 1109969
5 Beiträge
Formelbezug ändert sich bei kopieren von Zellen
Zellen

Hallo zusammen,
ich habe ein Tabellenblatt erstellt, in dem durch mehrere Nutzer Datensätze in Zeilen eingegeben werden. Gleichzeitig sind in die Zeilen schon Formeln eingetragen und per Blattschutz gegen versehentliche Änderungen des Users geschützt.
Wird nun eine Zelle kopiert, ändern...
27.10.2009 22:25:08
Thread-ID: 1112615
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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