Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
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
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
1316to1320
1316to1320
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro nur auf markierte Zellen anwenden

Forumthread: Makro nur auf markierte Zellen anwenden

Makro nur auf markierte Zellen anwenden
22.06.2013 14:49:57
Günther
Hallo zusammen,
ich brauche mal wieder eure Hilfe.
Ich habe eine Makro gefunden welches entweder alle Zellen mit Formeln mit ISTFEHLER erweitert (→ 16) oder aber nur die Zellen die einen Fehler aufweisen (→ 23)
Wie muss ich dieses Markro ergänzen, damit es nur auf die momentan markierten Zellen angewendet _ wird? 

Sub istfehler()
Dim cell_ As Range
On Error Resume Next
'(xlCellTypeFormulas, 16) = alle formeln werden mit ISTFEHLER versehen
'(xlCellTypeFormulas, 23) = nur die Zellen mit einem Fehler werden mit ISTFEHLER versehen.
For Each cell_ In Cells.SpecialCells(xlCellTypeFormulas, 16)
cell_.Formula = "=IF(ISERROR(" & Replace(cell_.Formula, "=", "") & "),""""," & Replace(cell_. _
Formula, "=", "") & ")"
Next
End Sub

Vielen Dank für eure Hilfe.
Gruß
Günther

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Makro nur auf markierte Zellen anwenden
22.06.2013 14:52:10
Hajo_Zi
Hallo Günter,
In Selection.SpecialCells(xlCellTypeFormulas, 16)

AW: Makro nur auf markierte Zellen anwenden
22.06.2013 15:03:17
Günther
Hallo Hajo,
danke für die schnelle Antwort.
Hier wird einem einfach immer geholfen.
Ich wünsche noch ein schönes Wochenende.
Gruß
Günther

Anzeige
AW: Makro nur auf markierte Zellen anwenden
22.06.2013 15:12:20
Gerd
Hallo Günther,
ist ist nie falsch, zuerst die getroffene Auswahl zu prüfen. 
Sub istfehler()
Dim objCell As Range, rngTest As Range
'(xlCellTypeFormulas, 16) = alle formeln werden mit ISTFEHLER versehen
'(xlCellTypeFormulas, 23) = nur die Zellen mit einem Fehler werden mit ISTFEHLER versehen.
Set rngTest = Intersect(Selection, Cells.SpecialCells(xlCellTypeFormulas, 16))
If Not rngTest Is Nothing Then
On Error Resume Next
For Each objCell In rngTest
objCell.Formula = "=IF(ISERROR(" & Replace(objCell.Formula, "=", "") & "),""""," & Replace( _
objCell. _
Formula, "=", "") & ")"
Next
End If
End Sub
Gruß Gerd
Anzeige
;

Forumthreads zu verwandten Themen

Spalte nicht ausdrucken
Edwin

Hallo,
ich möchte in einem Sheet, dass eine bestimmte Spalte nicht ausgedruckt wird.
Ich weiß, dass ich Spalten ausblenden kann und dass diese dann nicht ausgedruckt werden.
Kann ich aber auch der Spalte die Eigenschaft zuweisen, dass sie nicht ausgedruckt wird?
Gruß
Edwin
05.11.2008 10:42:43
Thread-ID: 1021789
4 Beiträge
Anzeige
Spalte keine Ansicht und nicht drucken
Frederic

Hallo Zusammen
Hätte eine blöde Frage:
Wie kann ich mit VBA erreichen, dass die Spalte C1:C60 nicht in der Seitenansicht und auch nicht gedruckt wird. Grund: Habe dort Listenvermerke drin.
Für Eure generöse Hilfe danke ich schon im Voraus
Salvus
Frederic
20.12.2008 19:23:00
Thread-ID: 1034447
23 Beiträge
Combobox ausgeblendete Zeilen nicht anzeigen
helena

Schönen Guten Morgen
Kleines Problem ich verstecke Zeilen wenn in Spalte C Begriff nicht vorhanden dies klappt auch
aber via Combobox suche ich Namen (Adressvergabe) aber es werden mir immer alle aufgelistet auch wenn Zeilen ausgeblendet sind, ich Blende aus ob ich nur G_kunden oder P_...
28.12.2008 09:10:32
Thread-ID: 1035521
12 Beiträge
Zeilen nicht drucken, wenn Spalte leer oder 0
Berlenbach

Hallo,
ich habe ein Problem mit dem unten angegebenen und hier veröffentlichten Makro:
Sub Drucken() Dim iRowL As Integer, iRow As Integer iRowL = Cells(Rows.Count, 3).End(xlUp).Row For iRow = 1 To iRowL If IsEmpty(Cells(iRow, 3)) Or Cells(iRow, 3).Value = 0 Then Rows(iRow).Hidden = T...
01.04.2009 09:37:06
Thread-ID: 1065835
8 Beiträge
Nur markierte Zellen verarbeiten
MaxKuba

Hallo Excel Spezialisten
könnt Ihr mir bitte helfen diesen Code so umzuwandeln das nur bei den markierten Zellen die Formel ifserror eingefügt wird?
Sub NA_raus() Dim rng As Range, cell As Range, fmla As String Set rng = Cells.SpecialCells(xlCellTypeFormulas, 16) For Each cell In rng fm...
21.04.2010 10:35:12
Thread-ID: 1153059
16 Beiträge
Leere Zeilen nicht drucken. Makro optimieren
chandler

Hallo,
das Makro durchsucht Bereiche und blendet Zeilen aus, wenn in Spalte C die Zellen leer sind um dann das Blatt zu drucken.
Sub print_n() Dim iCol As Integer Dim i As Integer Dim iRow As Integer Dim iRowL As Integer Dim i2 As Integer Dim iRow2 As Integer Dim iRowL2 As Integer iCol...
04.01.2012 14:21:35
Thread-ID: 1244557
10 Beiträge
Werte nur in Markierten Zellen ändern
Valeri

Hallo ihr Allwissenden,
mit folgendem Code ändere ich markierte Zellen:
Sub Zelle_Urlaub_rot() Application.ScreenUpdating = False Dim c As Range For Each c In Selection If Not (IsEmpty(c)) Then c.FormulaR1C1 = "U" c.Interior.Color = 255 End If Next c Application.ScreenUpdating = True En...
13.08.2012 08:49:38
Thread-ID: 1274803
6 Beiträge
Ausgeblendete Zeilen nicht berechnen
Robert

Hallo Zusammen,
ich habe zwei Datenblätter. Im ersten mache ich eintragungen, die ich später ggf. nach Datum filtern möchte.
Im zweiten Datenblatt habe ich folgende Formel:
=WENN(UND(INDEX(Eingabe!$D:$D;ZEILE()-4)=A$5;INDEX(Eingabe!$E:$E;ZEILE()-4)=$A$3);1)
Wenn im ersten Daten...
17.12.2014 10:22:25
Thread-ID: 1398541
7 Beiträge
Anzeige
nur markierte datensätze drucken
detlef

Hallo Excelprofis,
ich hab mal wieder eine Herausforderung an der ich verzweifel.
Auf Tabellenblatt 1 habe ich Zeilen mit Datensätze (ca. 100 Stück)
Auf Tabellenblatt 2 soll per sverweisein ein Formular mit den Daten der Zeilen aus Tabellenblatt 1 ausgefüllt werden.
Zur Zeit ruf...
06.10.2016 20:21:19
Thread-ID: 1518394
2 Beiträge
Anzeige
VBA; nur verschiedene markierte Zellen kopieren
Bernd

Hallo zusammen,
Benötige Hilfe bei folgendem Problem.
1.Kopiere markierte Zellen aus Spalte B3:B7, D3:D7, F3:F7, H3:H7.
2. Füge kopierte Zellen in Tabelle2 ab A3 abwärts ein
Die markierten Zellen in den Spalten variieren von der Anzahl und zwar kann z.B. in Spalte B drei Zellen,...
07.10.2017 17:54:51
Thread-ID: 1584648
13 Beiträge
Aufrunden auf 0,5 und nur in markierten Zellen?
Stefanie

Servus,
ich hab ein altest Makro ausgegraben das nicht tut was ich mir vorstelle.
Ich möchte das alle markierten Zellen, wenn Sie kleiner 0,5 sind auf 0,5 aufgerundet werden.
Wie würde das am kürzesten als Makro aussehen?
Danke euch
30.07.2018 20:41:26
Thread-ID: 1636676
5 Beiträge
Anzeige
nur markierten Bereich drucken
Paul

HalloKann mir jemand sagen, wie ich vom aktuellen Sheet nur den markierten bereich ausdrucken kann?gruss paul
01.10.2002 10:59:56
Thread-ID: 165208
6 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