Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
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
1696to1700
1696to1700
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

neues Dokument öffnen und Zelleninhalte Kopieren

Forumthread: neues Dokument öffnen und Zelleninhalte Kopieren

neues Dokument öffnen und Zelleninhalte Kopieren
05.06.2019 09:08:21
Stefan
Hallo zusammen,
ich habe eine Vorlage/Liste in der ich einen Button eingefügt habe.
Durch klick öffnet dieser Button ein anderes Formular. In dieses Formular möchte ich ausgewählte Zellen aus der anderen Liste übertragen.
Den Teil mit Workbooks.Open "Pfad" habe ich aber nun komme ich bei dem anderen Teil nicht weiter.
Mein Ziel ist:
Nimm Zelle A1 aus Formular X und kopiere den Ihnhalt in Zelle Y5 Formular K und das mit weiteren Zellen.
Das Problem ist das in Formular X ein "paar" Einträge vorhanden sind. Es soll also der gerade Erstellte, bzw. Bearbeitete als Element gewählt werden..
Würde mich freuen wenn Ihr weiterhelfen könntet
Gruß
stefan
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: neues Dokument öffnen und Zelleninhalte Kopieren
05.06.2019 09:42:47
UweD
Hi
Es gibt einen Spruch..
"Die Sprache des Ingenieurs ist die Zeichnung"
Hier im Forum hilft..
"Die Sprache des Hilfesuchenden ist die Musterdatei"
LG UweD
AW: neues Dokument öffnen und Zelleninhalte Kopieren
05.06.2019 11:45:14
UweD
Hallo
so?
Private Sub CommandButton1_Click()
    ''leeres Volagedokument aus Vorlagenordner öffnen 
    Dim Pfadangabe As String, Datei As String, TB1, WB2, TB2
    Dim Z As Long
    
    '****Einstellungen ggf anpassen 
    Pfadangabe = "X:\Temp\"
    Datei = "Formular K.xlsx"
    
    Set TB1 = ThisWorkbook.Sheets("führende Liste")
    Z = ActiveCell.Row ' aktuelle Zeile 
    
    Set WB2 = Workbooks.Open(Pfadangabe & Datei)
    Set TB2 = WB2.Sheets("neues Dokument abspeichern")
    
    With TB2
        'Werte übertragen 
        .Cells(1, 1) = TB1.Cells(Z, 1)
        .Cells(2, 1) = TB1.Cells(Z, 3)
        .Cells(3, 1) = TB1.Cells(Z, 5)
        
        .Cells(1, 6) = TB1.Cells(Z, 4)
        .Cells(2, 6) = Format(TB1.Cells(Z, 6), "DD.MM.YYYY") ' mit Datumsformat 
        
    End With
    
    'anspeichern mit Namen: Beispiel 
    '20190605_114123 Formular K.xlsx 
    WB2.SaveAs Filename:=Pfadangabe & Format(Now, "YYYYMMDD_hhmmss") & Datei, FileFormat:= _
        xlOpenXMLWorkbook
    
    
    'Schließen 
    WB2.Close


End Sub

LG UweD
Anzeige
AW: neues Dokument öffnen und Zelleninhalte Kopieren
05.06.2019 14:17:28
Stefan
Hallo UweD,
habe es jetzt gerade ausprobiert, klappt super.
Danke dafür.
Nun ist noch eine Frage aufgekommen. Habe es mal in der Datei dargestellt was der Wunsch ist...
Gruß
S.
https://www.herber.de/bbs/user/130215.xlsm
Anzeige
AW: neues Dokument öffnen und Zelleninhalte Kopieren
05.06.2019 14:25:46
UweD
Hallo
ändere die eine Zeile so ab.
        'Werte übertragen 
        .Cells(1, 1) = Replace(TB1.Cells(Z, 1), Chr(10), ", ")

LG UweD
Anzeige
AW: neues Dokument öffnen und Zelleninhalte Kopieren
06.06.2019 06:13:53
Stefan
Guten Morgen UweD,
habe es gerde getestet, Klappt super.
Danke für Deine schnelle Hilfe.
Gruß
Stefan
Prima. Danke für die Rückmeldung. (owT)
06.06.2019 06:43:48
UweD
;

Forumthreads zu verwandten Themen

Zelleninhalt in Bereich kopieren
Ludger

Hallo zusammen,
im Seet 1 habe ichin Zelle A1 einen Wert stehen. Diesen möchte ich nach Sheet 2 Zelle C3 bringen.
Problem: Im Sheet 2 ist die Zelle C3 in einem vordef. Bereich C3:D10
Wie bekomme ich das in VBA gelöst ?
Danke
Ludger
23.02.2009 17:25:39
Thread-ID: 1053201
4 Beiträge
Nur Zellen mit Text kopieren
Peter

Hallo
ich bin gerade dabei eine Excel Tabelle zu bearbeiten und haben ein Auswahltabellenblatt wo ich über
Kontrollkästchen verschiedene Options auswählen kann, bzw noch die Anzahl angeben kann.
In einen Datentabellenblatt werden mir untereinander die Daten ausgegeben.
Das heißt...
15.06.2009 12:58:41
Thread-ID: 1081552
21 Beiträge
Zellen anhand Inhalt auswählen und kopieren
Matthias

Hallo zusammen,
ich habe folgendes Problem: Aus einer Datei mit ca. 30.000 Zeilen und 38 Spalten sollen einige Bereiche ausgewählt werden und in unterschiedliche Blätter einer zweiten Arbeitsmappe einsortiert werden.
Konkret: Per Makro soll in Spalte C der Bereich gesucht werden der z.B...
08.11.2009 21:04:13
Thread-ID: 1115418
13 Beiträge
Nur den Inhalt kopieren
edie

Hallo zusammen,
was muss ich ändern damit nur der Inhalt kopiert wird?
Sub test() Dim wsT As Worksheet Dim wsS As Worksheet Dim i As Integer Dim RowsT As Integer Application.ScreenUpdating = False Set wsT = ActiveWorkbook.Sheets.Add(, Worksheets(Worksheets.Count), , xlWorksheet) wsT.Nam...
27.12.2009 23:27:15
Thread-ID: 1126034
3 Beiträge
kompl. zelleninhalt in textdatei kopieren
Helmut

hallo vba'ler,
ich hätte eine kurze frage für profis:
ich habe folgenden code:
j = Sheets("Textexport").UsedRange.Rows.Count
Open "D:\Text.txt" For Output As #1
For i = 1 To j
Tstring = Format(Cells(i, 1)) & Format(Cells(i, 2)) & Format(Cells(i, 3)) & Format(...
09.03.2010 10:00:23
Thread-ID: 1144486
6 Beiträge
Zelleninhalte umkopieren
Hugo

Hallo zusammen
Möchte Daten aus einer Zelle in die darunterliegenden Zeilen/Zellen kopieren
DH:
In Zelle A1 steht, jeweils mit Zeilenumbruch:
Hans
Apfel
Gurke
Nun soll per VBA Hans in A2, Apfel in A3 und Gurke in A4 kopiert werden
Besten Dank für eure Hilfe
G...
28.09.2010 20:20:49
Thread-ID: 1179799
8 Beiträge
Zelleninhalt kopieren und einfügen
Ingo

Hallo,
ich habe eine Excel-Tabelle, in der in der zweiten Spalte Daten stehen. Zwischen den Daten sind die Zellen ohne Inhalt. Ich möchte nun, dass die leeren Zellen mit den darüberstehenden Daten gefüllt werden.
Hier der Code, den ich verfasst habe und der nichts ausfüllt...
Sub Ze...
16.05.2011 06:40:15
Thread-ID: 1214626
7 Beiträge
Zelleninhalte kopieren
Helmut

Hallo,ich möchte in einer Zelle (Bsp. A1) einen Wert eingeben, der dann innherlab des Sheets(Bsp. A10) an eine andere Stelle kopiert werden soll. Nun wird in A1 wieder ein Wert eingegeben. Dieser soll nun wieder an A10 weggeschrieben werden, allerdings addiert zum ersten Wert. Zu guter letzt so...
06.06.2002 11:27:43
Thread-ID: 126429
2 Beiträge
Nur Zellen mit Inhalt markieren
Fuchs


Hallo Leute.
ich bin gerade dabei riesige mengen an alten *.txt dateien in exel reinzukloppen ;-) Gibt es ein makro mit dem ich nur die zellen markieren kann, die einen inhalt haben?
Schon mal vielen dank!

20.06.2002 14:12:12
Thread-ID: 130181
2 Beiträge
Zelleninhalte kopieren & einfügen
Stefan

Hallo zusammen
Ich möchte aus jener Zeile, in welcher sich die aktive Zelle befindet, den Wert E, F, G und M kopieren und in eine fixe Position einfügen.
Die fixen Positionen zum Einfügen sind P2/P3/P4 und R3.
Beispiel: aktive Zelle ist C1. Somit sollen aus Zeile1 die Werte folgende...
10.04.2013 15:55:38
Thread-ID: 1308191
3 Beiträge
Zelleninhalt "versetzt" kopieren
Dieter

Bitte um Hilfe !
Ich möchte mehrere Zellen eines Blattes „versetzt“ in ein anderes Blatt kopieren. Es soll ablaufen, bis eine leere Zeile in der Tabelle PDaten erreicht ist. Auslösen möchte ich das Kopieren beim Beenden der Eingabe der PDaten mittels Befehlsbutton.
PDaten!A5; B5; D5 nac...
28.08.2013 17:41:18
Thread-ID: 1328681
3 Beiträge
AW: Zelleninhalt in anderes Tabellenblatt kopieren
Rene

Hallo Leute,
leider ist mein alter Beitrag schon archiviert und ich kann ihn nicht weiterführen.
Ich bekam damals den Tip mit der Matrixformel: {=WENN(ZEILEN($1:1) >ZÄHLENWENN(Mitglieder!I:I;"E");"";INDEX(Mitglieder!B:B; KKLEINSTE(WENN( _ Mitglieder!I$1:I$99="E";ZEILE($1:$99) );ZEIL...
20.01.2014 13:29:07
Thread-ID: 1345977
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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