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

VBA - Dateien Auswählen Menü von Windows

Forumthread: VBA - Dateien Auswählen Menü von Windows

VBA - Dateien Auswählen Menü von Windows
28.06.2018 12:44:20
Windows
Hallo
Meine Frage:
Ich arbeite zwar nicht mit Excel (sondern mit SolidWorks) aber jetzt bräuchte ich eine "Datei auswählen" Form um mehrere Dateien gleichzeit auszuwählen und dann sollen die Pfade der Dateien in einem Array abgelegt werden. Weis jemand zufällig eine schon fertige Form und mit welchen Bibliotheken wird diese eingebunden? die Dateiendungen sind z.B. .sldprt .sldasm
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Dateien Auswählen Menü von Windows
28.06.2018 12:58:46
Windows
Hallo,
z.B. 
Sub aaa()
Dim varr(), i
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = True
If .Show = -1 Then
ReDim varr(1 To .SelectedItems.Count)
For i = 1 To .SelectedItems.Count
varr(i) = .SelectedItems(i)
Next
End If
End With
End Sub

Gruß
Rudi
Anzeige
AW: VBA - Dateien Auswählen Menü von Windows
28.06.2018 13:42:09
Windows
Hallo,
Mir wird dieser Fehler angezeigt, was muss ich importieren damit ich den Code ausführen kann?
Userbild
welche Version hast du? owT
28.06.2018 14:12:05
Rudi
welche Version hast du? owT
28.06.2018 14:12:06
Rudi
Anzeige
AW: welche Version hast du? owT
28.06.2018 14:26:15
fabian
Hallo im Excel VBA funktioniert es aber hab ja den SolidWorks VBA, dort habe ich:
Public xlapp As Excel.Application
Set xlapp = New Excel.Application
Private Sub Auswählen_Click()
Dim varr(), i
With xlapp.FileDialog(msofiledialogtype)
.AllowMultiSelect = True
If .Show = -1 Then
ReDim varr(1 To .SelectedItems.Count)
For i = 1 To .SelectedItems.Count
varr(i) = .SelectedItems(i)
Next
End If
End With
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

VBA 5 Dateien auswählen, umbennen und speichern
D.Hensel

Hallo, habe ein Problem mit folgendem Makro. Erhalte einen Debug Fehler bei " wb5.Sheets(1).copy Before:=wb1.Sheets(1)" Wenn ich Before und after lösche, dann gehts. Dann öffnet er aber mehrere Dateien. Ziel des Makros ist das man 5 Dateien auswählt, das Makro diese öffnet und im selben Work...
25.08.2014 14:02:09
Thread-ID: 1378050
3 Beiträge
Label click Windows Explorer öffnen
Noureddine

Hallo zusammen,
ich habe folgendes Problem:
Ich habe ein Formular erstellt mit einem Label. Ich möchte gerne, sobald ich das Label anklicke, das der Windows Explorer sich öffnet, jedoch möchte ich auch bestimmen welches Verzeichnis sich als Startbildschrim öffnet.
Kann mir hier jema...
28.09.2015 16:47:06
Thread-ID: 1449798
5 Beiträge
Datei im IE 11 Explorer mit VBA öffnen
Bernd

Hallo Forum,
ich möchte im Internet Explorer 11 im Fenster "Downloads anzeigen und nachverfolgen" den Button "Öffnen" mit VBA ansprechen, um eine heruntergeladene Datei zu öffnen.
Wie geht das?
Meine bisherige Suche im Internet war erfolglos...
03.02.2017 12:52:11
Thread-ID: 1539223
5 Beiträge
VBA Unterordner Tabelle öffnen
Mia

Hi,
For Each myfolder In folder.SubFolders
MsgBox (myfolder.Name)
If myfolder.Name Like "Ordner*" Then
fso.OpenTextFile (myfolder)
End If
Next
alles was dick markiert ist funktioniert ich möchte aber im letzten Schritt die Excel file im Ordner öffnen und in dieser ei...
02.03.2018 14:02:05
Thread-ID: 1611964
3 Beiträge
VBA Ordner suchen und öffnen
Dominic

Moin,
Ich habe in einer Excel Tabelle Projektnummern und jedes Projekt hat einen Ordner auf dem Server, kann ich mittels VBA im Ordner auf dem Server Projekte (wo die Unterordner der Projekte drin sind) den Ordner des Projekts mittels der Projektnummer finden? Der name der Projektordner ist...
22.11.2018 16:53:06
Thread-ID: 1658997
2 Beiträge
VBA Unterordner öffnen nur Teilstring bekannt
difi

Hallo Zusammen,
wie kann ich per VBA einen Unterordner öffnen bei dem nur ein Teilstring bekannt ist.
bsp.
D:/Test/
Unterordner (XXX abcd XXXXXX)
Der Teilstring [bsp. "abcd"] ist Variabel und steht in einer Zelle A2
Wie kann ich das an Shell "Explorer.exe /e übergeben...
21.03.2019 12:09:38
Thread-ID: 1682533
6 Beiträge
vba - explorerfenster für Profies
Heiko
Hallo erst mal,
hallo Profies.
Ich möchte meine Daten CD's archivieren.
Wie kann ich die cd struktur (Tree) über VBA speichern, so dass sie wie im
exlorer mit + bzw - gespeichert wir und ich die unterverzeichnisse durchklicken kann.
keine textdatei.
für eine Lösung wäre ich dankb...
04.05.2004 23:24:09
Thread-ID: 424278
4 Beiträge
VBA Ordner per Schleife öffnen
Excel

Hallo zusammen,
Ich habe einen Ordner auf dem Desktop (Projekt). In diesem befinden sich mehrere Unterordner. Diese besitzen widerum jeweils 2 bis 3 weitere Unterordner, in welchen sich widerum PDF Dateien befinden.
Wie schaffe ich es die PDFs zu auszuschneiden und eine Ebene höher einz...
09.12.2020 10:57:53
Thread-ID: 1798551
4 Beiträge
VBA Ordner per Schleife öffnen
Excel

Hallo zusammen,
ich hatte schon einmal einen Beitrag in diesem Forum gepostet und sehr gute Hilfe bekommen (shoutout an NEpumuk an dieser Stelle).
Hier mal meine alte Anfrage:
"Ich habe einen Ordner auf dem Desktop (Projekt). In diesem befinden sich mehrere Unterordner. Diese besit...
17.12.2020 13:07:24
Thread-ID: 1800281
2 Beiträge
ZIP im Windows Explorer öffnen
Waldi

Auf einem Linux-Debian-Host nutze ich über Oracle VirtualBox in einer VM (ohne Internet-Anbindung) Office 2013 unter Windows 7 Home Premium. Seit dem Oracle-Update von 6.0 auf 6.1 stürzt Office 2013 immer wieder ab, weshalb ich in einer weiteren VM unter Windows 7 Home Pr. mein altes Office 200...
09.04.2021 17:54:25
Thread-ID: 1825119
15 Beiträge
ZIP im Windows Explorer öffnen
Waldi

Auf einem Linux-Debian-Host nutze ich über Oracle VirtualBox in einer VM (ohne Internet-Anbindung) Office 2013 unter Windows 7 Home Premium. Seit dem Oracle-Update von 6.0 auf 6.1 stürzt Office 2013 immer wieder ab, weshalb ich in einer weiteren VM unter Windows 7 Home Pr. mein altes Office 200...
09.04.2021 17:55:55
Thread-ID: 1825120
2 Beiträge
Anzeige
Zellübertragung per "Datei öffnen" Dialog
Sebastian

Hallo zusammen,
folgendes Szenario:
Excel 2000
Ich habe die Excel Datei "C:\Fillmeup.xls" in die verschiedene Zellen aus der Excel Datei "C:\Quelle.xls" importiert werden sollen. Diese Zellen sollen einfach auf dem Tabellenblatt "Tabelle_Fillmeup" in die Spalte H eingetragen werden....
16.07.2009 09:17:26
Thread-ID: 1088930
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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