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

Bild per Makro in Kopfzeile einfügen

Forumthread: Bild per Makro in Kopfzeile einfügen

Bild per Makro in Kopfzeile einfügen
19.02.2005 16:56:41
Peter
Hallo,
kann ich mit einem Makro ein Bild in die Kopfzeile einer Tabelle einfügen, ähnlich dem Einsetzen eines Textes:
ActiveSheet.PageSetup.LeftHeader = "text"
Also etwa so:
'ActiveSheet.PageSetup.RightHeader = C:\Bilder\bild.jpg
(So geht's nicht, habe ich schon probiert, aber vielleicht so änhlich...?!? Ich hoffe, mein Anliegen wird klar.)
Eine Verbesserung wäre es dann noch, wenn ich die Pfadangabe irgendwo in der Tabelle, und nicht im Makro machen könnte...
Vielen Dank!!!
Peter
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Bild per Makro in Kopfzeile einfügen
Ramses
Hallo
schon mal den Makrorekorder zu Rate gezogen ?
Dann sparst du dir nämlich das probieren ;-)
Gruss Rainer
AW: Bild per Makro in Kopfzeile einfügen
K.Rola
Hallo,
der Pfad der Garfik steht in Zelle A1:

Sub Grafik_in_footer()
With ActiveSheet.PageSetup
.CenterFooterPicture.Filename = [a1]
.CenterFooter = "&G"
End With
End Sub

Gruß K.Rola
Anzeige

Forumthreads zu verwandten Themen

Grafik in Kopfzeile
Gordon

Moin moin,
wie ich inzwischen erfahren habe, kann man bei Excel 2000 keine Grafiken in der Kopfzeile einfügen. Dieses soll erst ab Excel 2003 gehen.
Daher mal zwei Fragen:
1.
Wenn ich nun per Excel 2003 eine Datei erstelle, wo halt die Kopfzeile eine Grafik enthält, und diese d...
24.02.2009 10:18:10
Thread-ID: 1053380
9 Beiträge
Problem: Grafik in die Kopfzeile einbinden
Gordon

Moin moin,
ich arbeite derzeit mit Excel 2000 und schreibe an einer Datei, aus der später eine neue Datei generiert wird. Die neue Datei soll in der linken Zeil der Kopfzeile ein Logo (logo.jpg) enthalten.
Ich weiß, dass wenn man das Makro zur Generierung unter Excel 2000 ausführt, das...
04.03.2009 21:03:12
Thread-ID: 1056580
3 Beiträge
Anzeige
Grafik in Kopfzeile gelöscht; wie wieder einfügen?
abdipost

Hallo zusammen,
habe aus einem Tabellenblatt in einer Excel-Mappe die Grafik aus der Kopfzeile gelöscht.
Die Grafik habe ich nicht als Datei vorliegen.
Wie bekomme ich die wieder rein?
In den anderen Tabellenblättern ist sie noch enthalten.
Danke für Eure Hilfe
16.06.2009 15:36:17
Thread-ID: 1081936
9 Beiträge
Bilder per Makro in Excel einfügen
stefanseevetal

Hallo zusammen!
Ich habe ein Problem, das ich mir nicht erklären kann. Ich füge nach einer Auswahl über den untenstehenden Code ein Bild im Tabellenblatt "Deckblatt" ein. Es soll gemäß dem Code oben links eingefügt werden. Leider funktioniert dies bei einigen Computern nicht und das Bild wi...
27.10.2009 19:27:47
Thread-ID: 1112579
4 Beiträge
Bild in Zellverbund einfügen
Markus

Hallo,
füge ich ein Bild (Einfügen Graphik) in einen Zellverbund (verbunde Zellen von A3 bis R13 ein,
so wird das Bild zwar eingefügt ....
aber die Grösse passt sich nicht dem Zellverbund an (Bild meistens zu gross);
es wird zudem nicht eingemittet (der Zellverbund wurde vorher...
29.10.2009 16:19:45
Thread-ID: 1113103
4 Beiträge
Bilder in Zelle einfügen wenn
Andre´

Hallo alle zusammen,
ich möchte für den Bereich C5:F10 Bilder einfügen (jeweils mittig in Zelle), in Abhängigkeit des Zellwertes.
Ist der Zellwert = 1 dann Bild1 von Tabelle "Bilder" einfügen
Ist der Zellwert = 2 dann Bild2 von Tabelle "Bilder" einfügen
Ist der Zellwert = 3 dann...
15.12.2009 09:51:03
Thread-ID: 1123961
5 Beiträge
Bild von der userform in tabelle einfügen
der

Hallo Excelsfans,
ich habe auf einer userform ein bild (image). dieses möchte ich gern als bild in eine zelle einfügen
irgendwie so
cells(1,1).insert.picture=image1.picture
geht sowas?
gruß rocky
14.06.2010 19:14:52
Thread-ID: 1161836
3 Beiträge
Anzeige
Bild in Zelle einfügen.
Ernst

Hallo Exel Profis !
Ich würde mal wieder eure Hilfe benötigen.
Ich bräuchte ein makro das mir folgendes erfüllt, per Doppelklick in Zelle. g3 sollte sich der ordner C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Bilder öffnen .Danach möchte ich mir ein bild auswählen können das si...
24.11.2010 12:48:35
Thread-ID: 1188515
4 Beiträge
Bilder in Zelle einfügen
Armin

Hallo,
ich füge mit folgendem Code Bilder aus einem Verzeichnis in Excel-Zellen untereinander ein:
Set pct = ActiveSheet.Pictures.Insert(strVerzeichnis & "\" & strDatei)
Wenn ich die Bilder z. B. 100 Stück aus einem Verzeichnis mit je 2 MB einfüge, wird die Excel-Datei zieml...
27.04.2011 00:19:02
Thread-ID: 1211877
3 Beiträge
Grafik in Kopfzeile
Jörg Böke

Hallo zusammen,ich habe ein Problem mit einer Grafik in der Kopfzeile.
Diese grafik ist ein Firmenlogo und soll immer auf eine Seite DinA4 optimiert sein.Das Problem ist, wenn ich z.B bei vielen Spalten die Seite auf eine Seite anpasse ( dynamisch ) wird auch mein Logo kleiner.
Das Logo s...
23.05.2002 16:04:58
Thread-ID: 123190
2 Beiträge
Anzeige
Bild aus Userform in bestimmte Zeile einfügen
David

Moin Moin,
ich komme mal wieder nicht weiter... :-(
Vor kurzer Zeit habe ich das Problem gehabt, dass ich gerne Bilder in einer Userform anzeigen lassen wollte.
Nun soll im nächsten Schritt dieses Bild, welches mir in einem Image in der Userform angezeigt wird auch gleichzeitig in T...
07.06.2011 09:45:23
Thread-ID: 1217519
7 Beiträge
Hintergrundbild in alle Tabellen einfügen
Hans

Hallo liebe Experten.
Ich stehe mal wieder vor einem Problem.
Und zwar habe ich eine Excel Datei mit mehreren Tabellenblättern.
Nun möchte ich in jedem Tabellenblatt ein Hintergrundbild haben.
Dies habe ich über Format/Blatt/Hintergrund auch hinbekommen.
Ich würde jedoch ger...
14.06.2011 10:53:57
Thread-ID: 1218349
6 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Bild per Makro in Kopfzeile einfügen

Schritt-für-Schritt-Anleitung

Um ein Bild in die Kopfzeile einer Excel-Tabelle einzufügen, kannst Du ein einfaches Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Einfügen eines neuen Moduls:

    • Klicke auf Einfügen > Modul.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub Bild_in_Kopfzeile_einfuegen()
   Dim BildPfad As String
   BildPfad = ThisWorkbook.Sheets("Tabelle1").Range("A1").Value ' Pfad in Zelle A1

   With ActiveSheet.PageSetup
       .CenterHeaderPicture.Filename = BildPfad
       .CenterHeader = "&G"
   End With
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Gib den Bildpfad in die Zelle A1 ein.

  6. Führe das Makro aus:

    • Drücke ALT + F8, wähle Bild_in_Kopfzeile_einfuegen aus und klicke auf Ausführen.

Jetzt solltest Du das Bild in der Kopfzeile Deiner Tabelle sehen!

Häufige Fehler und Lösungen

  • Problem: Das Bild wird nicht angezeigt.

    • Lösung: Stelle sicher, dass der Pfad in Zelle A1 korrekt ist und das Bild tatsächlich dort gespeichert ist.

  • Problem: Das Makro funktioniert nicht.

    • Lösung: Überprüfe, ob das Makro aktiviert ist und ob Du in der richtigen Tabelle arbeitest.

  • Problem: Bild wird in der Kopfzeile nicht zentriert.

    • Lösung: Stelle sicher, dass Du .CenterHeader verwendest. Alternativ kannst Du .LeftHeader oder .RightHeader verwenden, um das Bild an einer anderen Stelle zu platzieren.

Alternative Methoden

Es gibt auch andere Möglichkeiten, ein Bild in die Kopfzeile einzufügen:

  • Manuelles Einfügen: Du kannst das Bild manuell in die Kopfzeile einfügen, indem Du:

    1. Auf Einfügen > Kopf- und Fußzeile gehst.
    2. Kopfzeile auswählst und dann auf Bild klickst, um das Bild auszuwählen.

  • Verwendung des Makrorekorders: Du kannst den Makrorekorder aktivieren, um die Schritte zum Einfügen eines Bildes aufzuzeichnen und den generierten Code später anzupassen.

Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du ein Bild in die Kopfzeile einfügen kannst:

  1. Beispiel mit lokalem Pfad: Wenn Du den Pfad C:\Bilder\MeinBild.jpg in Zelle A1 hast, wird das Bild automatisch in die Kopfzeile eingefügt, wenn Du das Makro ausführst.

  2. Beispiel mit dynamischem Pfad: Du kannst den Bildpfad auch in einer anderen Zelle, wie B1 oder C1, speichern und den VBA-Code entsprechend anpassen:

    BildPfad = ThisWorkbook.Sheets("Tabelle1").Range("B1").Value

Tipps für Profis

  • Verwende absolute Pfade, um sicherzustellen, dass das Bild immer gefunden wird, unabhängig davon, wo die Datei geöffnet wird.
  • Optimiere die Bildgröße vor dem Einfügen, da zu große Bilder die Druckqualität beeinträchtigen können.
  • Teste Dein Makro regelmäßig, um sicherzustellen, dass es in verschiedenen Excel-Versionen funktioniert.

FAQ: Häufige Fragen

1. Kann ich auch mehrere Bilder in die Kopfzeile einfügen?
Nein, Du kannst nur ein Bild pro Kopfzeile einfügen. Du kannst jedoch das Bild ändern, indem Du den Pfad in der Zelle änderst und das Makro erneut ausführst.

2. Funktioniert das auch in Word?
Ja, ähnliche Ansätze können verwendet werden, um ein Bild in die Kopfzeile in Word einzufügen, jedoch ist der VBA-Code unterschiedlich.

Beliebteste Forumthreads (12 Monate)

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