Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
16.10.2025 00:15:51
Passwort im Herbersforum ändern
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
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA-Code Änderung bei Dateiverschiebung

Forumthread: VBA-Code Änderung bei Dateiverschiebung

VBA-Code Änderung bei Dateiverschiebung
26.11.2003 09:59:36
Jürgen K
Hallo Gemeinde,
ich habe in einer "Start-Datei" in "DieseArbeitsmappe" folgenden Code eingegeben:
PrivateSub Worbook_Open
Workbooks.Open Filename:="C:\.....\test1.xls
Workbooks.Open Filename:="C:\.....\test2.xls

Die Dateien test1 und test2 befinden sich immer im gleichen Verzeichnis wie die Start-Datei.
Wie sieht ein flexibler Code aus, der die test-Dateien immer in dem aktuellen Verzeichnis der Start-Datei sucht.
Ich hoffe ich habe mich verständlich und nicht zu kompliziert ausgedrückt.
Vielen Dank im voraus
Gruß Jürgen
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: VBA-Code Änderung bei Dateiverschiebung
26.11.2003 10:03:01
GerdW
dim Pfad as string

Pfad = Thisworkbook.Path & \test1.xls

Gerd
AW: VBA-Code Änderung bei Dateiverschiebung
26.11.2003 10:22:14
Jürgen K
Bin leider in VBA unbeleckt.
Habe dein Vorschlag wie folgt umgesetzt aber Fehlermedung Laufzeitfehler erhalten:


Private Sub Workbook_Open()
Dim Pfad As String
Application.ScreenUpdating = False
Workbooks.Open Filename:="Thisworkbook.Path & \test 1.xls"
Workbooks.Open Filename:="Thisworkbook.Path & \test 2.xls"
Application.ScreenUpdating = True
End Sub

Was hab ich hier falsch gemacht?
Gruß Jürgen
Anzeige
AW: VBA-Code Änderung bei Dateiverschiebung
26.11.2003 11:01:00
GerdW
Du musst mein Beispiel nur richtig umsetzen:
Dim Pfad As String
Pfad = Thisworkbook.Path & "\test1.xls"
Application.ScreenUpdating = False
Workbooks.Open Filename:=Pfad
oder:
Workbooks.Open Filename:= Thisworkbook.Path & "\test 2.xls"
Application.ScreenUpdating = True
Anzeige
AW: VBA-Code Änderung bei Dateiverschiebung
26.11.2003 11:26:27
Jürgen K
Hallo Gerd,

damit ich es lerne, richtig umzusetzen, halte ich mich in diesem
Forum auf.

Vielen Dank

Gruß Jürgen
AW: VBA-Code Änderung bei Dateiverschiebung
26.11.2003 11:01:30
Bernhard Ringhofer
so geht's:


Private Sub Workbook_Open()
Application.ScreenUpdating = False
Workbooks.Open Filename:=Thisworkbook.Path & "\test1.xls"
Workbooks.Open Filename:=Thisworkbook.Path & "\test2.xls"
Application.ScreenUpdating = True
End Sub


MfG Bernhard
Anzeige
So gehts. Vielen Dank!!
26.11.2003 11:24:29
Jürgen K
Hallo Bernhard,

ausproboiert und kann bestätigen: so gehts:))

Vielen Dank und einen schönen Tag noch.

Viele Grüße
Jürgen
;

Forumthreads zu verwandten Themen

vba-Datenexport nach Excel2007 -Array mit 70000 DS
Tim

Hallo,
ich habe einen Datenexport aus einem Programm nach Excel in vba. Das ganze funktioniert soweit ganz gut.
Nun möchte ich jedoch nicht, das sjede Zeile aus meinem Programm exportiert wird, daher gibt es ein Array mit entsprechenden Datensätzen: Entweder eine 1 (steht für Export der...
20.08.2008 08:57:00
Thread-ID: 1003084
2 Beiträge
VBA-Code - Datei speichern unter; Schleife
Schulze

Halli Hallo,
ich habe eine kurze frage. und war geht es darum, dass die spalte a untersucht werden sollen. es sollen alle werte der tabelle (zeilen) kopiert werden, bis in der spalte a der wert 0 ist.
Im Folgenden habe ich eine Beispieldatei drangehangen. https://www.herber.de/bbs/user/...
21.08.2008 10:57:00
Thread-ID: 1003407
2 Beiträge
Anzeige
Excel: per VBA Kopieren, Quelldatenlöschen
Bolle

Hallo, Ich bin zwar ein alter Sack, aber neu hier.
Meine Frage:
In Spalte C2 bis H100 habe ich Datensätze weche Ich durch Doppelklick auf Zelle
(z.B. C33) die Zeile C bis H nach K5:P5 kopieren möchte. Danach sollten die kopierten
Zellen gelöscht werden. Durch nachrücken der u...
23.08.2008 14:14:40
Thread-ID: 1004109
3 Beiträge
Anzeige
Abgleichen von Daten per VBA
Daten

Hallo Forum,
ich möchte gerne Daten von einem Tabellenblatt (Hilfstabelle) in eine anderes Tabellenblatt (Terminierung) überrtagen. Hierbei soll das Makro schauen, ob der Datensatz schon vorhanden ist.
Wenn ja, dann sollen die Spalten aktualisiert werden.
Wenn nicht, dann sollen...
09.09.2008 10:34:00
Thread-ID: 1008354
5 Beiträge
Anzeige
Vergleich von Daten per VBA
Daten

Hallo Forum,
ich habe gestern nette Hilfe bezüglich eines VBA Problems erhalten.
Bei der Testdatei funktionierte das Makro dann auch prima, in der Originaldatei nicht. Ich habe es angepaßt, weiß aber nun nicht, wo der Fehler in der Syntax liegt.
Problem:
Das Makro verschrei...
10.09.2008 08:48:00
Thread-ID: 1008629
3 Beiträge
Anzeige
Leseschutz für Datei, mit VBA aufheben
Iro

Hallo,
folgendes Problem: ich will zwischen zwei Dateien Daten austauschen. Die A-datei soll grundsätzlich PW-geschützt werden, und zwar so, dass der User weder etwas verändern kann noch sie überhaupt öffnen. Nur wenn der User aus der B-datei mit der vorgesehenen Form Daten überträgt, soll...
21.10.2008 14:18:57
Thread-ID: 1017997
4 Beiträge
VBA DateFormat zu String convertieren
MBorn

Guten Morgen,
weiß jemand, wie man ein Datum, das im DateFormat (als Zahl) vorliegt
in das Textformat (yyyy-mm-dd) konvertiert. Sodaß das Ergebnis ein Text ist?
sodaß beispielsweise aus der Zahl 39868 das Text-Datum "2009-02-24" wird?
Herzlichen Dank,
Born
18.03.2009 12:59:43
Thread-ID: 1061376
12 Beiträge
VBA: Erste Seite einer Datei nicht mitdrucken
Jonathan

Hallo zusammen,
ich habe folgendes Problem, welches mittels eines Makros gelöst werden muss:
Ich möchte in eine Datei ein Makro einbauen, welches verhindert, dass die erste Seite mitgedruckt wird.
Das Makro sollte nach dem klick auf die Druckfunktion starten.
Da die Datei späte...
17.04.2009 11:15:57
Thread-ID: 1069277
5 Beiträge
VBA-Makro zum Datenübertrag zwischen Excel-Sheets
mctapt

Liebe VBA-Freunde,
ich muss auf der Arbeit ein Marko programmieren, mit dem sich Inhalte eines Sheets automatische beim öffnen der Datei in ein anderes übertragen lassen.
Die Idee íst dahinter:
Mein Chef will als Kontrolle der Berater sehen, mit wem sie so innerhalb der Woche te...
29.06.2009 21:19:08
Thread-ID: 1085193
7 Beiträge
VBA-Datenmaske Änderungen speichern
Kay

Hi, habe folgendes Problem und komme einfach nicht weiter und versteh es nicht.
Habe eine Userform, in der einige Daten zu einem Kunden erfasst werden und in einer Tabelle hinterlegt werden. Das läuft super ! Aber nun möchte ich mit einer 2'ten Userform die Daten auch bearbeiten lassen.
...
03.07.2009 09:58:18
Thread-ID: 1086101
3 Beiträge
VBA-Exceldatei unter Excel 2003 und 2007 nutzen
Martin

Hallo,
ich mache mir den Umstieg von Excel 2003 auf 2007 ziemlich schwer, will aber den Anschluss nicht verpassen und daher auf einem PC gerne unter Excel 2007 arbeiten.
Meine Frage: Ich arbeite sehr intensiv mit einer Exceldatei, in der es zahlreiche benutzerdefinierte über VBA erzeugt...
14.07.2009 12:29:24
Thread-ID: 1088399
5 Beiträge
VBA-Datenübernahme schlägt fehl
Sascha

Hallo liebe Excel-Profis,
in einer Datenbank nutze ich zum Auflisten aller gespeicherten Datensätze folgenden VBA-COde:
Private Sub Worksheet_Activate() 'Zielblatt muss immer die höchste Nr. haben! Dim i As Long Dim j As Long On Error GoTo Fehler Application.EnableEvents = False Applica...
12.09.2009 20:02:16
Thread-ID: 1102222
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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