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

Excel Tabelle in Word einfügen, Laufzeitfehler 594

Forumthread: Excel Tabelle in Word einfügen, Laufzeitfehler 594

Excel Tabelle in Word einfügen, Laufzeitfehler 594
18.01.2013 10:43:54
Stephan
Hallo zusammen,
ich habe via VBA in Excel eine Tabelle kopiert und versuche, diese mit der VBA-Anweisung in Word:
Selection.PasteExcelTable False, False, False
in ein Worddokument zu integrieren. Allerdings wird gar nix eingefügt. Wollte gern die Formatierungen aus Excel beibehalten (z. B. ausgeblendete Zeilen nicht mitkopieren etc.).
Hat jemand eine Idee?
Danke vorab.
Stephan

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel Tabelle in Word einfügen, Laufzeitfehler 594
18.01.2013 10:46:16
Stephan
Der Laufzeitfehler im Verwendungszweck hat nix mit meiner Frage zu tun.

Excel Tabelle in Word einfügen
18.01.2013 15:43:57
Anton
Hallo Stephan,
probier sowas: 
Sub b()
Dim objExcel As Object, wkb As Object
Dim temp As Object, xlCellTypeVisible As Integer
xlCellTypeVisible = 12
Set objExcel = CreateObject("Excel.application")
objExcel.Visible = False
Set wkb = objExcel.Workbooks.Open("C:\tmp\mappe1.xls") 'anpassen
wkb.Sheets("Tabelle1").UsedRange.SpecialCells(xlCellTypeVisible).Copy
Set temp = objExcel.Workbooks.Add
temp.Sheets("Tabelle1").Paste
temp.Sheets("Tabelle1").UsedRange.Copy
Selection.Paste
temp.Close False
wkb.Close False
objExcel.Quit
Set objExcel = Nothing
End Sub

mfg Anton
Anzeige
;

Forumthreads zu verwandten Themen

"Datei öffnen"-Dialog mit Pfadvorgabe
Holger

Hallo Excelaner,
wie kann ich eine Application.GetOpenFilename("Dateityp (*.txt; *.log; *.dat),")
Anweisung auf einen fixen Pfad (z.B. "H:/Test/" ) ausführen?
Es soll also im "Datei öffnen"-Dialog der Pfad schon vorbelegt werden.
Für Hilfe wäre ich sehr dankbar!
Gruß Holge...
12.01.2011 14:51:59
Thread-ID: 1195263
6 Beiträge
Datei mit VBA öffnen im selben Ordner
Hei.Fisch

Hallo werte Excel und VBA-Gemeinde,
ich komme hier leider nicht weiter:
Ich möchte die Datei Kundenanalyse per VBA öffnen. Sie liegt im gleichen Ordner wie
die Excel-Datei, die das VBA-Programm enthält. Dieses soll die Datei Kundenanalyse öffnen, aus den darin enthaltenen Daten neu...
06.06.2011 11:37:51
Thread-ID: 1217411
3 Beiträge
Anzeige
Pfadangabe als Hyperlink deklarieren
Rookie

Hallo liebe Leute,
ich habe einen Code (dank eurer Hilfe!) mit dem ich bestimmte Dateien suchen und auflisten kann: Sub ordner_auflisten_neu() Dim vntRet As Variant, strTMP As String Dim pfad As String, ausgabe$() Dim i&, p& pfad = Master.Range("StrQOrdner").Value If Len(pfad) "\"...
07.07.2016 08:24:59
Thread-ID: 1503066
7 Beiträge
Anzeige
VBA Unterordner Tabelle öffnen
Mia

Hi,
For Each myfolder In folder.SubFolders
MsgBox (myfolder.Name)
If myfolder.Name Like "Ordner*" Then
fso.OpenTextFile (myfolder)
End If
Next
alles was dick markiert ist funktioniert ich möchte aber im letzten Schritt die Excel file im Ordner öffnen und in dieser ei...
02.03.2018 14:02:05
Thread-ID: 1611964
3 Beiträge
VBA Ordner suchen und öffnen
Dominic

Moin,
Ich habe in einer Excel Tabelle Projektnummern und jedes Projekt hat einen Ordner auf dem Server, kann ich mittels VBA im Ordner auf dem Server Projekte (wo die Unterordner der Projekte drin sind) den Ordner des Projekts mittels der Projektnummer finden? Der name der Projektordner ist...
22.11.2018 16:53:06
Thread-ID: 1658997
2 Beiträge
VBA Unterordner öffnen nur Teilstring bekannt
difi

Hallo Zusammen,
wie kann ich per VBA einen Unterordner öffnen bei dem nur ein Teilstring bekannt ist.
bsp.
D:/Test/
Unterordner (XXX abcd XXXXXX)
Der Teilstring [bsp. "abcd"] ist Variabel und steht in einer Zelle A2
Wie kann ich das an Shell "Explorer.exe /e übergeben...
21.03.2019 12:09:38
Thread-ID: 1682533
6 Beiträge
vba - explorerfenster für Profies
Heiko
Hallo erst mal,
hallo Profies.
Ich möchte meine Daten CD's archivieren.
Wie kann ich die cd struktur (Tree) über VBA speichern, so dass sie wie im
exlorer mit + bzw - gespeichert wir und ich die unterverzeichnisse durchklicken kann.
keine textdatei.
für eine Lösung wäre ich dankb...
04.05.2004 23:24:09
Thread-ID: 424278
4 Beiträge
VBA Ordner per Schleife öffnen
Excel

Hallo zusammen,
Ich habe einen Ordner auf dem Desktop (Projekt). In diesem befinden sich mehrere Unterordner. Diese besitzen widerum jeweils 2 bis 3 weitere Unterordner, in welchen sich widerum PDF Dateien befinden.
Wie schaffe ich es die PDFs zu auszuschneiden und eine Ebene höher einz...
09.12.2020 10:57:53
Thread-ID: 1798551
4 Beiträge
VBA Ordner per Schleife öffnen
Excel

Hallo zusammen,
ich hatte schon einmal einen Beitrag in diesem Forum gepostet und sehr gute Hilfe bekommen (shoutout an NEpumuk an dieser Stelle).
Hier mal meine alte Anfrage:
"Ich habe einen Ordner auf dem Desktop (Projekt). In diesem befinden sich mehrere Unterordner. Diese besit...
17.12.2020 13:07:24
Thread-ID: 1800281
2 Beiträge
Ordnerpfad als Hyperlink
Pascal
Hallo zusammen,
ich bin auf der Suche nach einer Möglichkeit einen Ordnerpfad als Hyperlink ausgeben zu lassen, abhängig von einem Eintrag in Spalte A.
Beispiel:
in A1 steht das Wort "Adresse" drin oder ein x-beliebiges anderes Wort. Das Makro sollte dann in einem bestimtmen Pfad (C:\Use...
30.06.2021 11:45:13
Thread-ID: 1837149
3 Beiträge
Hyerlink - falscher Speicherpfad
Bernd
Hallo zusammen,
in einer Übersichtsdatei hab ich eine Spalte mit einem Hyperlink zur Datei, jeweils von Zeile zu Zeile mit Ziel zu einer anderen Datei.
Aus irgend nem Grund hat sich nun der Dateipfad im Hyperlink angepaßt.(evtl. wegen der angehakten Option - Speichern unter... Tools... Webop...
30.05.2022 17:53:20
Thread-ID: 1885443
2 Beiträge
Anzeige
unterschiedliche Buchstaben in Textzellen finden
Rob

Liebe xls-Profis,
ich muss Kunden-Stammdaten von 2 Datenbanken vergleichen u habe folgende Aufgabe:
2 Textzellen miteinander vergleichen und Unterschiede finden und markieren.
Einfache Beispiele:
A1 B1
Huber Hubber hier sollte in der Zelle B1 z.B. mit be...
20.08.2008 10:26:10
Thread-ID: 1003114
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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