Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Formate übertragen

Forumthread: Formate übertragen

Formate übertragen
Jean
Guten Abend,
2 Fragen zur Formatübertragung mit VBA sind für mich ungelöst:
A. Wie kann man alle Formate der Zelle A1 in die Zelle B1 übertragen?
B. Wie kann man die Schriftfarbe von Zelle A1 in die Zelle B1 übertragen?
Gruß
Jean
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Formate übertragen
06.11.2009 21:39:38
Josef
Hallo Jean,
Sub formate()
  With Sheets("Tabelle3")
    'Formate
    .Range("A1").Copy
    .Range("B1").PasteSpecial xlFormats
    Application.CutCopyMode = False
    
    'Schriftfarbe
    .Range("B2").Font.Color = .Range("A2").Font.Color
  End With
End Sub

Gruß Sepp

Anzeige
AW: Formate übertragen
06.11.2009 21:46:29
Jean
Hallo Sepp,
super. Vielen Dank für die schnelle Unterstützung.
Jetzt kanns weitergehen ...
Gruß
Jean
;

Beliebteste Forumthreads (12 Monate)

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