Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

  [Excel 2003] Format einer Zelle beibehalten
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
-s!Gm4-
Newbie
Newbie


Anmeldedatum: 13.02.2008
Beiträge: 5

BeitragVerfasst am: 01.07.2008, 17:34 Nach oben

Hallo liebe Leute :)

Diesmal ein problem, hinter welchem ich schon eine ganze Weile sitze und zu dem sich (hoffentlich) eine Lösung findet:

Ich arbeite in letzter Zeit häfig mit Tabellen, in die ich etwas einfüge, viel Text. Dieser Text ist - da er aus dem Netz stammt - imme runterschiedlich formatiert, was Schriftart und -größe angeht.

Ist es möglich, dass wenn ich einer Zelle die Eigenschaften Textfarbe schwarz, Schriftgröße 10 und Schriftart Arial gebe, diese die Formatierung auch beibehält, wenn man andersformatierten Text einfügt, sprich: Dass diese Zelle dem eingefügten Text ihr Format aufzwing und nicht anderherum?

Vielen Dank für die Hilfe und viele Grüße,
sigma
Benutzer-Profile anzeigenPrivate Nachricht senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5509

BeitragVerfasst am: 01.07.2008, 17:41 Nach oben

Hallo!

Über ein SelectionChange-Ereignis müsste das möglich sein:
Rechtsklicke den Tabellenreiter des Blatts und wähle "Code anzeigen".
Füge diesen Code ins Codefenster rechts ein:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target.Font
.Name = "Arial"
.Size = 10
.Bold = False
.Italic = False
.Color = vbBlack
End With
End Sub

_________________

Viele Grüße vom Schatzi

------------------------
Dies ist meine Signatur und sie trägt eigentlich nichts zur Lösung deines Problems bei. Sollte sie es dennoch tun, dann bist du definitiv im falschen Forum...Image
Ein Feedback zum ursprünglichen Problem wäre trotzdem nett!
Windows XP, Office2000, Office2007
Benutzer-Profile anzeigenPrivate Nachricht senden
maxseidel
Besserwisser
Besserwisser


Anmeldedatum: 12.03.2008
Beiträge: 67

BeitragVerfasst am: 01.07.2008, 20:29 Nach oben

Hallo,

ich habe ein ähnliches Problem, nur betrifft dieses nicht das gesamte Tabellenblatt sondern nur die Spalten A bis W von Zeile 2 bis ... (solange etwas in den Zeilen steht).

Wie muss ich diesen VBA-Code umgestalten, dass das bei mir funktioniert.
Ich füge immer etwas aus einer anderen Tabelle ein und mache das über ->Inhalte einfügen -> Werte und trotzdem ändert er mir in der einen Spalte permanent die Formatierung und bringt diese Fehlerraute an der Zelle, wo ich dann immer "In eine Zahl umwandeln" anklicke und dann noch die gesamte Spalte ab Zeile 2 ändere bei -> Format -> Zellen -> Zahl (0 Nachkommastellen) eingeben. Das ist schrecklich. Ich weiß nicht, wie ich das automatisieren kann.

Mein Problem ist eigentlich noch viel größer:

Ich habe 2 Exceldateien. Aus der einen Datei kopiere ich einen Bereich (die Spalten A bis W und ab Zeile 2 bis ... (solange etwas in den Zellen steht) und dann gehe ich in die andere Datei und füge genau diesen Bereich mit wie oben beschrieben mit -> Inhalte einfügen ein. Vorher lösche ich jedoch den Bereich (Spalte A bis W ab Zeile 2 bis ...) des Zielblattes. Die Spalte X in der Zieldatei darf nicht angetastet werden. Da stehen wichtige Formels drinne, die man aber eigentlich auch über ein AutoFill wieder neu machen könnte. Es handelt sich bei der Spalte X des Zielblattes um Folgende Formel: =VERKETTEN($B2;$F2)
Diese wird dann so lange nach unten ab Zeile 2 ausgefüllt, wie in den restl. Zeilen etwas steht. Die Zeile 1 des Zielblattes darf nicht verändert werden (das heißt, nicht von der Tabelle wo die Daten herkommen übernommen werden), da ansonsten meine MS-Query, welche Daten des Zielblattes anfordert, nicht mehr funktioniert. Das Format ist deshalb auch so wichtig, weil sonst diese SQL-Anfragen (MS-Queries) nicht mehr funktionieren.

Kann mir jemand bei meinem Problem helfen? Habe ich mich verständlich ausgedrückt? Wenn nicht, dann bitte sagt mir, was unklar ist.
Ich bin für Hilfe wahnsinnig dankbar. Vielen Dank schon mal im Voraus.

LG
Benutzer-Profile anzeigenPrivate Nachricht senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5509

BeitragVerfasst am: 01.07.2008, 21:30 Nach oben

Hallo!

Um ein Ereignis nur in einem bestimmten Bereich auszuführen, kannst du eine If-Abfrage stezen:

If Not Intersect(DeinBereich, Target) Is Nothing Then
'MachWas
Else
'MachWasAnderes
End If

PS: Die Funktion VERKETTEN kannst du mit dem &-Zeichen abkürzen:
=$B2&$F2

_________________

Viele Grüße vom Schatzi

------------------------
Dies ist meine Signatur und sie trägt eigentlich nichts zur Lösung deines Problems bei. Sollte sie es dennoch tun, dann bist du definitiv im falschen Forum...Image
Ein Feedback zum ursprünglichen Problem wäre trotzdem nett!
Windows XP, Office2000, Office2007
Benutzer-Profile anzeigenPrivate Nachricht senden
-s!Gm4-
Newbie
Newbie


Anmeldedatum: 13.02.2008
Beiträge: 5

BeitragVerfasst am: 02.07.2008, 11:47 Nach oben

schatzi hat Folgendes geschrieben:
Hallo!
Über ein SelectionChange-Ereignis müsste das möglich sein



Hallo Schatzi :)

Deine Lösung funktioniert wunderbar. Ich füge etwas ein, der Text wird erst im texteigenen Format angezeigt. Sobald ich aber nochmal auf die Zelle gehe, wird es dann nach meinen Vorgaben verändert. Dickes Danke hierfür.

Allerdings stehe ich vor einem neuerlichen Problem, ich weiss nicht, ob das hier in Forum mitgehört oder ich besser in das Word-Forum gehen sollte.

Wenn ich nun die Zellen, auf die ich eben diese Lösung angewendet habe per Copy&Paste nach Word einfüge, geht diese Funktion wieder verloren.
[Problem hierbei ist zudem: Ich kann in word keine "Excel-Tabelle" verwenden, weil diese den langen Text, welcher in einer der Zellen eingefügt wird, nicht vollständig anzeigt.]
Gibt es eine Möglichkeit, diese Lösung dann auch in Word beizubehalten?

Der Text soll definitiv unter Word eingefügt werden. Sprich: Ich habe bisher versucht ein gewisses Zellenformat in Excel zu erzeugen [was mir hier mit diesem Thread gelungen ist] , dies per C&P nach Word rüberzubringen und dort unter den o.g. Restriktionen zu nutzen.


Ich werde das am besten erst ins Word-Subforum posten, wenn ich hier ne definitive Absage, also ein "Da weiss ich nicht weiter" erhalten habe.

Vielen Dank für die Hilfe, nochmal, und nochmal im Vorraus :)

Gruß,
sigma
Benutzer-Profile anzeigenPrivate Nachricht senden
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Druck des Kommentars einer Zelle htumm Microsoft Excel Hilfe 2 28.08.2008, 14:04 Letzten Beitrag anzeigen
Keine neuen Beiträge Excel Tabelle aktualisiert sich auf D... Dioxid123 Microsoft Excel Hilfe 4 28.08.2008, 10:43 Letzten Beitrag anzeigen
Keine neuen Beiträge Zelle löschen aber nicht die Formel Paraneuros Microsoft Excel Hilfe 1 27.08.2008, 15:18 Letzten Beitrag anzeigen
Keine neuen Beiträge Word 2003 - Inhaltsverzeichnis - Frag... jean.tigano Microsoft Word Hilfe 0 26.08.2008, 12:52 Letzten Beitrag anzeigen
Keine neuen Beiträge Hilfe beim erstellen einer Importdatei dobby110 Microsoft Excel Hilfe 5 26.08.2008, 12:36 Letzten Beitrag anzeigen


 Gehe zu:   



Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de