Projekt-Anfragen: Tel: 07022/9319004 info@CodeDocu.de Software Entwicklung in C# WPF Asp.Net Core Vba Excel Word SQL-Server EF Linq, UWP Net
#

Word Makro: Tabellen durchlaufen
 
In diesem Word Makro Code Beispiel werden alle Tabellen-Elemente in einem Word Dokument bearbeitet.
Dabei werden immer die Inneren Bereiche einer Tabelle übertragen als formatierter Inhalt zu einer anderen Tabelle.
Gezeigt wird: Word Tabellen, Selection und Range

 
Tutorial:

 
 
Der komplette Word Makro Code in vba (visual basic for applications):

Sub Makro1()
 
'< init >
Dim doc As Document
Set doc = ActiveDocument
'</ init >

Dim intCount As Integer
intCount = doc.tables.Count
'half 4->2
Dim intHalf As Integer
intHalf = intCount / 2
 
'--< Table >--
Dim iTable As Integer
For iTable = 1 To intHalf
'----< inLoop: table >----
'-< source >-
Dim source_Table_Range As range
Set source_Table_Range = doc.tables(intHalf + iTable).range
source_Table_Range.Select
Selection.Copy
'-</ source >-
 
'-< target >-
Dim target_Table_Range As range
Set target_Table_Range = doc.tables(iTable).range
target_Table_Range.Select
Selection.Delete
Selection.PasteAndFormat wdFormatOriginalFormatting
'-</ target >-
'----</ inLoop: table >----
Next
End Sub
 

 
Mobile
»
Zwischenspeicher als Bild mit 19 Zentimeter Breite einfügen
»
MS Word: Einfügen Paste Ereignis in Word einbauen
»
Word Code: Word Find
»
Word Makro: Alle Sätze markieren und Markierungen wieder löschen
»
Word Makro: Word automatischer Zoom auf 100% beim Dokument öffnen
»
Word Makro: Tabellen durchlaufen und Inhalt kopieren und Einfügen
»
Word Makro: Automatische Korrektur von falschen Übersetzungslinks
»
Word Makro: Einfügen von neuen Zeilen nach einer Textmarke

.

Jobs, Projekte, Angebote für Freiberufler, Selbstständig an Info@CodeDocu.de