Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
18.04.2024 15:16:20
VBA Suchen, Kopieren, Einfügen
18.04.2024 15:16:07
Verschieben von Daten um bestimmte Zeilen nach unten
18.04.2024 15:13:44
Text ans untere Ende der Seite verschieben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
836to840
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Auswahlliste mit Dateien in einem Verzeichnis

Auswahlliste mit Dateien in einem Verzeichnis
18.01.2007 09:34:02
Uwe
Hallo,
folgendes Problem: Möchte in Spalte D eines Dokumentes Dateinamen von PDF Dateien einfügen, die im selben Verzeichnis wie die Excel Datei stehen.
Lösung: Gut wäre eine Auswahlliste die durch Klick auf die entsprechende Zeile den gewünschten Dateinamen einfügt.
Danke für eure Hinweise!
Uwe

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

Betreff
Datum
Anwender
Anzeige
AW: Auswahlliste mit Dateien in einem Verzeichnis
18.01.2007 10:33:36
Case
Hallo Uwe,
schau mal hier vorbei:
http://www.rascd.de/update.html
Der 14. Newsletter dürfte passen.
Servus
Case
Schau Dir mal in der VBA Onlinehilfe das...
18.01.2007 22:43:58
NoNet
...Beispiel zu Application.GetOpenFileName(..) an, damit kannst Du Dateien auswählen und deren Namen speichern (ohne sie zu Öffnen !)
Siehe auch mein Codebeispiel hier : http://spotlight-wissen.de/lisp/pages/messages/amse-1143991222-21816
Wenn Du den Dateinamen in einer Variablen hast, kannst Du die entsprechende Datei einfügen, den Basiscode kannst Du die ja per Makrorekorder einmalig aufzeichnen und den Dateinamen durch die Variable ersetzen.
Hier noch ein Codebeispiel, um MEHRERE Dateien auswählen zu können und die ausgewählten Dateinamen in eine ARRAY-Variable zu speichern :
Sub PDFAuswahl()
    'Liest die ausgewählten Dateinamen in ein ARRAY ein
    Dim Dateiname As Variant, msg, z
    Dateiname = Application.GetOpenFilename( _
          FileFilter:="Alle PDF-Dateien (*.pdf), *.pdf", _
          Title:="Datei auswählen", MultiSelect:=True)
    If TypeName(Dateiname) = "Boolean" Then
        MsgBox "Keine Datei ausgewählt !"
    Else
        'Dateinamen ausgeben :
        msg = "Es wurden folgende Dateien ausgewählt :" & vbLf & vbLf
        For z = 1 To UBound(Dateiname)
            msg = msg & Dateiname(z) & vbLf
        Next
        MsgBox msg
    End If
End Sub

Liebe Grüße,
NoNet
TIP für ALLE : www.exceltreffen.de
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige