Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellenformatierung übernehmen

Forumthread: Zellenformatierung übernehmen

Zellenformatierung übernehmen
10.03.2004 18:35:45
Joachim
Hallo Excel-Könner,
ich möchte eine Zelle automatisch genauso formatieren, wie eine andere Zelle in einen anderen Blatt. Ist es möglich das Format zu übernehmen?
In Worten:
wenn TABELLE1!A1 > 10 dann für A1 die Formatierung aus TABELLE2!A3 übernehmen
könnt Ihr mir helfen, Danke!
Joachim
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellenformatierung übernehmen
10.03.2004 18:49:53
K.Rola
Hallo,
schon gut beschrieben, nur wodurch ändert sich der Wert in TABELLE1!A1 ?
Durch Berechnung oder Eingabe?
Gruß K.Rola
AW: Zellenformatierung übernehmen
10.03.2004 18:52:01
Joachim
durch Berechnung!
AW: Zellenformatierung übernehmen
10.03.2004 19:14:33
K.Rola
Hallo,
hätt ich auch gleich fragen können, und was wenn <= 10 ?
Gruß K.Rola
Anzeige
AW: Zellenformatierung übernehmen
11.03.2004 10:23:33
Joachim
Sorry, ich musste Gestern Feierabend machen, deswegen erst jetzt die Antwort!
dann für A1 die Formatierung aus TABELLE2!A4 übernehmen
Gruß Joachim
AW: Zellenformatierung übernehmen
11.03.2004 12:25:22
K.Rola
Hallo,
das Wort GROESSER musst du durch den Operatot für größer ersetzen
das will er hier nicht wissen:
'Option Explicit
'

Private Sub Worksheet_Calculate()
'If [a10] GROESSER 10 Then
'  Sheets("Tabelle2").[a3].Copy
'  Sheets("Tabelle1").[a10].PasteSpecial Paste:=xlPasteFormats
'Else
'  Sheets("Tabelle2").[a4].Copy
'  Sheets("Tabelle1").[a10].PasteSpecial Paste:=xlPasteFormats
'End If
'End Sub

Gruß K.Rola
Anzeige
AW: Zellenformatierung übernehmen
11.03.2004 12:32:15
Joachim
Danke K.Rola, es ist nicht genau was ich brauche, aber ich sehe daran wie ich es machen muss.
Vielen Dank Joachim
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige