Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
320to324
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
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Inhalte aus Datei -> Eigenschaften

Inhalte aus Datei -> Eigenschaften
10.10.2003 10:41:25
Benjamin Feldmann
Hi all,

gibt es in Excel eine Möglichkeit, die Inhalte, die man unter Datei -> Eigenschaften der Datei zuweist, im Blatt in bestimmte Zellen zu schreiben - ähnlich wie das in Word machbar ist?

Vielen Dank für eure Hilfe...

MfG

Ben

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

Betreff
Datum
Anwender
Anzeige
AW: Inhalte aus Datei -> Eigenschaften
10.10.2003 10:44:40
Hajo_Zi
Hallo Benjamin

lasse folgendes Makro laufen.


Sub Eigenschaften()
Dim Rw As Integer
Dim P
Rw = 1
On Error Resume Next
For Each P In ActiveWorkbook.BuiltinDocumentProperties
Cells(Rw, 1).Value = P.Name
Cells(Rw, 3) = P.Value
Rw = Rw + 1
Next
End Sub


Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Inhalte aus Datei -> Eigenschaften
10.10.2003 10:56:41
Ben
Hallo Hajo,

vielen Dank für die Hilfe.

Eine Frage hätte ich jedoch noch:
Das ganze läuft ja jetzt in einer Schleife und gibt alle Eigenschaften aus.
1. Wie kann ich mir gezielt nur eine Eigenschaft ausgeben lassen?
2. Wie kann ich das dann automatisch (o. das Makro manuell zu starten) in eine bestimmte Zelle schreiben lassen.

Nochmals vielen Dank...

MfG

Ben
AW: Inhalte aus Datei -> Eigenschaften
10.10.2003 10:57:58
Hajo_Zi
Hallo Benjamin

spreche die Eigenschaft entsprecht der Zeile an

Cells(I, 3) = ActiveWorkbook.BuiltinDocumentProperties(I).Value

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Inhalte aus Datei -> Eigenschaften
10.10.2003 11:19:05
Ben
Hallo Hajo,

das einzelne Ausgeben klappt nun...

Wie kann ich jetzt das automatisch (z.B. beim Öffnen) ausführen lassen?

Vielen Dank & Grüße

Ben
AW: Inhalte aus Datei -> Eigenschaften
10.10.2003 11:23:15
Hajo_Zi
Hallo Benjamin

schreibe es unter VBA unter DieseArbeitsmappe unter Private Sub Workbook_Open()

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige