Live-Forum - Die aktuellen Beiträge
Datum
Titel
03.12.2023 18:04:26
Dateien in Ordner umbenennen
03.12.2023 18:01:10
Zahlenreihenrätsel- nächste Zeile über Formel ermitteln
03.12.2023 17:20:17
VORPLANUNG Sortierte Übernahme Personendaten von Tab1->Ta
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
988to992
988to992
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateien öffnen

Dateien öffnen
26.06.2008 20:53:34
snore
Hallo Excelprofis,
hab wieder ein Problem und hoffe ihr könnt mir weiterhelfen.
Beschreibung:
ich habe 10 Button auf meiner Userform, in meiner Tabelle stehen in der Spalte B die Pfade meiner Dateien (Excel Word, PDF usw)
nun möchte ich wenn ich z.B. auf den Button 1 klicke die Datei in der zelle B5 geöffnet wird. das ganze natürlich für jeden Button und an der Stelle Bx..
für eure hilfe währe ich sehr dankbar!!!
Gruß
Snore

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

Betreff
Datum
Anwender
Anzeige
AW: Dateien öffnen
26.06.2008 22:04:00
Ramses
Hallo
Dazu das in deine UF kopieren
Declare Function ShellExecute Lib "SHELL32.DLL" _
Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Private Sub Commandbutton1_Click()
ShellExecute 0, "Open", Range("B5"), "", "", 3
End Sub




Private Sub Commandbutton1_Click()
ShellExecute 0, "Open", Range("B6"), "", "", 3
End Sub


usw.
Gruss Rainer

Anzeige
Danke
26.06.2008 22:23:00
snore
Danke Rainer,
das wars

Links zu Excel-Dialogen

CommandButton
UserForm
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige