Hallo,
ich habe mal wieder eine Frage, die ich mich eigentlich kaum traue zu stellen. Aber ich kriege es nicht hin...
Ich möchte die Füllung einer Zelle auf eine andere Zelle übertragen. Aber ausschließlich die Füllung und ansonsten nichts. Wenn ich die Quellzelle selektiere wird in der Farbpalette leider die entsprechende Farbe nicht markiert (habe ich immer wieder mal). Was ich auch versuche, ich schaffe es nicht ausschließlich diese Füllfarbe zu übertragen.
Wahrscheinlich ist das mega einfach...
Danke für eure Hilfe.
Gruß
Rainer
Hallo,
unter Start gibt es den Pinsel. Klicke auf diesen und du kannst das Format übertragen.
Gruß
Marcus
Hallo Marcus,
das habe ich schon versucht, aber dabei wird alles anders auch übertragen und meine Tabelle sieht dann ziemlich verbogen aus...
Gruß
Rainer
Moin Rainer,
Teilformatierungen wie du sie dir vorstellst, kann man nicht übertragen. Entweder alles oder nüscht.
(21.12.2019, 09:50)Rainer schrieb: [ -> ]… Wenn ich die Quellzelle selektiere wird in der Farbpalette leider die entsprechende Farbe nicht markiert (habe ich immer wieder mal).
Moin!
Könnte man mittels VBA lösen.
Allerdings deutet obiger Satz von Dir auf eine "Kuddel-Muddel"-Tabelle.
Was bedeuten die Farben?
Könntest Du statt dessen nicht eher mit bedingter Formatierung arbeiten?
Gruß Ralf
Hallöchen,
schaue mal beim Färben auf "Benutzerdefiniert..." Dort sollten die RGB-Werte Deiner Farbe stehen. Die merkst Du Dir und verwendest sie bei den anderen Zellen.
Hallo,
Zitat:oder mit VBA.
das sehe ich genau so wie Klaus-Dieter
Na gut, das Leben geht weiter, auch während eines Telefonats.
Vielleicht hätte ich vor Abschicken meines Posts .... Hab ich aber leider nicht.
Mal quick&dirty:
Allgemeines Modul:
Modul Modul1Option Explicit
Public Farbnr&
Sub lese_aus()
'Tastenkombi Strg+Umschalt+Q
Farbnr = ActiveCell.Interior.Color
End Sub
Nun wird mit dem festgelegten Shortcut Strg+Q die Farbe ausgelesen.
Mittels Rechtsklick wird sie (und nur diese Eigenschaft) dann übertragen.
Ins Modul der Tabelle:
Microsoft Excel Objekt Tabelle4Option Explicit
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
ActiveCell.Interior.Color = Farbnr
End Sub
Gruß Ralf
Hi,
(21.12.2019, 10:24)RPP63 schrieb: [ -> ]Was bedeuten die Farben?
Könntest Du statt dessen nicht eher mit bedingter Formatierung arbeiten?
Vermutlich ist das ja schon der Fall, weshalb die sichtbare Farbe nicht in der normalen Zellformatierung zu sehen ist.
Gruß Uwe