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

Ein Bild auf allen Tabellen aktualisieren

Forumthread: Ein Bild auf allen Tabellen aktualisieren

Ein Bild auf allen Tabellen aktualisieren
26.10.2004 12:21:09
Robert
Hilfe
Hab folgendes Problem.
Mehrere Tabellen darauf ist ein Bild (Logo) an unterschiedlichen Stellen.
Das Logo möchte ich öfter mal wechseln.
Aber ich möchte nicht überall mit copy Past durchgehen sonder ich möchte das ich das Logo einmal einfüge und alle anderen ändern sich automatisch mit.
Versuch Hyperlink ist fehlgeschlagen.
Bin grad bei dem versuch mit shape rauszufinden wo das Ding ist und dann zu ersetzen durch das Neue.
Bin für jede Hilfe Dankbar.
Robert
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Ein Bild auf allen Tabellen aktualisieren
ransi
hallo robert
versuch doch mal folgendes:
Einfügen-objekt-Aus DAtei. Pfad auswählen und haken bei verknüpfen.
dann hast du die verknüpfung und brauchst immer nur ein neues bild unter dem Pfad speichern. musst vorher allerdings in jeder Tabelle die verknüpfung erstellen.
ransi
AW: Ein Bild auf allen Tabellen aktualisieren
Ulf
Nimm einfach Image oder(Bildanzeige) aus der Toolbox, die kannst du per VBA verknüpfen,
dann musst du nur noch in einem Blatt ein Bild laden.
Ulf
Anzeige
AW: Ein Bild auf allen Tabellen aktualisieren
26.10.2004 13:41:54
Rolf
Hallo Robert,
sofern außer dem zu tauschenden Logo keine
weiteren Shapes in den Tabellenblättern
enthalten sind, kommst du mit diesem Code weiter

Sub bild_tauschen()
Dim oben As Double, links As Double
Dim i As Integer, j As Integer
For i = 1 To Sheets.Count
Sheets(i).Select
If Sheets(i).Shapes.Count > 0 Then
oben = ActiveSheet.Shapes(1).Top
links = ActiveSheet.Shapes(1).Left
ActiveSheet.Shapes(1).Delete
ActiveSheet.Pictures.Insert("C:\Logos\Logo.gif").Select
Selection.Top = oben
Selection.Left = links
End If
Next
End Sub

FG
Rolf
Anzeige
AW: Ein Bild auf allen Tabellen aktualisieren
26.10.2004 17:14:24
Robert
Super Funktioniert
Leider möchte ich auf ein bestimmtes shape zugreifen.
Und weis nicht was ich machen muss um festzustellen ob das shape mit dem namen Logo existiert.
If Sheets(i).Shapes("Logo").Top &gt 0 Then 'Sheets(i).Shapes("Logo").Count &gt 0 Then
ActiveSheet.Shapes("Logo").Select
Wie kann man feststellen das Das Bild /Shape mit dem Namen Logo Existiert?
Danke
Anzeige
AW: Ein Bild auf allen Tabellen aktualisieren
26.10.2004 17:37:02
Rolf
Hallo Robert,
dann mußt du alle Shapes im Tabellenblatt
prüfen, ob das benannte Logo existiert.
In's Unreine etwa so:
on error resume next
...
if activesheet.shapes.count größer 0 then
for each bild in activesheet.shapes
if bild.name= "logo" then
bild.select
etc
end if
next
end if
FG
Rolf
Anzeige

Forumthreads zu verwandten Themen

Pivot Tabelle - VBA
stephan

Hallo
Mittels VBA Code:
Private Sub Workbook_SheetActivate(ByVal Sh As Object) Dim pt As PivotTable For Each pt In Sh.PivotTables pt.RefreshTable Next End Sub
aktualisiert es mir jedemal die Pivot Tabelle in den entsprechenden Worksheets (wenn ich darauf klicke). Kann ich nun ein...
16.09.2008 12:05:27
Thread-ID: 1010044
2 Beiträge
Anzeige
Pivot-Tabellen automatisch aktualisieren
C

Hallo,
ich möchte eine Excel Datei mit mehreren Pivot-Tabellen nachts aktualisieren, damit ich morgens aktuelle Daten vorliegen habe und nicht den Aktualisierungsprozess abwarten muss. Hinter den Pivot-Tabellen liegen Datenbank-Tabellen. Wie bekomme ich das am einfachsten hin?
Vielen D...
28.10.2008 10:27:00
Thread-ID: 1019831
2 Beiträge
Pivot automatisch aktualisieren
Tina

Hallo,
ich möchte ein Pivot Table automatisch aktualisieren lassen. Das Table befindet sich allerdings auf dem gleichen Sheet wie die Daten und da komme ich nicht weiter.
Kann mir jemand einfach, aber effektiv helfen?
30.10.2008 10:47:38
Thread-ID: 1020519
3 Beiträge
Makro zerschießt die Pivottabelle
J.


Hallo zusammen,
ich habe ein Makro programmiert, das Anfangs gut funktionierte.
Und zwar habe ich ein Tabellenblatt erstellt inkl. einer Pivottabelle. Durch Auswahl einer DropandDown-Liste werden automatisch andere Daten gezogen.
Nun habe ich eine Makro geschrieben, bei dem aut...
22.01.2009 16:15:40
Thread-ID: 1042685
7 Beiträge
alle Pivottabellen in Datei aktualisieren
Julia

Hallo hab folgendes Makro
Sub Pivot() ' Pivot Makro ' Makro am 25.02.2009 von mir aufgezeichnet Sheets("Pivot1").Select Range("A8").Select ActiveSheet.PivotTables("PivotTable3").PivotCache.Refresh Sheets("Pivot2").Select Range("A7").Select ActiveSheet.PivotTables("PivotTable4").PivotCach...
26.02.2009 11:08:37
Thread-ID: 1054274
2 Beiträge
Anzeige
Pivot Tabellen aktualisieren
Frank

Hallo zusammen!
In einer Excel-Arbeitsmappe habe ich auf unterschiedlichen Arbeitsblättern Pivot-Tabellen, die sich alle auf den selben Datenberiech beziehen. Nach Änderung von Daten im Datenbereich würde ich gern auf Knopfdruck alle Pivottabellen auf einmal aktualiesieren. Wie ist das mögl...
08.04.2009 15:29:29
Thread-ID: 1067758
3 Beiträge
VBA-Funktion in Pivot-Tabelle
Ziegenpeter

Hallo Zusammen!
Vielleicht kann mir jemand bei folgendem Problem helfen:
Ich habe per VBA eine Funktion namens Sigma() geschrieben. Sie funktioniert problemlos. Nun will ich diese Funktion auch in einer Pivot-Tabelle nutzen, das funktioniert nicht.
Beispiel:
Das einzufügende ber...
10.09.2009 20:19:28
Thread-ID: 1101842
3 Beiträge
Pivottabellen automatisch aktualisieren
martin

Hallo,
Ich aktualisiere bis jetzt meine Pivottabellen über folgenden Code: Private Sub Worksheet_Activate() Dim pt As PivotTable For Each pt In Me.PivotTables pt.RefreshTable Next End Sub
dabei muss ich ja immer das Tabellenbaltt neu aktivieren auch wenn ich bereits in dem Tabellenbla...
05.11.2009 12:41:16
Thread-ID: 1114702
3 Beiträge
Pivottabelle in VBA
David

Hallo an alle.
Ein großes schwarzes Loch meiner VBA-Kenntnisse betrifft Pivottabellen und wie ich gerade wieder erfahren musste, ist der Recorder diesbezüglich nicht zu gebrauchen.
Folgendes Problem:
Ich habe in einer Tabelle eine bestehende Pivottabelle. Diese greift auf eine ander...
02.12.2009 17:02:21
Thread-ID: 1121448
3 Beiträge
PivotTabellen und VBA...
Jonathan

Hallo zusammen!
Ich möchte gerne ein paar Funktionen meiner PivotTabelle per VBA vereinfachen. Dazu habe ich folgenden Code geschrieben, welcher
1. prüft, ob der Wert der ausgewählten Zelle auch in der Liste der möglichen Kategorien vorkommt; ist dies der Fall:
2. ausblenden aller K...
18.01.2010 15:17:17
Thread-ID: 1130707
8 Beiträge
mittels VBA Daten aktualisieren
rayban

Hallo!
Ich habe eine Liste mit Namen (Spalte A: Vorname, Spalte B: Nachnamen) in einem Fileshare-Ordner gespeichert. Diese Liste wird in weiterer Folge regelmäßig aktualisiert.
In einer einer lokalen Exceldatei sollten die Daten aus der Liste in die Spalten F und G ab Zeile 10 eingefüg...
25.02.2010 08:47:33
Thread-ID: 1141234
2 Beiträge
Daten PivotTabellen, Filter aktualisieren
Jonathan

Hallo zusammen!
In den Filtern meiner PivotTabellen und der "normalen" Tabellenfiltern haben sich im Laufe der Zeit viele Werte angesammelt, die in meinen Tabellen nicht mehr existieren. Ist es irgendwie möglich, diese zu löschen?
Danke Euch!
LG
03.04.2010 12:59:42
Thread-ID: 1150086
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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