Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
344to348
344to348
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Warum typ nicht verträglich?

Forumthread: Warum typ nicht verträglich?

Warum typ nicht verträglich?
28.11.2003 12:13:03
Micha
Hallo!
Bekomme einen Fehler beim Ausführen bei folgendem Code warum?


Private Sub CommandButton1_Click()
Dim ZuOeffnendeDatei As Variant
Dim isGrafik As Boolean, i As Long
ZuOeffnendeDatei = Application.GetOpenFilename( _
filefilter:="Grafik+Textdateien, *.jpg;*.bmp;*.gif;*.tif;*.cgm;*.pdf;*.doc;*.txt,", MultiSelect:=True)



If ZuOeffnendeDatei = False Then Exit Sub
Workbooks.Open Filename:=ZuOeffnendeDatei




ZuOeffnendeDatei.Open
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Warum typ nicht verträglich?
28.11.2003 12:17:27
GerdW
Bei Multiselect ist der Rückgabewert ein Array, schau dir das mal in der Hilfe an, da
gibts auch ein Beispiel dazu.

Gerd
AW: Warum typ nicht verträglich?
28.11.2003 12:26:23
Micha
Ok! Das geht jetzt! Danke

Aber warum wird das alles in Excel geöffnet?
AW: Warum typ nicht verträglich?
28.11.2003 12:47:51
GerdW
Siehe Antwort auf deinen älteren Beitrag.

Gerd
Anzeige
AW: Warum typ nicht verträglich?
28.11.2003 12:29:03
xXx
Hallo,
du kannst ein .jpg oder so nicht mit der Workbooks.open-Methode öffnen.
Bezieht sich das auf deinen Thread von vorhin?


Private Sub CommandButton1_Click()
Dim ZuOeffnendeDatei As Variant, MyShell as Object
Dim isGrafik As Boolean, i As Long
ZuOeffnendeDatei = Application.GetOpenFilename( _
filefilter:="Grafik+Textdateien, *.jpg;*.bmp;*.gif;*.tif;*.cgm;*.pdf;*.doc;*.txt,", MultiSelect:=True)
If ZuOeffnendeDatei = False Then Exit Sub
ZuOeffnendeDatei = chr(34) &ZuOeffnendeDatei &chr(34)
Set MyShell = CreateObject("WScript.Shell")
MyShell.Run ZuOeffnendeDatei
End Sub

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
Anzeige
AW: Warum typ nicht verträglich?
28.11.2003 12:33:35
Micha
Bei deinem Code Kommt Laufzeitfehler 13. "Typen unverträglich"
AW: Warum typ nicht verträglich?
28.11.2003 12:39:06
xXx
Hallo,
bei mir klappt's einwandfrei. Wo tritt der Fehler auf?

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
Anzeige
AW: Warum typ nicht verträglich?
28.11.2003 12:41:16
Micha
DialogOpen kommt ich wähl eine .txt Datei aus klick auf Öffnen dann kommt der fehler
AW: Warum typ nicht verträglich?
28.11.2003 12:44:22
xXx
Hallo,
mal mit F8 (Einzelschritt) durch den Code gehen. Bei mir läuft exakt der gepostete Code. Auch mit .txt. Dann geht der Editor auf.

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige