Live-Forum - Die aktuellen Beiträge
Datum
Titel
07.10.2025 18:27:08
Formel anstelle XVWERWEIS für alte Excel-Version
07.10.2025 15:42:10
Identische-Tabellen-identische Sub's funktionieren nicht...
07.10.2025 09:25:19
Bedingte Formatierung mit bezug auf anderes TabellenBlatt
07.10.2025 08:24:37
Formel mit dynamischer Name aus Zelle
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
1836to1840
1836to1840
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich mit Farbe markieren alle 26/2

Forumthread: Bereich mit Farbe markieren alle 26/2

Bereich mit Farbe markieren alle 26/2
22.06.2021 16:08:52
Robert
Hallo liebe Exelgemeinde!
Ich habe noch mal ein Problem schon einige probiert, aber es gelingt mir nicht, da mein Wissen nicht ausreicht. Hoffe Ihr könnt mir helfen. Mit dem Makro Recorder habe ich folgendes aufgezeichnet dadurch soll alle 25 Zeilen zwei Spalten farblich Grau von 

ub MakroGrau()
' Makro1 Makro
ActiveWindow.SmallScroll Down:=-9
With Selection.Interior
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = -4.99893185216834E-02
.PatternTintAndShade = 0
End With
Range("E27:L28").Select
ActiveWindow.SmallScroll Down:=36
Range("E54:L55").Select
ActiveWindow.SmallScroll Down:=30
Range("E81:L82").Select
End Sub
So soll es weiter gehen. Am besten ich könnte dann die Anzahl nach bedarf wechseln.
Es wäre sehr schön wenn Ihr mir helfen könntet.
LG Robert
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich mit Farbe markieren alle 26/2
22.06.2021 16:28:26
Daniel
Hi
mal so als Idee
ich gehe mal davon aus, dass die Formatierung eines 27er-Blocks über die Wiederholungen gleich ist

Sub test()
Dim Zeilen As Long
Dim Anzahl As Long
Zeilen = 27
Anzahl = 10
With Range("E27:L28")
With .Interior
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = -4.99893185216834E-02
.PatternTintAndShade = 0
End With
.Resize(Zeilen).Copy
.Resize(Zeilen * Anzahl).PasteSpecial xlPasteFormats
End With
End Sub
der Code nutzt aus, dass Excel beim Einfügen die Werte (hier nicht mit kopiert) und Formate wiederholt, wenn der Bereich, der beim Einfügen angegeben wird, größer ist als der kopierte Bereich, dh sowas kann man auch fürs normale Arbeiten ohne Makro mal nutzen.
Gruß Daniel
Anzeige
AW: Bereich mit Farbe markieren alle 26/2
22.06.2021 16:43:17
Robert
Hallo Daniel!
Ich danke Dir von ganzen Herzen, das ist genau das was ich brauchte.
Vielen lieben Dank.
LG Robert
;

Forumthreads zu verwandten Themen

Ausblenden aller Mitarbeiter außer den Angewählten
Werner

Hallo und guten Abend
Ich möchte in einem Schichtplan alle Spalten ausblenden außer die angewählte Spalte. Per Schaltfläche aus-bzw. einblenden. Die abgespeckte Testdatei mit Erklärung anbei. Hat einer das Problem schon mal gehabt oder weiß Rat?
https://www.herber.de/bbs/user/57614.xls...
14.12.2008 17:31:00
Thread-ID: 1032808
6 Beiträge
EXCEL-VBA auf Mac mit Parallels Dektop
Peter

Hat jemand (positive oder negative) Erfahrungen mit der Performance umfangreicher VBA-Anwendungen auf McIntosh mit Parallels Desktop?
Ich beobachte auf dem Mac immer wieder Abstürze ("EXCEL-EXE hat einen Fehler verursacht und muss beendet werden ...), während das gleiche Programm auf meinem...
20.01.2009 15:20:35
Thread-ID: 1041860
2 Beiträge
Anzeige
Formatierung aller Blätter mit Macro | Herbers Excel-Forum
Jakob Freitag
Hallo,
wie kann ich folgenden Code auf alle Blätter einer Excel-datei anwenden?
Sub ZeilenSpaltenUeberschriftenAUSGesamt() ActiveSheet.Protect DrawingObjects:=False, Contents:=False, Scenarios:=False ActiveWindow.DisplayHeadings = True End Sub
Vielen Dank.
Gruß,
Jakob
23.02.2009 15:59:28
Thread-ID: 1053129
8 Beiträge
Anzeige
Alle Zeilen mit bestimmtem Inhalt löschen
Lutz

Hallo Excel-Profis,
ich habe eine Tabelle die "Liste" heisst und in der Buchungen per Makro eingefügt werden.
Jetzt möchte ich per Makro einen Vorgang der aus mehreren Zeilen bestehen kann löschen.
D.h. ich möchte per Box fragen welcher Beleg (steht in Spalte "E") gelöscht werden so...
13.03.2009 18:53:36
Thread-ID: 1059979
3 Beiträge
Anzeige
alle Arbeitsblätter kopieren mit "Werte einfügen"
Steven

Hallo liebe Excelfreaks,
ich habe ein kleines Problem: ich suche ein Makro, dass mir alle Arbeitsblätter (auch mit je unterschiedlicher Anzahl) einer Arbeitsmappe kopiert und zwar mit "Werte einfügen". Da das "Werte einfügen" aufgrund eines Fremdimportes im Originalblatt selbst nicht funkti...
25.03.2009 20:56:33
Thread-ID: 1063979
5 Beiträge
Alle Möglichkeiten per Algorithmus mit Fakultät
Richard

Hallo Leute,
ich hätt' da mal wieder eine Frage an euch.
Folgendes Problem: Ich habe die Buchstabenreihe A B C D E F G, somit sind es 7 Buchstaben. Die Fakultät der Zahl 7 also 7! ergibt 5040.
Ich weiß somit, dass es insgesamt 5040 verschiedene Möglichkeiten gibt die Buchstaben anei...
01.04.2009 10:35:53
Thread-ID: 1065894
5 Beiträge
Schleife: alle mit Leirzeichen beginnend ..
Mandy

Hi,
ich möchte in der Spalte R alle Einträge mit einer Schleife (10-500) bearbeiten. Und zwar sollen alle Einträge , die mit ZWEI Leerzeichen beginnen, gelöscht werden, also die entsprechende Zellen geleert werde. Alle anderen sollen unberürt bleiben.
Wie mache ich das ?
Danke Mand...
10.09.2009 20:02:04
Thread-ID: 1101845
6 Beiträge
Alle Zeilen löschen mit Spaltenbedingung ?
alexander

Hallo,
wie ist es möglich das mir ein Makro alle Zeilen löscht wo in Spalte G nichts steht. Das Makro sollte in Zeile 5 beginnen zu laufen.
Danke,
Alex
16.09.2009 10:37:32
Thread-ID: 1103140
7 Beiträge
Alle bis auf ein bestimmtes Blatt mit Schreibschut
Elias_K

Hallo Forum,
ich habe untenstehenden Code im Einsatz, um alle Tabellen einer Mappe mit dem Blattschutz zu versehen.
Das klappt soweit prima, ich möchte jedoch eine bestimmte Tabelle gern auslassen.
Wie geht das?
Grüße
Private Sub Button_Blattschutz_setzen_Click() Dim wks As...
16.09.2009 15:58:28
Thread-ID: 1103263
3 Beiträge
Daten im Listbox mit Sonderfälle
Urmila

Hallo alle zusammen,
ich komme beim Befüllen von Daten in ListBoxen nicht weiter.
Ich habe eine Liste mit Daten, wie ne Buchführung. Im Spalte B steht das Datum der Erfassung, Spalte C die Kostenart und in Spalte H das Fälligkeitsdatum, im Spalte J die Hilfswerte als Status.
Ich wil...
16.10.2009 14:13:50
Thread-ID: 1110072
3 Beiträge
drucken mit Autofilter mit allen Kriterien
Joni

Hi,
hat jemand vielleicht schon einmal ein Makro geschrieben, das mit dem Autofilter den ersten Wert auswählt, dann das Blatt druckt, dann den 2. Wert auswählt, druckt, dann den 3. usw. bis alle Werte im Filter durch sind (inkl. leer aber ohne nicht leer).
Das würde mir den Ablauf etwas...
03.11.2009 12:44:38
Thread-ID: 1114087
3 Beiträge
Anzeige
Autoausfüllen mit Werterhöhung alle 20 Zeilen | Herbers Excel-Forum
philG
Hallo liebe Herber-Gemeinde,
ich möchte gerne eine Zahl z.B. "5560" in der Spalte B runterwärts aufsteigend eintragen lassen, allerdings soll sich diese Zahl alle 20 Zeilen um 1 erhöhen. Also 19 Zellenwerte sollen "5560" betragen, der 20. "5561" usw...
Kann mir jemand weiterhelfen? Viiieele...
04.01.2010 13:08:26
Thread-ID: 1127033
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