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

Sichtbare Zeilen nach Word exportieren

Forumthread: Sichtbare Zeilen nach Word exportieren

Sichtbare Zeilen nach Word exportieren
22.02.2019 10:30:16
CK
Hallo zusammen,
nach einer langen Google-Recherche habe ich nun aufgegeben und hoffe, dass ihr mir weiterhelfen könnt.
Ich habe eine Excel Liste mit ca. 40 Zeilen, wobei in Spalte B einiges an Text mit Sverweisen etc. eingegeben wurde. Bestimmte Zeilen werden je nach Vorauswahl (DropDown) ein- oder ausgeblendet. Da ich mit der Excel-Text-Formatierung nicht zufrieden bin, möchte ich nun alle sichtbaren Zeilen in eine Word-Vorlage kopieren / übertragen. Ich habe die Funktion über Bookmarks:
docTest.Bookmarks("Kunde").Range.Text = Cells(4, 2).Text
versucht, funktioniert soweit für einzelne Zellen.
Nun möchte ich aber alle sichtbaren Zeilen in einem Schub übertragen. Ich versuche es über die Funktion:
Selection.Special(xlCellTypeVisible).Select
...weiß aber nicht, wie ich das mit dem Bookmark verknüpfen soll.
Falls es andere bzw. einfachere Wege gibt das Ganze nach Word zu übertragen, her damit :o)
Vielen Dank im Voraus.
Grüße
CK
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sichtbare Zeilen nach Word exportieren
22.02.2019 12:32:37
CK
Hier der Code:
Private Sub CommandButton21_Click()
Dim appWord     As Object
Dim docTest     As Object
Dim letztezeile As Long
Set appWord = CreateObject("Word.Application")
Set docTest = appWord.Documents.Add("file:///C:\Users\" & Environ$("USERNAME") & "\Documents\ _
KB_Vorlage.docx")
ActiveSheet.Range("B20", Range("C" & Rows.Count).End(xlUp)).SpecialCells(xlCellTypeVisible). _
Select
Selection.Copy
appWord.Visible = True
docTest.Activate
docTest.Bookmarks("T_Kunde").Range.Text = Cells(4, 2).Text
docTest.Bookmarks("TEXT").Range.Text = Selection.Paste
Set docTest = Nothing
Set appWord = Nothing
End Sub
Ich hänge einfach bei dem Befehl...
docTest.Bookmarks("TEXT").Range.Text = Selection.Paste
Wie kann ich den Befehl schreiben das der die sichtbaren Zeilen in den Bookmark überträgt?
Anzeige

Forumthreads zu verwandten Themen

Ausgeblendete Zeilen Thematik
Wolfgang
Hallo Zusammen,

ich habe wie folgt ein kleines Anwenderproblem.

Und zwar hab ich eine Datei mit Filter wo ich "Sortiment" als Überbegriffe ohne nähere Information zu Lieferanten usw. habe.
Diese wird als Kopie weitergegeben und die eingetragenen Daten muss ich mir dann wieder i...
11.03.2025 15:49:31
Thread-ID: 2008519
5 Beiträge
Leere Zeilen sind nicht leer
Michael

Hallo, liebe Excel-Freunde,
habe folgendes Problem:
In meiner Tabelle stehen in jeder Zeile irgendwelche Formeln.
Aber nicht alle produzieren sichtbare Werte. Einige Zeilen bleiben beim Blick auf die Tabelle leer. Durch anschließendes kopieren und Werte einfügen auf der ganzen Tabelle...
27.03.2003 17:20:57
Thread-ID: 237327
11 Beiträge
Zeilen mit bestimmten Begriff nicht kopieren.
Micha

Hallo zusammen,
habe mal wieder ein kleines Excel/VBA Problem.
In einer Datei sind horizontal die Kalenderwochen abgetragen, wobei immer nur 12 Wochen angezeigt werden. (Die übrigen 40 sind ausgeblendet)
Über folgendes Makro: (Danke an Rudi) Private Sub Worksheet_Change(ByVal Targe...
30.06.2011 23:55:23
Thread-ID: 1220353
2 Beiträge
VBA: Zeile über oberste sichtbare gefilterte Zeile kopieren
Joachim Graw
Hallo zusammen,

ich bitte um Hilfe bei folgender Fragestellung. Hätte gern ein Bild hochgeladen, aber das geht - glaube ich - nicht ? Die Tabelle kann ich nicht hochladen, da sensibel, deswegen beschreibe ich nachfolgend hoffentlich verständlich.

Ich möchte mit einem vorgeschaltete...
30.10.2023 13:26:59
Thread-ID: 1951506
2 Beiträge
Nicht sichtbare Zellen kopieren.
Mr.PT
Guten Abend in die Forums-Gemeinde,
vielleicht hat jemand das Phänomen ja auch schon beobachtet und ev. eine Lösung dafür gefunden:
Bekanntlich kann man bei Excel-Listen beliebige Spalten ausblenden und mit einer Zellenmarkierung auch über die ausgeblendeten Spalten hinweg einen Bereich aufz...
19.01.2023 02:40:41
Thread-ID: 1916380
17 Beiträge
Anzeige
Daten in gruppierte/gefilterte Liste kopieren
Micha

Hallo liebe Excel - Gemeinde,
zunächst fetten Respekt für den Einsatz und die Hilfsbereitschaft hier im Forum!
Ich habe zwei Probleme auf die ich bisher leider noch nicht die passende Antwort im Forum gefunden habe.
Problem Nr.1 Ich habe keien Plan von Excel und noch weniger von VBA...
29.06.2010 23:23:48
Thread-ID: 1164611
5 Beiträge
Anzeige
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 13:07:34
Thread-ID: 1170150
1 Beitrag
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 13:06:50
Thread-ID: 1170154
2 Beiträge
Srollen im nicht aktiven Fenster
Buddy

Hallo zusammen,
habe wieder mal ein Problem.
Ich habe mir über ein Makro die Möglichkeit geschaffen, aus einer Liste einzelne Zeilen in ein neues Tabellenblatt zu kopieren, so dass ich eine neue Liste zusammenstellen kann. Damit der jeweilige User die übersicht behält, habe ich dafür...
01.10.2014 11:25:42
Thread-ID: 1384275
2 Beiträge
Kopieren sichtbare Zellen b. ausgeblendeten Zeilen
Hubert Cimander
Hallo und guten Abend
mein Problem ist folgendes:
ich habe in den Zellen A1,A2+A3 die Werte 1,2+3 stehen.
Jetzt blende ich die Zeile 2 aus.
Danach möchte ich die sichtbaren Zellen (A1+A3) nach Spalte B kopieren.
Wenn ich das aber mache (ich kenne die Eingrenzung auf "nur sichtba...
01.11.2014 01:16:54
Thread-ID: 1389805
5 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