Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
18.04.2024 15:16:20
VBA Suchen, Kopieren, Einfügen
18.04.2024 15:16:07
Verschieben von Daten um bestimmte Zeilen nach unten
18.04.2024 15:13:44
Text ans untere Ende der Seite verschieben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1228to1232
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
1228to1232
1228to1232
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Löschen Inhalt Tabellenblatt

Löschen Inhalt Tabellenblatt
Georg
Hallo zusammen,
ich habe 2 Probleme.
1. Ich möchte den kompletten Inhalt des Tabellenblattes 'Excel-Dokument' löschen, wenn sich in den Feldern
B4 und B5 des Tabellenblattes 'Eingabe' kein Inhalt befindet.
2.Ich möchte vom Tabellenblatt 'Ecxel-Dokument' ein Word-Dokument erstellen. Habe aus dem Forum
eine Möglichkeit gefunden. Dabei wird aber ein bestehendes Word Dokument benutzt (z.B. Angebot.doc)
welches immer vorhanden sein muss. Im Worddokument kommt zwar alles richtig an, aber leider mit
allen Zellen wie in Excel. Gibt es keine Möglichkeit das Tabellenblatt komplett nur als Text in ein Worddokument zu übernehmen?
Vielen Dank für Eure Hilfe.
Gruss

Die Datei https://www.herber.de/bbs/user/76654.xls wurde aus Datenschutzgründen gelöscht

Georg

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:06:07
Josef

Hallo Georg,
wenn du die Tabelle etwas umgestaltest dann bekommt man das auch so hin. Man braucht auch keine Vorlage, man kann in Word einfach ein leeres Dokument erzeugen.
Zum löschen des Zellbereiches:

If Range("B4") & Range("B5") = "" Then
Sheets("Excel-Dokument").UsedRange.Clearcontents
End If
https://www.herber.de/bbs/user/76656.xls

« Gruß Sepp »

Anzeige
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:19:57
Georg
Hallo Sepp,
vielen Dank für Deine Antwort.
Das Löschen funktioniert wie gewünscht.
Das Erzeugen eines Word-Dokumentes ohne Zwischenablage passt auch.
Die Frage hätte ich noch, ob das Zellenraster von Excel immer nach Word
rüberkommt, oder ob dieses Raster auch ausgeblendet werden kann.
Gruß
Georg
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:30:19
Josef

Hallo Georg,
es wird zwar eine Tabelle in Word eingefügt, Raster ist bei mir aber keines sichtbar.

« Gruß Sepp »

Anzeige
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:37:09
Georg
Hallo Sepp,
mit Raster meinte ich auch die Umrisse des Tabellenblattes, welches schwach sichtbar ist. Es wird somit wohl immer eine Tabelle übergeben, oder kann auch nur der Textinhalt des Blattes nicht in Tabellenform übergeben werden?
Gruß
Georg
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:43:44
Josef

Hallo Georg,
ich hab dich schon verstanden, weiß allerdings nicht, warum bei dir die Tabellenumrisse sichtbar sind.
Versuch mal folgenden Code, ich bin aber nicht sicher, ob dieser unter deiner Office-Version läuft.

Sub versuch()
  Dim appWord As Object
  Dim doc As Object
  
  Dim sFile As String
  
  sFile = Sheets("Eingabe").Range("B7").Value & Sheets("Eingabe").Range("B8").Value
  If sFile = "" Then
    Beep
    MsgBox "Kein Vorname und Nachname eingegeben !!"
    Exit Sub
  End If
  
  Set appWord = CreateObject("Word.Application")
  Set doc = appWord.documents.Add
  appWord.Visible = True
  
  
  With ThisWorkbook.Sheets("Excel-Dokument")
    .Range(.PageSetup.PrintArea).Copy
  End With
  
  doc.Paragraphs(1).Range.PasteAndFormat (22)
  
  Application.CutCopyMode = False
  
  doc.SaveAs "C:\Excel\Zeugnis_" & Sheets("Eingabe").Range("B7").Value & "_" & Sheets("Eingabe").Range("B5").Value & ".doc"
  
  doc.Close False '*** das Dokument schließen ***
  appWord.Quit '*** Word beenden ***
  
  '*** Aufräumen ***
  Set appWord = Nothing
  Set doc = Nothing
  
  
End Sub



« Gruß Sepp »

Anzeige
AW: Löschen Inhalt Tabellenblatt
17.09.2011 23:56:13
Georg
Hallo Sepp,
Du hast Recht. Bleibt stecken mit Laufzeitfehler 438 'Objekt unterstützt die Methode nicht ....'
Und zwar bei dem Befehl ' doc.Paragraphs(1).Range.PasteAndFormat (22)'
Gibt es noch eine andere Lösung?
Gruß
Georg
AW: Löschen Inhalt Tabellenblatt
18.09.2011 10:23:46
Georg
Hallo Sepp,
im Anhang das erzeugte Word-Dokument auf meinem Rechner.
Vielleicht gibt es ja wie in meiner letzten Nachricht erwähnte eine andere Lösung.
Für Info wäre ich dankbar.
Gruß
Georg
https://www.herber.de/bbs/user/76660.doc
AW: Löschen Inhalt Tabellenblatt
18.09.2011 10:27:56
Josef

Hallo Georg,
bei mir sieht das Dokument OK aus. Liegt wahrscheinlich an der Office-Version.

« Gruß Sepp »

Anzeige
AW: Löschen Inhalt Tabellenblatt
18.09.2011 10:30:09
Georg
Hallo Sepp,
dann wird es wohl so sein. Vielen Dank für Deine Bemühungen.
Gruß
Georg

27 Forumthreads zu ähnlichen Themen

Tabellenblätter mit Inhaltsverzeichnis löschen | Herbers Excel-Forum
Heinz
Hallo
Ich suche seit geraumer Zeit nach der Lösung folgenden Problems:
Ich arbeite mit einer Arbeitsmappe mit ca. 100 verschiedenen Tabellenblättern. Für jede Einzelarbeit brauche ich davon ca. 10-30 Blätter. Die nicht benötigten Blätter möchte ich mittels Makro am Ende löschen.
Mittels...
04.01.2010 18:33:06
Thread-ID: 1127121
6 Beiträge
Anzeige
Tabelleninhalt mit Makro in Word löschen
Mike

Hallo,
habe in einem Word Dokument eine Tabelle eingefügt und möchte den Inhalt über ein Makro löschen. Leider funktionieren die Excel-VBA-Befehle nicht, da es keine Excel Tabelle ist. Ich möchte den Bereich "A2:C15" und "E17" löschen. Ich weiß, dass ich in diesem Forum eigentlich falsch bin...
25.05.2002 02:05:20
Thread-ID: 123603
2 Beiträge
VBA - Wordtabelle und Inhalt via Excel
HansP

Hallo!
Das ich über Excel und VBA eine Word-Tabelle mit Texten füllen kann (Textmarken) ist mir bekannt. Kann ich aber via VBA in Word eine bzw. mehrere Tabellen erstellen und diese komplett füllen? D.h. Ich muss einen einfachen Standardtext übergeben (z.b. Artikelnummer) und eine Variable...
07.12.2011 16:30:28
Thread-ID: 1241003
4 Beiträge
Anzeige
mittels VBA Zellinhalt löschen wenn
Michael

Hallo,
trotz intensiver Recherche komme ich einfach nicht weiter.
Ich möchte mittels VBA den Wert der Zelle F26 löschen, wenn in der Zelle C14 "Maus" steht. Ich weis dass ich das über die wenn Funktion machen könnte, aber die Zelle F26 muss beschreibbar bleiben. Im normalen "Betrieb" is...
12.03.2013 16:46:03
Thread-ID: 1303504
15 Beiträge
Inhalt je Tabellenblatt per VBA in andere Datei
janesch

Hallo Excel Freunde,
benötige mal Eure Hilfe beim folgenden Problem.
Zur Überprüfung der Ergebnisse (mögliche Formelnmanipulation) muss ich die Eingabedaten je Tabellenblatt in die Ursprungstabelle vornehmen.
Die 2 Dateien sind gleich aufgebaut(Anzahl der Tabellenblätter = 72 ) und...
07.08.2013 10:24:17
Thread-ID: 1326002
5 Beiträge
Textboxinhalt in dyn tabelle suchen und löschen
Spenski

huhu
ich möchte aus einer dyn tabelle werte löschen die gleich TextBox1 sind.
danach sollen die leerzeilen aus der tabelle raus. nicht nach unten sortieren sondern die grösse der tabelle auch anpasen.
geht sowas?
habs mit aufzeichnen versucht aber da kommt nix gescheites bei rau...
14.05.2014 17:28:36
Thread-ID: 1361643
3 Beiträge
VBA-Clear.Contents best. Zellinhalte nicht löschen
Debian

Hallo zusammen:-)
Ich bin auf den Fall gestossen, das in dieser Mappe (https://www.herber.de/bbs/user/94544.xlsm) im laufenden Monat zwar Leistungen erbracht/Artikel verkauft wurden, die Rechnung dafür aber nicht im selben Monat, sondern erst nach Abschluss eines Auftrages versendet werden...
24.12.2014 16:42:45
Thread-ID: 1399554
13 Beiträge
VBA alte Tabellenblätter löschen
Chris

Hey Leute,
per VBA muss ich ein neues Tabellenblatt erstellen, sobald dies erstellt ist sollen alle anderen Tabellenblätter gelöscht werden.
Wie kriege ich das mit einem VBA Makro hin?
Danke im voraus
Gruß Chris
28.09.2016 18:19:21
Thread-ID: 1517011
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
5
4
1
3
6
14
4
2
12
3
2
2
14
7
5
12
6
9
1
1
5
1
5
3
2