Zellenbereich einfärben

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Left$(Target.Text, 1) = "A" Then Range("A1:B6").Interior.Color = Range("C1").Interior.Color Else Range("A1:B6").Interior.ColorIndex = xlColorIndexNone End If End If End Sub

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If LCase$(Target.Text) = "test" Then Range("A1:B6").Interior.Color = Range("C1").Interior.Color Else Range("A1:B6").Interior.ColorIndex = xlColorIndexNone End If End If End Sub

Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Range("A1:B6").Interior.ColorIndex = _ IIf(Target = "A", Range("C1").Interior.ColorIndex, xlNone) End Sub

Hallo Steffen,
danke für deine Mühe. Dein Programm funktioniert soweit, bis auf die Tatsache,
dass die in Zelle C1 hinterlegte Farbe für die einzufärbenden Bereich nicht übernommen wird. Soll heißen, es wird die falsche Farbe übernommen.
So wird bei rot - bei mir zumindest - der Zellenbereich in grau eingefärbt oder es werden Farben genommen, die ähnlich aber nicht gleich sind. aus dunkelrot in C1 wird Hellrot. Keine Ahnung warum.hast du eine Idee?
Nun habe ich ja von VBA soviel Ahnung wie vom Balletttanzen, nämlich so gar keine, also überhaupt nicht. . Ich habe versucht dein Programm ein wenig nachzuvollziehen
was bedeutet der Unterstrich "= _" ?
"IIF" dachte ich sei ein Tippfehler und habe in meinem jugendlichen Leichtsinn einfach das erste I gelöscht und *peng* schon kam "Fehler beim Kompilieren - Ausdruck erwartet" Nun, ich habe keine Ahnung was das bedeutet. Daher wollte ich mal fragen, wie fängt man am besten als Super-Laie mit VBA an ? Kannst du Bücher empfehlen? Seiten im Netz? Wie hast du es gelernt? Was ich wohl mit Sicherheit sagen kann, das das Thema VBA ein riesen Fass zu seien scheint, das ich da öffne. Von einfach bis hochkompliziert. Wie geht man also da am besten ran?
Wäre gut, wenn du in deinem Prog die Zeilen kommentieren könntest. Ich glaube das macht man mit einem Apostroph?! Ein wenig kann ich schon :-) *juhu*

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Zellenbereich einfärben

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

300 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread