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

Dialogfeld "Öffnen"

Forumthread: Dialogfeld "Öffnen"

Dialogfeld "Öffnen"
25.10.2005 20:23:47
flyingsunbird
Hallo zusammen
Ich möchte, dass der Benutzer über ein Dialogfeld Ordner auswählen kann
(nicht Dateien) und mir der Pfad als "String" zurrückgegeben wird.
Gibt es ein Standartdialogfeld für Ordner wie "GetOpenFilename" für Dateien?
Gruss Katharina
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Dialogfeld "Öffnen"
ransi
hallo
versuchs mal so:
Option Explicit

Sub UseFileDialogOpen()
With Application.FileDialog(msoFileDialogFolderPicker)
.Show
MsgBox .SelectedItems(1)
End With
End Sub

ransi
AW: Dialogfeld "Öffnen"
25.10.2005 20:50:23
Fred
''Autor: K.Rola

Sub test_ordner
MsgBox GetOrdner("C:\")
End Sub



Function GetOrdner(Optional ByVal def = "")
Dim objShell As Object, objfolder As Object
Set objShell = CreateObject("Shell.Application")
Set objfolder = objShell.BrowseForFolder(0, "Bitte einen Ordner wählen", 0, def)
If objfolder Is Nothing Then End
GetOrdner = objfolder.Self.Path
End Function

mfg Fred
Anzeige
Dialogfeld "Öffnen"
25.10.2005 21:09:39
flyingsunbird
Danke für die schnelle Antwort.
Fred : Habe es gleich ausprobiert.Leider bricht Programm beim Befehl Set....
ohne Fehlermeldung ab.
Ransi: Danke, klappt
Gross Katharina
AW: Dialogfeld "Öffnen"
26.10.2005 00:12:42
Fred
Hi,
dann hast du nicht alles kopiert, der Code läuft sauber.
mfg Fred
@Fred
ransi
hallo fred
"...der Code läuft sauber."
Stimmt.
Weisst du wo es zu shell.application eine deutschsprachige hilfedatei gibt?

ransi
Anzeige
AW: @Fred
26.10.2005 01:04:18
Fred
Hi,
Null Ahnung, aber ich komme mithilfe des Objektkatalogs und des Lokalfensters auch
ohne klar.
mfg Fred

Forumthreads zu verwandten Themen

Auf Knopfdruck neue Zeile in Zelle....
Unwissender
Hallo zusammen,
habe eine VBA-Excel mit dem Rekorder erstellt.
Es handelt sich um eine ToDo-Liste, in der ich immer in einer Zelle in einer Art "Tagebuch" neue Informationen hinzufüge.
So soll es im Idealfall aussehen:
Mit einem Knopfdruck soll in einer ausgewählten Zelle, in der sch...
14.06.2022 16:00:20
Thread-ID: 1887238
3 Beiträge
Anzeige
Auf Knopfdruck neue Zeile in einer Zelle
Unwissender
Hallo zusammen,
(vorab: es gab von mir schon mal eine Anfrage diesbezüglich:
https://www.herber.de/forum/archiv/1884to1888/1887238_Auf_Knopfdruck_neue_Zeile_in_Zelle.html
Aber ich habe noch einen Änderungswunsch in Fett:
Hier nochmals die Anforderung mit der Neuerung in Fett:
ha...
24.10.2022 17:41:29
Thread-ID: 1904158
2 Beiträge
Zeilenumbruch
Emini

Hallo Room,
Ich habe eine Frage, und zwar möchte ich XML-Datei in Excel-Tabelle übertragen. Jedesmal, wenn neue XML-Datei übertragen wird, soll eine leere Zeile erzeugt werden, dann kommt die neue Datei. Natürlich kann man per Hand mit "neue Zeile einfügen" machen, aber es ist zu umständlic...
23.04.2004 21:52:36
Thread-ID: 418575
1 Beitrag
Zeilenumbrüche in zellen finden
Jörg

Hallo,
ich erstelle über VBA aus einer Tabelle verschiedene Texte, die ich als Angebot nutze. Je nach Eingabe in der Tabelle können dabei Angebotspositionen mit einer Größe von nur einer Zeile aber auch solche mit 20 Zeilen und mehr in einer Zelle werden.
Es gibt immer wieder Probleme,...
22.09.2015 15:22:55
Thread-ID: 1448645
5 Beiträge
Problem bei mehreren VBA´s auf einer Zelle
Markus
Hallo Excel Experten,

ich arbeite in zwei Tabellbereichen. In Tab1 sind Eingabezellen, in die ein "x" vorgegeben werden kann. Dieses "x" sorgt dafür, dass in Tab2 ausgeblendete Zeilen eingeblendet werden. Das ganze funktioniert mit VBA:

Private Sub Worksheet_Change(ByVal Target As...
02.10.2003 22:49:41
Thread-ID: 318518
12 Beiträge
Anzeige
@Oberschlumpf: Zeilen im VBA-Code und Modul ausles
ChrisSp

Hi Thorsten,
du hattest vor knapp nem Monat mal was zum Thema Zeilen auslesen bei einem unbekannten Fehler geposten. Ich hatte ja ein bisschen was rumgemäckelt und dir versprochen meine Ideen einzubauen und mich zu melden.
Nun ja - hiermit will ich dies dann auch endlich mal tun.
Er...
13.04.2005 11:47:03
Thread-ID: 598094
2 Beiträge
Excel VBA: Problem mit Hierarchie in Makro
Ronald
Hallo zusammen,

ich brauche eure Hilfe. Eine KI hat dieses Makro für mich geschrieben und es funktioniert grundsätzlich sehr gut. Es gibt nur einen Fehler bei der Behandlung der Hierarchie:

Die oberste Hierarchie (z. B. 1-4-1) soll in Spalte O gesucht werden.

Wird der Begr...
09.11.2025 18:16:24
Thread-ID: 2020781
22 Beiträge
Export Excel > Word
Frau_Kuchen

Ich habe folgende Aufgabenstellung:
1) einige Excel-Dokumente mit Pivot-Daten und Diagrammen
2) Daten und Diagramme werden aktualisiert (von zentraler Exceldatei aus, die die einzelnen Mappen öffnet, bearbeitet und dann wieder schliesst)
2a) Pivotdaten werden ausgewertet und zu meh...
04.01.2008 16:17:29
Thread-ID: 938784
2 Beiträge
Anzeige
Zeilenumbruch erzeugt neue Zeile
Toastie

Hallo zusammen,
als fast Ahnungsloser in Sachen VBA brauche ich eure Hilfe. Ich habe folgende Problemstellung:
In einem Tabellenblatt t1 befindet sich eine Tabelle. Diese soll zeilenweise in ein neues Tabellenblatt t2 kopiert werden. Dabei soll jedoch für jeden Zeilenumbruch in der 6. S...
25.10.2016 15:21:24
Thread-ID: 1521569
4 Beiträge
Daten über mehrere Tab. sortieren
Peter

Hallo und schönen guten Abend zusammen,
ich habe mal eine Frage an die Experten. Besteht die Möglichkeit mittels VBA über mehrere Tabellen zu sortieren und die sortierten Daten in ein neue Tabelle zu kopieren?
Ich habe bis jetzt 2 Tabellen, 2007 und 2008. In jeder Tabelle stehen ca 1150...
22.04.2008 20:45:30
Thread-ID: 971332
8 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum