Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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
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
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige