wie kann ich die Dateinamen aller geöfneter Exceldateien feststellen und an Variablen übergeben (max. 10 Dateien)
Sub Geoeffnet()
Dim wb As Workbook
For Each wb In Workbooks
MsgBox wb.Name
Next wb
End Sub
Sub test()
Dim NAME1 As String
Dim NAME2 As String
Dim NAME3 As String
Dim i As Byte
Dim wb As Workbook
i = 1
For Each wb In Workbooks
MsgBox wb.NAME
If i = 1 Then
NAME1 = wb.NAME
ElseIf i = 2 Then NAME2 = wb.NAME
ElseIf i = 3 Then NAME3 = wb.NAME
End If
i = i + 1
Next wb
End Sub
Function WBOffen()
Dim wb As Workbook, wn As Window
Dim vis As Boolean
Dim ListeString As String
For Each wb In Workbooks
vis = False
For Each wn In wb.Windows
If wn.Visible Then vis = True: Exit For
Next wn
If vis Then ListeString = ListeString & wb.Name & "\"
Next wb
If Len(ListeString) > 0 Then
ListeString = Left(ListeString, Len(ListeString) - 1)
End If
WBOffen = Split(ListeString, "\")
End Function
Sub test()
Dim liste
Dim i As Integer
liste = WBOffen
If UBound(liste) = -1 Then
MsgBox "Keine Mappen sichtbar!"
End If
For i = 0 To UBound(liste)
MsgBox liste(i)
Next i
End Sub
Problemstellung
Wie kann ich beim VBA-Aufruf des Öffnen-Dialogs die angezeigten Dateien auf Typen, beispielsweise Textdateien, begrenzen?
Problemstellung
Wie kann ich die Dateien des aktuellen Verzeichnisses in einer ListBox einer UserForm auflisten und sortieren lassen?
Problemstellung
Wie kann ich alle Dateien eines anzugebenden Verzeichnisses in einer HTML-Datei auflisten und einen Link zu ihnen erstellen lassen?
Problemstellung
Wie kann ich nach Eingabe eines Grafikdateinamens in Spalte A diese Grafik im Tabellenblatt einfügen lassen?
Problemstellung
Wie kann ich in einer Tabelle eingetragene Dateinamen als Captions in TabStrip-Elemente einlesen? Nach Anklicken eines TabStrip-Elements soll die jeweilige Datei geöffnet werden. Die Dateieigenschaften sollen ausgelesen und angezeigt werden.
Problemstellung
Bei Eingabe eines Dateinamens in Zelle B2 soll die Datei in dem in Zelle B1 genannten Verzeichnis gesucht und geöffnet werden.
Problemstellung
Über die erste Schaltfläche soll eine HTML-Datei mit der Anzeige der in Zelle A1 genannten Grafik erstellt werden, die über die zweite Schaltfläche aufgerufen werden kann.
Problemstellung
Der Datei-Öffnen-Dialog soll mit einem vorgegebenen Dateinamen aufgerufen werden.