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

Excel Tabelle als Word speichern

Forumthread: Excel Tabelle als Word speichern

Excel Tabelle als Word speichern
08.12.2020 14:40:47
Norbert
Hallo Spezialisten
Ich habe eine Exceltabelle mit dem Blattnamen "Lieferschein". Nun möchte ich dieses Tabellenblatt als Lieferschein.doxc und als Lieferschein.pdf auf dem Desktop direkt abspeichert haben. Die Seiteneinrichtung soll von Excel übernommen werden (Druckbereich, Randeinstellung und Seitenauswahl sind dort eingestellt) Gibt es da evtl. schon ein VB-Lösung dafür?
Danke für die Bemühungen
Gruss Norbert
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel Tabelle als Word speichern
08.12.2020 15:31:01
fcs
Hallo Norbert,
es ist extrem mühselig, eine Worddatei von Excel aus komplett per VBA-Programmierung aufzubauen.
Insbesondere muss man sich in der VBA-Welt von Word und Excel sehr gut auskennen.
Gibt es da evtl. schon ein VB-Lösung dafür?
Es gibt nur grundsätzliche Vorgehensweisen.
Aber so ein Datentransfer ist immer eine maßgeschneiderte Lösung.
Da der Aufbau des Lieferscheins sich - außer der Zeilenzahl - ja nicht ändert, ist es besser eine Wordvorlage zu erstellen, die alle Basisformatierungen, die Einstellungen für das Seitenlayout, und eine Leer-Tabelle, ggf. mit Überschriftenzeile, enthält.
Dann muss man "nur" noch die Daten in den Zellen von Excel in die Zellen in Word übertragen und ggf. die Zeilenzahl der Wordtabelle anpassen.
LG
Franz
Anzeige
AW: Excel Tabelle als Word speichern
08.12.2020 15:54:23
Norbert
Hallo Franz
es gibt hier ein Code, dieser übernimmt mir nicht die Seiteneinstellungen von Excel und speichern nicht automatisch auch noch ein pdf: 
Sub Blatt_In_Word_Speichern()
Dim WinWord As Object
Dim WinDoc As Object
Dim Datei As String
Dim Verzeichnis As String
Dim SaveDummy As Variant
Dim MyWS As Worksheet
Application.ScreenUpdating = False
Set MyWS = ActiveSheet
Set WinWord = CreateObject("Word.Application")
With WinWord
.Visible = True
Set WinDoc = .Documents.Add
With WinDoc
Range(MyWS.PageSetup.PrintArea).Copy
WinWord.Selection.Paste
Application.CutCopyMode = False
End With
End With
Verzeichnis = "C:\Temp\"
Datei = MyWS.Cells(13, 1) & " " & MyWS.Cells(23, 1) & ".doc"
SaveDummy = als_word_speichern_unter(Verzeichnis & Datei, WinWord)
If SaveDummy  False Then
WinDoc.SaveAs Filename:=SaveDummy
Else
WinDoc.Saved = True
End If
WinDoc.Close
Set WinWord = Nothing
Set WinDoc = Nothing
End Sub


Function als_word_speichern_unter(VorgabeName As String, WinWord As Object) As Variant
With WinWord.FileDialog(msoFileDialogSaveAs)
.InitialFileName = VorgabeName
.FilterIndex = 3
If .Show Then
DocSpeichernUnter = .SelectedItems(1)
Else
DocSpeichernUnter = False
End If
End With
End Function

Anzeige
AW: Excel Tabelle als Word speichern
09.12.2020 11:23:15
Norbert
Hallo Franz
kannst du den Code weiterentwickeln?
Danke und Gruss
Norbert
AW: Excel Tabelle als Word speichern
09.12.2020 19:45:56
fcs
Hallo Norbert,
ich hab die Makros angepasst.
Hier eine ZIP-Datei. Sie enthält eine kleine Excel-Datei mit dem angepassten Makro und die generierten Word- und PDF-Dateien.
https://www.herber.de/bbs/user/142193.zip
- Seitenränder werden ins Worddokument übernommen.
- PDF-Datei wird aus dem Worddokument erstellt
- beim Speichern der Worddatei wird das Format Version 97-2003 verwendet. Hier das Makro anpassen, wenn neueres Format verwendet werden soll.
- Einstellen des Desktops als Speicherort.
Hier musst du ggf. anpassen und eine der als Kommentar eingefügten Zeilen verwenden.
- Anpassen des Styles für das Standard-Format für Absatz und Format.
Bei mir passte insbesondere der Zeilenabstand in Word nicht mit Excel überein.
Ich hab ein Untermakro eingebaut, das du ggf. anpassen musst
Die Zeile zum Starten dieses Makros im Hauptmakro hab ich als Kommentar vorbereitet.
LG
Franz
Anzeige
AW: Excel Tabelle als Word speichern
10.12.2020 16:27:28
Norbert
Hallo Franz
besten Dank für dein Support - funktioniert einwandfrei.
Hast einen Daumen hoch verdient.
Gruss Norbert
;

Forumthreads zu verwandten Themen

Registerkarte als csv separat speichern
Herbert

Hallo,
ich möchte eine Registerkarte per Knopfdruck auf einen Button (Steuerelement) in eine neue Datei im Ordner C:\Temp speichern. Anbei der Code zum Speichern im txt-Format. Kann man diese auf das Ausgabeformat csv modifizieren? Bin für jede Hilfe dankbar.
Gruß Herbert
Dim strSep...
16.10.2008 10:01:00
Thread-ID: 1016757
2 Beiträge
Anzeige
Tabellenblatt separat speichern als csv
Herbert

Hallo,
der beigefügte Code wurde mir freundlicherweise hier bereit gestellt. Aus einer Datei wird ein Tabellenblatt in eine neue Datei im Ordner C:\temp gespeichert. Das Dateiformat der neuen Datei ist csv. Die einzelnen Werte der neuen csv-Datei werden durch Semikolon getrennt. Ich benötig...
16.10.2008 16:07:00
Thread-ID: 1016905
6 Beiträge
Tabelle als PDF speichern
PeTeR

Hallo VBA-Freaks,
ich suche seit Stunden - finde aber nicht den exakt passenden Code, obwohl es zig Einträge zu dem Thema gibt.
Ich will eine Tabelle per VBA in PDF umwandeln u. drucken. Mein Code:
Application.ActivePrinter = "Adobe PDF auf Ne01:"
ActiveWindow.SelectedSheets.Pri...
25.10.2008 23:06:00
Thread-ID: 1019291
5 Beiträge
Als csv automatisiert speichern
Herbert

Hallo,
noch eine Frage zur Speicherung eines Excel-Sheets in eine neue Datei.
Die Ausgangsdatei hat eine Registerkarte. Der Inhalt dieser Registerkarte soll im Pfad C:\temp\sicherung als .csv-Datei abgelegt werden. Der Dateiname soll "Saldierung_aktuelles Datum.csv" sein.
Leider wir...
20.11.2008 12:02:00
Thread-ID: 1026369
2 Beiträge
Anzeige
Tabellenblätter einzeln als Datei speichern
murat

Hallo,
ich habe einen tollen VBA Code hier im Forum gefunden!
Ich möchte die einzeln Tabellenblätter als Datei Speichern. ich habe 20 Tabellenblätter in einer Datei aus der sollen 20 Dateien werden. Dateiname steht immer in Zelle C2 des jeweiligen tabellenblattes.
Der Code unten i...
13.01.2009 11:46:16
Thread-ID: 1039178
3 Beiträge
Alle Dateien als Excel97 speichern
WolfgangN

Hallo,
ich habe Excel2003 und möchte alle Excel-Tabellen aus einem Ordner (Excel-Tabellen) in einem anderen Ordner (PCShop) als Excel 97 Version speichern, um sie zu brennen und zu einem PC zu nehmen, wo nur Excel 97 installiert ist.
An den Dateien wird nichts geändert, soll nur als Exc...
12.02.2009 19:17:00
Thread-ID: 1050222
3 Beiträge
Möchte .xls in .csv umwandeln
Leo

Moin Moin zusammen,
ich raff` es einfach nicht wie ich meine .xls-Daten in eine .csv-Datei umwandeln lassen kann !!!
Wahrscheinlich ist es einfach zu spät am Abend bzw. zu früh am morgen !? ?! !?
Eine kurze Erklräung ist in der Datei vorhanden : https://www.herber.de/bbs/user/60320....
15.03.2009 04:29:27
Thread-ID: 1060323
4 Beiträge
Makro .CSV importieren/Exportieren
Hugo

Hallo,
muß eine .CSV Datei kommagetrennt in Spalten importieren.
Dann nach dem Bearbeiten wieder in eine .CSV Datei exportieren.
Benötigt wohl ein Makro.
Danke.
https://www.herber.de/bbs/user/60798.xls
29.03.2009 22:48:27
Thread-ID: 1065136
15 Beiträge
Tabelle als Text speichern, Dateiname aus Zelle
Jürgen

Hallo Excel-Profis,
ich möchte über ein Makro folgendes ausführen:
- das aktuelle Tabellenblatt soll im Textformat gespeichert werden
- das Dialogfeld "Speichern unter" soll am Bildschirm erscheinen
- der Dateiname soll aus der Zelle I1 in das Dialogfeld übernommen werden
Im...
08.04.2009 13:05:46
Thread-ID: 1067706
2 Beiträge
Tabellen als Grafiken exportieren
Christian

Hallo,
ich habe eine sehr breite Excel-Tabelle und würde diese gerne in ein Word-Dokument einfügen. Damit die Werte gut lesbar sind und sich auch die Fromatierung nicht ändert, würde ich gerne die Tabelle durch mehrere untereinanderstehende Grafiken in Word einsetzen. Im Prinzip also die ge...
24.06.2009 17:32:46
Thread-ID: 1084177
2 Beiträge
Daten aus csv in Tabelle
Daniel

Hallo zusammen,
mein Problem besteht darin, ich möchte aus einem festen Speicherort (z.B. C:/) 9 csv Dateien (gleicher Aufbau und immer gleich benannt) in eine bestehende Excel Datei (Auswertung.xls), in ein bestehendes Tabellenblatt (Menge) in die Spalten B - Inhalt der csv Datei 1, in Spa...
26.06.2009 07:48:35
Thread-ID: 1084276
2 Beiträge
Als *.csv bestimmte Bereiche speichern
mehmet

Hallo Forum,
wie kann ich bestimmte Bereiche als *.csv Datei speichern?
Wenn ich Makroaufzeichnung mache, wird alles gespeichert (;;;;;;;;;;;).
Beginnend soll die Abfrage Zelle H10.
Wenn H10 = leer, dann Makro ende, sonst nur Zelle C10, F10, G10, H10, i10 und AB10 als csv (;) sp...
16.11.2009 07:19:32
Thread-ID: 1117477
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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