Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1032to1036
1032to1036
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatische Übernahme von Formaten

Forumthread: Automatische Übernahme von Formaten

Automatische Übernahme von Formaten
21.12.2008 13:55:00
Formaten
Hallo Leute!
Ich suche Eine automatische Übernahme von Formaten aus anderen Tabellenblättern.
Habe zur Vereinfachung eine Datei angehängt.
Vorab schon mal vielen Dank für Hilfe.
Gruß ANJA
https://www.herber.de/bbs/user/57792.xls
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatische Übernahme von Formaten
21.12.2008 14:05:30
Formaten
Halo Anja,
das geht nicht mittels Formel, da muss VBA ran.
Gruß Hajo
AW: Automatische Übernahme von Formaten
21.12.2008 14:31:00
Formaten
Hi
dieses Makro musst du ins Modul der Tabelle S1 kopieren, dann werden beim Eingeben der Vereinsnamen diese in der Tabelle "Gewinne" gesucht und das Format kopiert:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zelle As Range
Set Zelle = Sheets("Gewinne").Cells.Find(what:=Target.Value, lookat:=xlWhole, LookIn:=xlValues)
If Not Zelle Is Nothing Then
Target.Interior.ColorIndex = Zelle.Interior.ColorIndex
Target.Font.ColorIndex = Zelle.Font.ColorIndex
Target.Font.Bold = Zelle.Font.Bold
End If
End Sub


die Formate müssen in der Tabelle "Gewinne" schon alle vollständig definiert sein, eine nachträgliche Änderung hier wirkt sich nicht auf die Tabelle "S1" aus. dazu müsstest du dann den betroffenen Verein nochmal in S1 eingeben, damit das Makro nochmal läuft.
Falls noch weitere Formate übernommen werden sollen, kannst du die nach dem vorgegebenen Schema leicht ergänzen.
Gruß, Daniel

Anzeige
AW: Automatische Übernahme von Formaten
21.12.2008 15:53:42
Formaten
Hallo Daniel,
muss ich dafür ein neues Modul erstellen?
Da ich die Beispieldatei wegen der Größe sehr minimiert habe, habe ich in S1 garkein Makro enthalten.
Glaube, ich mache da einen Denkfehler.
Gruß ANJA
AW: Automatische Übernahme von Formaten
21.12.2008 16:41:00
Formaten
Hi
das ist ein Event-Gesteuertes Makro, dh. es muss in das Modul der Tabelle, für die es gelten soll (das Modul ist immer automatisch vorhanden) und läuft immer ab, wenn in der betroffenen Tabelle eine Zellformel bzw ein fester Wert verändert wird.
Gruß, Daniel
Anzeige
AW: Automatische Übernahme von Formaten
21.12.2008 16:58:00
Formaten
Danke für die Hilfe
Gruß ANJA
;

Forumthreads zu verwandten Themen

Übertragung von bedingten Formatierungen
bedingten

Hallo,
kann mir jemand sagen, wie ich die bedingten Formatierungen eines Arbeitsblattes auf ein anderes Arbeitsblatt übertragen kann? Wenn ich es mit "Format übertragen" versuche, nimmt es mir natürlich auch alle Rahmen usw. mit. Das sollte nicht sein, da die Tabellen alle unterschiedliche...
11.09.2008 17:16:36
Thread-ID: 1009186
2 Beiträge
Formatierung Zelle auf "1 M" statt "1.000"
Chris

Hallo Leute,
Ich habe eine Frage bezüglich einer Zellformatierung.
Ich habe einet Tabelle in der Mengen an Großen Zahlen stehen.
Diese Tabelle würde ich gerne ohne die Werte durch 1000 zu teilen so Formatieren (benutzerdefiniert, das anstatt "1.234.567" nur noch "1.235 M" (gerundet)...
14.11.2008 16:50:09
Thread-ID: 1024652
5 Beiträge
Anzeige
Hilfe Format "-" statt Null ("0")
RALF

Tach xl-Gemeinde,
kann mir bitte jemand sagen, wie xl das Format einzustellen ist, dass ich NUR
- Zahlen, ohne Komma mit Punkt als Tausendertrennung (also #.##0)
- wenn der Wert Null ist, dann soll ein "-" angezeigt werdn
Das Standardformat, das über den Symbolleisteneintrag For...
12.01.2009 15:25:00
Thread-ID: 1038894
5 Beiträge
Excel 2003 vergisst das xlt-Format
Achim

Guten Tag,
über Nacht und ohne mein Zutun ereignete sich seltsames: Excel vergaß das xlt-Format. Gestern noch erzeugte der Aufruf von "TEST.XLT" die Datei "TEST_1.xls", "TEST_2.xls" usw., heute nicht mehr. "TEST.xlt" bleibt "TEST.xlt".
Gleiches ist mir auf meinem Notebook vor einem halb...
20.10.2009 10:48:37
Thread-ID: 1110799
7 Beiträge
Anzeige
Formatierung 01-A-02
UweD

Hallo
Ich übernehme eine Tabelle aus Warenwirtschaftssystem in Excel.
Hierin sind Lagerorte angegeben. Diese verarbeite ich in einem Word Sereienbrief.
Zur besseren Lesbarkeit soll der Text folgendermaßen aufbereitet werden.
Zellwert: 01A02 ist immer 5- Stellig<...
30.06.2010 14:04:00
Thread-ID: 1164701
7 Beiträge
Formatierung 01-A-02
UweD

Hallo
Ich übernehme eine Tabelle aus Warenwirtschaftssystem in Excel.
Hierin sind Lagerorte angegeben. Diese verarbeite ich in einem Word Sereienbrief.
Zur besseren Lesbarkeit soll der Text folgendermaßen aufbereitet werden.
Zellwert: 01A02 ist immer 5- Stellig<...
30.06.2010 13:34:00
Thread-ID: 1164704
2 Beiträge
Bedingte Formatierung aus Excel 2003
Dietmar

Hallo zusammen,
habe ich Excel 200e bedingte Formatierungen verwendet. Wenn ich dieses Datei in Excel 2007 öffne funktionieren dort die bed. Formatierungen erst nachdem ich dann das Tabellenblatt verlassen und wieder geöffnet habe. Ein Excel 2003 funktionierten diese Bedingungen sofort nach...
04.12.2010 10:07:55
Thread-ID: 1189831
2 Beiträge
Excel 2010 Datumsformat
bully

Hallo Excelfreunde,
mit Hilfe von VBA habe ich in meiner "alten" Excel-Version (XP) Daten aus einer anderen Mappe importiert. Darunter auch diverse Datumsspalten. In Excel 2010 werden diese im Standardformat als 15.12.10 dargestellt. Ich muss sie aber als 15.12.2010 dargestellt haben, damit...
15.12.2010 15:58:21
Thread-ID: 1191627
5 Beiträge
Anzeige
VBA" WERT" im Format 08:00 ausgeben
Reinhardt

Hallo,
es steht in:
A1=800
A2=1200
als ein Zeitwert von einer Stempelkarte.
Der Cursor steht in A1.
VBA soll nun A2 minus A1 rechnen und der errechnete Wert soll im Format 08:00 in E1 ausgegeben werden.
WERT = ActiveCell.Offset(0, 1) - ActiveCell
ActiveCell.O...
05.01.2011 14:38:18
Thread-ID: 1194029
2 Beiträge
VBA" WERT" im Format 08:00 ausgeben
Reinhardt

Hallo,
es steht in:
A1=800
A2=1200
als ein Zeitwert von einer Stempelkarte.
Der Cursor steht in A1.
VBA soll nun A2 minus A1 rechnen und der errechnete Wert soll im Format 08:00 in E1 ausgegeben werden.
WERT = ActiveCell.Offset(0, 1) - ActiveCell
ActiveCell.O...
05.01.2011 14:24:12
Thread-ID: 1194032
7 Beiträge
xl2007 verliert bed. Format. aus xl2003
Dietmar

Hallo Zusammen,
ich stehe vor einem Rätsel.
01
Ich habe in Excel 2003 (SP3) eine Mappe mit mehreren Tabellenblättern erstellt, die mit zahlreichen bedingten Formatierungen versehen sind.
Beispielsweise unterlege ich auf einem Blatt jede zweite Zeile in grau mit Hilfe der Formel...
23.01.2011 07:00:14
Thread-ID: 1196754
3 Beiträge
Anzeige
Per VBA Speichern in älterem Format (2003)
Hei.Fisch

Hallo werte Excel-Gemeinde,
ich bitte nochmals um Hilfe: mit dem Code unten öffne ich eine Datei xlsx (Excel 2007), erzeuge neue Dateien mit vereinzelten Daten und möchte diese anschließend im Format Excel 2003 speichern (nicht alle Mitarbeiter haben aktuelle Excel-Versionen). Im Moment wer...
06.06.2011 14:49:05
Thread-ID: 1217426
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige