Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 10:31:56
Bilder in Userform per VBA aus Sharepoint Ordner anzeigen
16.04.2024 10:29:44
Mittelwert für Zeilen mit gleichen Zeitstempel
16.04.2024 09:54:17
Durchschnittswerte zwischen Tagen berechnen
16.04.2024 09:51:15
Frage: KPI - Logistik Dashboard
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1616to1620
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit VBA auf geschlossene Exceldatei zugreiffen

Mit VBA auf geschlossene Exceldatei zugreiffen
11.04.2018 11:44:53
Valentina
Guten Tag Community,
da ihr mir beim letzten mal so gut geholfen habt, wende ich mich wieder an euch :)
Und zwar wollte ich wissen, ob es funktioniert, dass man mit einem Code eine Excelzeile einer 2. ExcelDatei überprüft, ob diese leer ist, und wenn sie leer ist, Werte aus einer Zelle der 1. Exceldatei in bestimmte Zellen der 2. Datei eben in dieser leeren Zeile einzufügen?
Hoffe, dass ich das nicht zu kompliziert beschrieben habe :D
Gruß,
Valentina

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

Betreff
Datum
Anwender
Anzeige
Lesen ja, Schreiben nein, also Öffnen! (owT)
11.04.2018 11:51:22
EtoPHG

AW: Lesen ja, Schreiben nein, also Öffnen! (owT)
11.04.2018 11:54:58
Valentina
Was meinst du damit genau?
Die geschlossene 2. Exceldatei darf sich von mir aus auch Öffnen, wenn was in ihr geschrieben wird.
In geschlossene Mappe schreiben?
11.04.2018 12:08:12
EtoPHG
Hallo Valentina,
Ich meine damit, dass man zwar (umständlich) aus einer geschlossen Mappe Daten lesen kann.
Will man aber Daten in derselben Mappe verändern, muss diese geöffnet werden.
Was erwartest Du jetzt? Das man Dir mit deinen rudimentären Angaben eine fixfertigen Code liefert?
Das ist nicht möglich!
Gruess Hansueli
AW: In geschlossene Mappe schreiben?
11.04.2018 12:23:26
Valentina
Hallo Hansueli,
nein erwarte ich natürlich nicht. Ich wollte nur mal wissen, ob das möglich ist und wollte dann genauere Angaben machen.
Zum Beispiel:
in meiner ersten Exceldatei steht in Zelle A1 der Vorname "Max" und in der Zelle B1 der Nachname "Mustermann".
Nun will ich in einer zweiten Exceldatei ab Zeile 1 nachsehen, ob die Zeile leer ist. Leider ist erst die 5. Zeile leer. In diese Zeile wird dann in Zelle A5 der Vorname "Max" geschrieben und in Zelle B5 der Nachname "Mustermann"
Ich hab mir das ganze bis jetzt so gedacht: 

Dim Vorname as String
Dim Nachname as String
Vorname= Cells(1,1)
Nachname= Cells(1,2)
Dim ab As Workbook
Dim wb As Workbook, Hallo
Set wb = GetObject("C:\Users\XY\Desktop\Hey\Exceldatei2.xlsm") 'Damit will ich auf die 2. _
Exceldatei zugreifen
Set ab = GetObject("C:\Users\z003x0ye\Desktop\Du\Exceldatei1.xlsm") 'Hiermit will ich nicht  _
vergessen, welche Exceldatei die Quelle ist
i=1
Hallo = wb.Worksheets("Sheet1").Rows("i:i") 'Ich will ab Zeile 1 schauen.
if Hallo = "" Then
Workbooks (wb).Sheets("Sheet1"). Cells(i,1) = Vorname
Workbooks (wb).Sheets("Sheet1"). Cells(i,2) = Nachname
else
I=I+1
end if

Leider fehlt mir auch noch ein Ansatz, dass er dann immer und immer wieder meine if Funktion wiederholt, bis eben einmal eine leere Zeile gefunden wurde und dann eingefüllt wird.
Gruß,
Valentina
Anzeige
AW: In geschlossene Mappe schreiben?
11.04.2018 14:05:35
Rudi
Hallo,
als Anregung: 
Sub aaa()
Dim wkbQ As Workbook, wkbZ As Workbook
Dim strVorname As String, strNachname As String
Set wkbQ = ActiveWorkbook
strVorname = Cells(1, 1)
strNachname = Cells(1, 2)
On Error Resume Next
Set wkbZ = Workbooks("Datei2.xlsx") 'Zielmappe offen?
On Error GoTo 0
If wkbZ Is Nothing Then
'nicht offen -> öffnen
Set wkbZ = Workbooks.Open("c:\test\datei2.xlsx")
End If
With wkbZ.Sheets("Sheet1").Cells(Rows.Count, 1).End(xlUp)
.Offset(1, 0) = strVorname
.Offset(1, 1) = strNachname
End With
wkbZ.Close True   'Zielmappe schließen und speichern
End Sub

Gruß
Rudi
Anzeige
AW: In geschlossene Mappe schreiben?
16.04.2018 07:48:29
Valentina
Hallo Rudi,
vielen Dank für die Hilfe! Das klappt super! :)
Würde es auch gehen, wenn die Zeilen nicht ganz leer sind, sondern zum Beispiel in spalte F was steht? Also nur die ersten beiden Zellen , wo ja was eingetragen sind, leer sind?
Vielen Dank!
Gruß,
Valentina

301 Forumthreads zu ähnlichen Themen

Laufende Nummer aus anderer Datei ziehen
mtremer

Hallo Excel-Freunde,
nun habe ich schon länger recherchiert, aber gefunden habe ich nichts :-(
Folgendes habe ich vor:
Ich befinde mich in einer Datei (Start.xls). Von dort aus möchte ich eine laufende Nummer aus einer anderen Datei (Sammlung.xls) ziehen. Diese Nummer befindet sich...
17.09.2008 11:55:00
Thread-ID: 1010315
4 Beiträge
Anzeige
Hyperlink auf Sheet in anderer Datei
Christoph

Hallo zusammen, mal wieder ein kleines Problem:
Ich lese aus einer Zelle den Text Karteikartenneu\A.xls#'Nachname Vorname Ort'!A4 ein.
Ziel des unten stehenden Codes ist es, im Unterverzeichnis Karteikartenneu die Datei A.xls zu öffnen und das Sheet Nachname Vorname Ort im Vordergrund z...
21.10.2008 08:04:00
Thread-ID: 1017836
6 Beiträge
Kopf- & Fußzeile auf andere Dateien übertragen?
Jessi

Hallo zusammen,
habe mal wieder eine Frage:
Habe 175 Dateien, die ich mit gleicher Kopf- & Fußzeile versehe muss. Die Dateien sind alle gleich nummeriert:
001.xlsm
002.xlsm
(...)
175.xlsm
Gibt es ggf. eine geschickte Möglichkeit z.B. das erste Tabellenblatt richt...
06.12.2008 18:56:00
Thread-ID: 1030728
9 Beiträge
Anzeige
Gültigkeit Liste mit Bezug auf eine andere Datei
Rafi

Hallo Zusammen,
ich habe ein Problem mit einer Gültigkeitsprüfung auf eine Liste die in einer anderen Datei steht.
Bislang hat das immer funktioniert, wenn ich die Liste der Externen Datei unter Namen definiert und bei der Gültigkeit/Liste mit Quelle="Name" angegeben habe. Geht aber nic...
16.12.2008 11:28:00
Thread-ID: 1033235
4 Beiträge
SVerweis - Zugriff auf ext. Tabellen ->Datei gross
sk

Hallo zusammen,
ich habe eine Preislistendatei die ich anhand von externen Tabellen mit SVerweis aktualisiere.
Ich suche anhand der der hinterlegten Artikelnummer in meiner Datei per SVerweis im jeweiligen
Datenbankextrakt der Artikelstammdaten(12MB) und Artikelpreise(1.5MB) die pas...
26.01.2009 14:43:35
Thread-ID: 1043902
3 Beiträge
Makro, Verweis auf andere xls Dateien
Diego

Guten Morgen an alle,
ich hätte ein kleines oder großes oder kleines Problem, weiss ich leider nicht so genau, da ich mich nicht so gut auskenne in Excel oder VBA =(
Also mal zu meinem Problemchen, ich hoff einfach mal ihr könnt euch unter meiner Beschreibung etwas vorstellen und mir da...
13.02.2009 09:21:00
Thread-ID: 1050345
6 Beiträge
Zugriff auf Tabellenblatt in anderer Datei
Ulrich

Hallo,
ich würde gerne in einer Datei eine Zusammenfassung darstellen, und gebe dazu einen Namen eines Tabellenblattes einer anderen Datei ein, aus der dann eine Zelle übernommen wird. Ziel ist es in der Zusammenfassung z.b. 2012 als Jahr (Name des Tabellenblattes) einzugeben und ich bekomm...
01.03.2009 18:03:43
Thread-ID: 1055274
2 Beiträge
sverweis mit variable auf externe datei
Joni

Hi,
ich suche eine Lösung um mittels sverweis aus anderen Dateien/Tabellen Werte auszulösen. Die Schwierigkeit liegt darin, dass der Dateiname aus einer Zelle ausgelesen werden soll (der Pfad ist immer der gleiche). Die andere Datei ist nicht geöffnet und sollte dies wenn möglich auch nicht...
09.06.2009 23:34:03
Thread-ID: 1080301
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
2
5
8
4
3
2
5
1
3
3
13
3
2
7
5
2
6
32
6
2
10
7
1
4