Office Forum www.Office-Loesung.de Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: ---> Neu: Office 2010 Forum <- Forum-Regeln :: FAQ :: Forum-Suche :: Mitgliederliste :: Benutzergruppen :: Favoriten ::  Registrieren :: Profil :: Briefkasten :: Login

zeilenfarbe ändern wenn zelle ausgewählt

Office Forum -> Excel Forum -> Excel VBA (Makros)
zurück: Jahreszusammenfassung aus Quelldaten (Monatsdaten) erstellen weiter: Eingabe und automatische Zuweisung von Aktnummern			Unbeantwortete Beiträge anzeigen
	Status: Feedback		Diese Seite Freunden empfehlen Zu Browser-Favoriten hinzufügen

Autor	Nachricht
Gast Verfasst am: 25. Feb 2010, 13:33 Rufname:	- zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 hallo zusammen! ich hätte gerne die komplette zeile in einer anderen farbe wenn ich eine zelle in der zeile anklicke. bisher habe ich nur etwas gefunden, dass nur die aktivierte zelle färbt: Code: Dim Merk, Farbe Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)     If Merk <> "" Then Range(Merk).Interior.ColorIndex = Farbe     Merk = Target.Address     Farbe = Target.Interior.ColorIndex     Target.Interior.ColorIndex = 20 End Sub wie muss ich das abändern? kann mir jemand helfen? viele grüße
kjot259 VBA Einsteiger/Makro4-profi Verfasst am: 25. Feb 2010, 15:00 Rufname: kj	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 hallo unbekannte(r), nimm diese änderung: Code: Dim Merk, Farbe Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)     If Merk <> "" Then Rows(Merk).Interior.ColorIndex = Farbe     Merk = Target.Row     Farbe = Target.Interior.ColorIndex         Rows(Target.Row).Interior.ColorIndex = 20 End Sub _________________ Gruß kj PS: Rückmeldung (nach Vollzug) erbeten! **************************************** Chuck Norris liest keine Bücher, er starrt sie so lange an, bis die Bücher freiwillig alles erzählen.
Gast Verfasst am: 25. Feb 2010, 15:43 Rufname:	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 sehr cool! funktioniert! vielen dank kjot259!
Gast Verfasst am: 25. Feb 2010, 15:46 Rufname:	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 ach moment! doch noch eine frage! kann man das ganze auch auf einen bestimmten bereich begrenzen? z.b. A5:J30 ?? vielen dank und viele grüße benni
kjot259 VBA Einsteiger/Makro4-profi Verfasst am: 25. Feb 2010, 15:54 Rufname: kj	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 hallo benni, das geht auch. Code: Dim Merk, Farbe Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)     If Merk <> "" Then Rows(Merk).Interior.ColorIndex = Farbe     If Intersect(Target, Range("A5:J30")) Is Nothing Then Exit Sub         Merk = Target.Row     Farbe = Target.Interior.ColorIndex         Rows(Target.Row).Interior.ColorIndex = 20 End Sub _________________ Gruß kj PS: Rückmeldung (nach Vollzug) erbeten! **************************************** Chuck Norris liest keine Bücher, er starrt sie so lange an, bis die Bücher freiwillig alles erzählen.
Gast Verfasst am: 25. Feb 2010, 15:58 Rufname:	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 super, vielen dank!
kjot259 VBA Einsteiger/Makro4-profi Verfasst am: 25. Feb 2010, 16:14 Rufname: kj	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 bidde _________________ Gruß kj PS: Rückmeldung (nach Vollzug) erbeten! **************************************** Chuck Norris liest keine Bücher, er starrt sie so lange an, bis die Bücher freiwillig alles erzählen.
Gast Verfasst am: 28. Apr 2010, 15:05 Rufname:	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 Hallo zusammen, ich bin gerade auf dieses Thema gestoßen und ich hätte dazu auch noch eine Frage. Ist es möglich, dass der farbige Bereich auch noch begrenzt wird? z.B. wähle die Zelle J1 an und von A1 bis J1 wird farbig. Des Weiteren sollten die Zellen, die vorher schon farbig hinterlegt waren auch ihre Farbe wieder annehmen. Vielen Dank im Voraus. Dim Merk, Farbe Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) If Merk <> "" Then Rows(Merk).Interior.ColorIndex = Farbe If Intersect(Target, Range("A5:J30")) Is Nothing Then Exit Sub Merk = Target.Row Farbe = Target.Interior.ColorIndex Rows(Target.Row).Interior.ColorIndex = 20 End Sub
kjot259 VBA Einsteiger/Makro4-profi Verfasst am: 28. Apr 2010, 15:24 Rufname: kj	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 hallo, das was du suchst geht auch. wurde auch schn oft behandelt, benutzte die sufu nach Fadenkreuz _________________ Gruß kj PS: Rückmeldung (nach Vollzug) erbeten! **************************************** Chuck Norris liest keine Bücher, er starrt sie so lange an, bis die Bücher freiwillig alles erzählen.
Gast Verfasst am: 29. Apr 2010, 06:38 Rufname:	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 Hallo, ich habe nun den ganzen Abend gegooglet, aber leider ohne Erfolg.
Virtus VBA-Einsteiger Verfasst am: 29. Apr 2010, 06:57 Rufname: Wohnort: Nürnberg	- AW: zeilenfarbe ändern wenn zelle ausgewählt Nach oben        Version: Office 2003 Hallo, dann such mal in Google nach Fadenkreuz Excel Hajo. Der erste Treffer müsste es ein. Gruß Virtus

Nach oben

Alle Zeiten sind GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1 Gehe zu: Forum auswählen Office Forum Allgemein----------------Office Forum BekanntmachungenFragen & Anregungen zum Office ForumOffice Dienstleistungen && Schulungen || Jobs ~~ SoftwareOffice 2007 ForumOffice 2010 ForumAnwendungsübergreifende FragenForum für OpenOffice und Staroffice  Word Forum----------------Word Tipps & TricksWord FormateWord GestaltungselementeWord SerienbriefeWord VBA Programmierung (Makros)Word Hilfe Excel Forum----------------Excel Tipps & TricksExcel FormateExcel FormelnExcel AuswertungenExcel VBA (Makros)Excel Hilfe Powerpoint Forum----------------PowerPoint Tipps & TricksPowerpoint PräsentationenPowerPoint VBA (Makros) Outlook Forum----------------Outlook Tipps & TricksOutlook MailOutlook KontakteOutlook KalenderOutlook HilfeOutlook VBA und FormulareOutlook Express Access Forum----------------Access Tipps & TricksAccess Tabellen & AbfragenAccess FormulareAccess BerichteAccess Programmierung / VBAAccess Hilfe MS Access und Datenbank-Server----------------Microsoft Access und MS SQL ServerMicrosoft Access und MySQLMicrosoft Access und andere Datenbank-Server Office Software----------------MS Project ForumPublisher ForumMS MapPoint ForumMS Visio ForumMS OneNote ForumMS InfoPath ForumMS Groove ForumMS SharePoint Services Forum HTML Editor Forum----------------Frontpage ForumMS Expression Web ForumMacromedia Dreamweaver ForumHTML Editoren ForumHTML & CSS ForumPHP & JavaScript Forum Computer Forum----------------SicherheitHardware & Betriebssystem ForumWindows Vista & Windows 7 ForumSoftware Forum (Sonstige Software) Workshops----------------WorkshopsWorkshop: RegressionsanalyseWorkshop: Webdesign für EinsteigerWorkshop: Excel Projekte Banken Forum----------------WISO Mein Geld ForumStarmoney ForumGirokonto & Tagesgeld ForumOnline Broker ForumBanking Software Chillout Forum----------------Office Treffen RegionalFußball ForumSmalltalkSchach ForumForum-Spiele

Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum nicht posten Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen		Antworten	Autor	Aufrufe	Letzter Beitrag
	Excel Formeln: Wort aus Text in benachbarte Zelle kopieren	2	Gast	403	09. Nov 2009, 18:11 Gast
	Excel Auswertungen: Diagramm Achsenbeschriftung Reihenfolge ändern	4	JC	606	24. Aug 2009, 17:35 Zero
	Excel Formate: US zu DE Datumsfomat ändern	3	big-bastian	100	15. Jul 2009, 23:25 shift-del
	Excel Hilfe: Ausfüllen einer Zelle beim herunterziehen mit der Maus	1	fx4000	202	11. Nov 2008, 14:32 silex1
	Excel VBA (Makros): Ordner erstellen der seinen Namen aus z.B. Zelle A1 nimmt	12	Surfbohne	4343	27. Mai 2008, 22:15 der neue
	Excel Hilfe: *T*Bestimmte Zahlenfolge aus einer Zelle filtern	3	Tobias89	404	27. Feb 2008, 10:21 ae
	Excel Hilfe: *T*letzte zahl in einer Zelle entfernen	1	sönnchen	201	19. Dez 2007, 21:25 < Peter >
	Excel Auswertungen: Bezug- Punkt einer X/Y-Grafik und die dazugrhörende Zelle	3	Kaily	302	08. Nov 2007, 13:11 Kaily
	Excel Formeln: Wenn-Abfrage ob die Zelle Numerisch ist	2	Jupp Hintz	1414	31. Okt 2007, 16:13 Jupp Hintz
	Excel Formate: Wie kann ich leerzeilen in einer großen Zelle erzeugen??	3	lolorek	302	23. Okt 2007, 19:33 Jan3
	Excel VBA (Makros): letzte Zelle zurücksetzen	1	Bazi	403	23. Apr 2007, 16:09 Kuwe
	Excel Hilfe: Letztes Wort einer Zelle in neue Zelle schreiben	4	Maxi1	2726	06. Apr 2007, 15:20 ae

----> Diese Seite Freunden empfehlen <------	Impressum - Besuchen Sie auch: Macromedia Dreamweaver