Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Zellen farbig markieren |
27.06.2017 15:27:46 |
Fokus'Tabellenblatt |
|
|
|
27.06.2017 15:54:08 |
Werner |
|
|
|
27.06.2017 15:59:25 |
Fokus |
|
|
|
27.06.2017 16:30:44 |
Werner |
|
|
|
28.06.2017 10:02:30 |
Fokus |
|
|
|
28.06.2017 10:18:19 |
Fokus |
|
|
|
28.06.2017 11:00:25 |
Werner |
|
|
Von:
Fokus'Tabellenblatt |
Datum:
27.06.2017 15:27:46 |
Views:
1183 |
Rating:
|
Antwort:
|
Thema:
Zellen farbig markieren |
Hallo Leute!
Wie kann ich mit VBA Bereiche farbig formatieren? Ich habs mit "Makro aufzeichnen" probiert und das ist nach paar Veränderungen rausgekommen (With t3 .....End With):
'Tabellenblatt "Mengeneingabe": Menge (Spalten G-I) farbig markireren, wenn keine Menge steht
lz2 = .Range("D65536").End(xlUp).Row
If .Range("D65536") <> "" Then lz2 = 65536
On Error Resume Next
For z2 = .Cells(Rows.Count, 7).End(xlUp).Row To lz2
If .Range("G:H") = "" Then
.Range("G:H").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 10066431
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Else
.Range("G:H").Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End If
Next z2
Der Code soll eigentlich folgendes machen:
ich habe 2 Tabellenblätter (t1 und t3). Von t1 werden in Spalten A-F die Daten automatisch in t3 übertragen.In t3 sind in Spalte G-I werden Zahlen manuell eingetragen. Jetzt soll der Code schauen, wo noch die Zahlen in G-I noch zu den jeweiligen Spalten von A-F (hier habe ich Spalte D genommen) einzutragen sind und diese leere Zellen mit der bestimmten Farbe markieren. Wenn die Zahlen eingetragen werden, soll es die farbige Markierung wieder rausnehmen.
Ich hoffe, ihr könnt mir weiterhelfen! Danke euch!
VG
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Zellen farbig markieren |
27.06.2017 15:27:46 |
Fokus'Tabellenblatt |
|
|
|
27.06.2017 15:54:08 |
Werner |
|
|
|
27.06.2017 15:59:25 |
Fokus |
|
|
|
27.06.2017 16:30:44 |
Werner |
|
|
|
28.06.2017 10:02:30 |
Fokus |
|
|
|
28.06.2017 10:18:19 |
Fokus |
|
|
|
28.06.2017 11:00:25 |
Werner |
|
|