online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Swiftnes vom 07.07.2021, 04:10 Options

Excel Dateien vergleichen mithilfe von Userform

Hallo zusammen,

ich habe ein größeres Problem, da meine VBA-Kenntnisse nicht gerade sehr weit
reichen.
Folgendes Problem:

Ich habe drei Excel Dateien (Ich nenn sie jetzt mal "Aktuelle Werte 1.xls", "Aktuelle
Werte 2.xls" und "Forecasts.xls"). "Aktuelle Werte 1.xls" und "Aktuelle Werte 2.xls"
sind nicht immer die gleichen Excel Dateien, sondern hängen immer von dem
jetzigen Zeitpunkt ab (Also im März sind es andere Dateien als im folgenden
November).

Jetzt will ich mit einer Userform die drei Excel Dateien mithilfe eines
Commandbuttons auswählen und den jeweiligen Pfad in einer Textbox anzeigen
lassen. Dazu habe ich schon einen Code gefunden:

Dim File1 As String
File1 = Application.GetOpenFilename("Microsoft Excel-File (*.xls), *.xls")
TextBox1 = File1

Sobald die drei Dateien ausgewählt sind muss ich Rechnungen unter diesen drei
Dateien durchführen und die Werte in einer Vorgefertigten Exceldatei (z.B. namens
"Monitor.xls") eintragen lassen.
Wie mach ich das am Besten? Sollte ich da die Dateien öffnen und nach Beenden
der Rechcnungen wieder schließen lassen? Wenn ja wie? Wie gesagt das
Problem ist, dass die Dateien nicht immer gleich sind und somit nicht einfach im
Code fixiert werden können (wie z.B. "Workbooks.Open "C:\Aktuelle Werte 1.xls")

Ich hoffe meine Erläuterung ist verständlich, denn so einfach ist es nicht.

Vielen Dank schonmal für eure Hilfe!!!


Antwort schreiben

Antwort 1 von Saarbauer vom 07.07.2021, 07:48 Options

hallo,

ich hoffe es richtig verstanden zu haben, aber danach brauchst du für die Berechnung in "Monitor" nur die drei erforderlichen Dateien öffnen und es müsste mit den Berechnungen funktionieren.

Das Problem leigt wahrscheinlich in den Namen der Dateien, da in "Monitor" verweise auf die jeweilgen Dateinamen sind und diese wären jeweils anzupassen. Ohne den Aufbau der Tabellen zu kennen ist hier ein guter Rat schwierig.

Gruß

Helmut

Antwort 2 von Swiftnes vom 07.07.2021, 09:27 Options

Hi!

Erstmals vielen Dank für die schnelle Antwort.

Gut ich hab es hinbekommen, dass sich die ausgewählten
Dateien öffnen mit:

Workbooks.Open Filename:=TextBox2

Wenn ich jetzt aber mit diesen Dateien arbeiten will, muss ich ja
Variablen zuweisen und die Sheets auswählen, aber wie "spreche"
ich jetzt die Dateien an? Z.B.:

Dim wkbook1 as Workbook

Set wkbook1 = Workbooks.Open:=Textbox1

Das funktioniert bei mir nicht. Normalerweise müsste bei
":=Textbox1" ein Pfad zu einer Datei hinzu. Da sich der Dateiname
aber ständig ändert, weiß ich nicht wie ich sie in dem Moment
direkt ansprechen kann.

Ich bitte um Verzeihung, da ich keine Dateien zur Verfügung stellen
kann. Wenn meine Erklärungen nichts taugen, dann probier ich
mal ein Beispiel dafür zu machen, nur dann bräuchte ich Hilfe,
einen guten Upload Server zu finden.

Wie gesagt, nochmals vielen Dank für die schnelle Antwort!

Gruß

Antwort 3 von fedjo vom 08.07.2021, 16:46 Options

Hallo,
du kannst hier deine Dateien uploaden:
http://www.file-upload.net/

Gruß
fedjo

Antwort 4 von Swiftnes vom 09.07.2021, 10:47 Options

Hallo,

alles klar, die Datei ist hier hochgeladen:

http://www.file-upload.net/download-1751754/Beispiel-VBA-
Userform.rar.html

Gruß

Ähnliche Themen

Public-Variable von userform an Excel funktioniert nicht?
Marie  09.01.2008 - 40 Hits - 17 Antworten

Excel UserForm
fedjo  30.05.2008 - 101 Hits - 2 Antworten

2 Excel-Dateien vergleichen
mark089  05.08.2008 - 390 Hits - 13 Antworten

userform immer anzeigen und in excel arbeiten
dersuchendex09d  27.03.2009 - 226 Hits - 2 Antworten

Zwei Excel Dateien vergleichen
Michibeck  09.04.2009 - 938 Hits - 3 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026