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

Excel VBA - Verzeichnis voreinstellen

Forumthread: Excel VBA - Verzeichnis voreinstellen

Excel VBA - Verzeichnis voreinstellen
31.03.2008 13:37:12
Dietmar
Hallo,
ich möchte mit einem VBA Modul Anwendern ermöglichen,
aus einem vordefinierten Verzeichnis (externer Server) eine Textdatei auszuwählen und den Inhalt dieser Textdatei in ein Arbeitsblatt in einem definierten Bereich zu importieren.
Wäre nett, einen passenden Hinweis zu bekommen.

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel VBA - Verzeichnis voreinstellen
31.03.2008 13:45:00
ede
Hallo Dietmar,
zwar schon oft hier im Forum Beispiele abgestellt, aber hier nochmal ein einfaches Beispiel:

Private Sub Text_Import()
Dim i As Integer
'StartVerzeichnis - bitte anpassen
ChDrive "c:\"
ChDir "\temp"
'Dialogfenster Öffnen
sFile = Application.GetOpenFilename _
("alle Dateien (*.*), *.*")
If sFile  False Then
Close
Open sFile For Input As #1
i = 1
Do While Not EOF(1)
Line Input #1, strTxt
Cells(i, 1).Value = strTxt
i = i + 1
Loop
Close
End If
End Sub


gruss

Anzeige
AW: Excel VBA - Verzeichnis voreinstellen
31.03.2008 13:48:00
dirk
Hallo!
Hier mal ein Ansatz

Sub OeffnenDialogAufrufen()
Dim StartVerzeichnis As String
StartVerzeichnis = "D:\My documents\appdata\"
Application.Dialogs(xlDialogOpen).Show StartVerzeichnis
End Sub


Dirk

AW: Excel VBA - Verzeichnis voreinstellen
31.03.2008 13:58:00
Dietmar
Danke, das klappt mit einen festen Laufwerksbuchstaben prima.
Kennst Du auch die Lösung für eine relative Pfadangabe?
Beispiel:
\\g2008iaa04\g2008iaa04$\Server_A$\test\

Anzeige
AW: Excel VBA - Verzeichnis voreinstellen
31.03.2008 13:52:00
Beverly
Hi Dietmar,
und noch eine dritte Möglichkeit

Sub oeffnen_verzeichnis()
ChDrive ("C:\")
ChDir ("C:\Test")
Application.FindFile
End Sub



Forumthreads zu verwandten Themen

Gültigkeitsprüfung per VBA
Paulo

Hallo Freunde,
Ich benutze folgenden code um in 2 Spalten die Eingabe auf Ihre Gültigkeit zu prüfen. Hatte vorher die Normale Gültigkeitsprüfung war aber mit dem Scrollen nicht so die Sache. Habe es dann in VBA versucht,
Jetzt ist das Scrollen wunderbar nur bei Eingabe dauert es eine Ew...
19.10.2011 15:09:24
Thread-ID: 1234512
3 Beiträge
VBA Probleme beim Umstieg 2003 auf 2007 Teil 2
Matthias

Hallo Profis
Ich habe in Excel2003 Zellen über bedingtes Formatieren farbig markiert
Hellgelb wenn eine Zelle zu bearbeiten ist
Rot wenn ein Fehler beim ausfüllen gemacht wurde.
Beim generieren des Inhaltsverzeichnis habe ich nach diesen Bedingten Farbformaten gesucht und diese...
23.06.2014 15:59:32
Thread-ID: 1367035
1 Beitrag
Tabelle mit Makro kopieren
Elia
Liebe Excel-Anwender,
ich bin absolut kein Vba Mensch und wende mich deshalb an euch.

Momentan hab ich ein Projekt mit einem Planungstool das mit Excel arbeitet.

In diesem Tool wird mit Buttons gearbeitet, diese Buttons sind in einer Tabelle hinterlegt. Diese Buttons sind in e...
14.04.2023 13:58:12
Thread-ID: 1927545
3 Beiträge
VBA Postmessage ignoriert Shift
W.Stecher
Hallo zusammen,

ich bitte zunächst um Entschuldigung für den neuen Beitrag, aber mein letzte Woche eröffneter Beitrag unter dem gleichen Titel scheint ins Archiv 2020to2024 verschoben worden zu sein!?!? Es ging darum, dass ich beim Aufruf der Remotedesktopverbindung per VBA das Passwort ins...
03.02.2026 14:55:23
Thread-ID: 2023916
1 Beitrag
VBA Code
Heinz
Was mache ich nur falsch
Hab einen VBA Code bekommen und möchte ihn ausprobieren, wenn ich aber auf "Ausführen und "Kompilieren" gehe kommt die Meldung "Fehler beim Kompilieren Syntaxfehler"
Attribute VB_Name = "modHolidays"
Option Explicit
' *** Den Artikel zu diesem Modul finden Si...
27.01.2005 19:58:04
Thread-ID: 556195
14 Beiträge
VBA-Prozedur zu groß
Nicolai

Hallo zusammen,
ich habe gerade mein Marko erweitert und dann kamm die Fehlermeldung das die Prozedur zu groß ist.
Ich habe es bereits mit Call Prozedur1... versucht. es hat zwar den Code durchlaufen lassen, allerdings hat er ihn nicht ausgeführt.
Hier der Code:

Private Su...
08.10.2014 14:08:51
Thread-ID: 1385565
5 Beiträge
VBA Code Werte Copy nach Abfragen
Steven

Hallo Ihr Experten,
Kann mir jemand den Code (läuft OK) nur vereinfachen/kürzen?
Es wird eine pdf-Datei erzeugt und gleichzeitig je nach 2 Abfragen auf unterschiedliche Bereiche Werte kopiert.
Vielen Dank schon mal für Eure Ideen...
Sub aktivesBlattToPdf() Dim Quelle As Workshee...
12.05.2018 17:59:25
Thread-ID: 1623740
21 Beiträge
VBA Code Werte Copy nach Abfragen
Steven

Hallo Ihr Experten,
Kann mir jemand den Code (läuft OK) nur vereinfachen/kürzen?
Es wird eine pdf-Datei erzeugt und gleichzeitig je nach 2 Abfragen auf unterschiedliche Bereiche Werte kopiert.
Vielen Dank schon mal für Eure Ideen...
Sub aktivesBlattToPdf() Dim Quelle As Workshee...
12.05.2018 17:59:25
Thread-ID: 1623741
1 Beitrag
IF Bedingung mit Dropdownabfrage in VBA
Oli

Hallo zusammen,
ich habe folgende Herausforderung.
Unten stehendes Makro funktioniert soweit einwandfrei.
Aktuell wird aus Sheet 2 der Inhalt aus Zelle 37 ausgelesen und bei Übereinstimmung im Sheet 3 in einer Matrix ein Eintrag hinterlegt.
Mein Problem ist aktuell, dass ich in...
01.09.2014 13:04:55
Thread-ID: 1379276
4 Beiträge
Exel VBA-Code
Hajo_Zi
Hallo Forum,
ich möchte auf Doppelklick in der Spalte AG die SB-Kürzel anzeigen lassen und ebenso wieder aufheben. Ich bitte um Eure Hilfe.
In der Zelle AG7 = (z.B. das Kürzel) ABC
In der Zelle AG8 = (z.B. das Kürzel) DEF
In der Zelle AG9 = (z.B. das Kürzel) GHI
...
12.05.2020 19:31:36
Thread-ID: 1757856
7 Beiträge
Anzeige
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