Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Automatische aktualisierung bei Serienbriefen in Word

Frage Microsoft Microsoft Office

Mitglied: attilla

attilla (Level 1) - Jetzt verbinden

05.09.2011, aktualisiert 14:03 Uhr, 3613 Aufrufe, 1 Kommentar

Hallo, bin neu in diesem Forum, hoffe ihr könnt mir weiterhelfen.

Aufgabe: Ich soll über Word 07 einen Serienbrief erstellen. Der Serienbrief soll eine Einladung sein, über eine Textbox wird der Name dargestellt.
Je nachdem wie Kurz bzw. Lang der Name ist soll er entsprechend größer bzw. kleiner gemacht werden.


Dazu hab ich den unten stehen Programmcode benutzt, was auch prima funktioniert.
Problem: Das Problem was ich habe wenn ich einen Seriendruck starte und vorher das Makro ausgeführt habe, verändert das Makro nur die
Seite die akutell geöffnet ist die restlichen bleiben unverändert.

Ziel: Ziel ist dass, das Makro für jede Seite (Einladung) ausgeführt wird beim drucken.


info: Wenn man bei Word auf <Sendungen --> Fertigstellen und zusammenführen --> einzelne Dokumente bearbeiten> geht alle Seiten aufruft und
dann erst das Makro ausführt geht das aber bei einer großen Datenbank dauert das zu lang ca. 20h.

01.
Sub ScaleTextboxText() 
02.
Dim shp As Shape 
03.
For Each shp In ActiveDocument.Shapes 
04.
 If shp.TextFrame.HasText = True Then 
05.
  With shp 
06.
    ' erst hochskalieren, falls die Textbox nicht ausgefüllt wird 
07.
    Do While .TextFrame.Overflowing = False 
08.
      .TextFrame.TextRange.Font.Size = .TextFrame.TextRange.Font.Size + 1 
09.
    Loop 
10.
    ' herunterskalieren, falls die Textbox überfüllt wird 
11.
    Do While .TextFrame.Overflowing = True 
12.
      .TextFrame.TextRange.Font.Size = .TextFrame.TextRange.Font.Size - 1 
13.
    Loop 
14.
     
15.
  End With 
16.
 End If 
17.
Next shp 
18.
End Sub
Mitglied: GUTEfrage
02.11.2011 um 16:17 Uhr
Hallo,

warum soll der Name denn kleiner gemacht werden? Wenn ich einen Doppelnamen hätte, dann würde ich es bevorzugen, wenn dieser auch so auf der Einladung steht.

Wie wär es denn, anstatt der Textbox einen freien Platzhalter zu verwenden, der ganz "stupf" den Namen (so wie er in der Datenbank steht) an den dafür vorgesehenen Platz stellt.

Das Funktioniert sowohl bei einem Brief, als auch bei Briefumschlägen.

Dann braucht man auch kein Makro und auch nur die Daten "zusammenführen" und FERTIG.


Vielleicht hat´s ja weitergeholfen,

Gruß
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
EXCEL 2016 Wie Tabellenblatt gegen automatische Aktualisierung sperren?

Frage von Hobi84 zum Thema Microsoft Office ...

Backup
Automatische Private Backupsoftware für DAUs (4)

Frage von Nexder zum Thema Backup ...

Microsoft Office
Formel-Funktion in Word produziert unsaubere Resultate bei Indizes (1)

Frage von Yauhun zum Thema Microsoft Office ...

Microsoft Office
gelöst Word Ausdruck graue Striche bei einer geschützten Ansicht (6)

Frage von blacky85 zum Thema Microsoft Office ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(5)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Statische Routen mit Shorewall, ISC-DHCP Server konfigurieren für Android Devices (24)

Frage von terminator zum Thema LAN, WAN, Wireless ...

Server
gelöst Wie erkennen, dass nur deutsche IPs Zugang zu einer Website haben? (22)

Frage von Coreknabe zum Thema Server ...

Hardware
16-20 Port POE Switch mit VLAN (16)

Frage von thomasreischer zum Thema Hardware ...

Windows Server
Exchange HyperV Prozessorlast (16)

Frage von theoberlin zum Thema Windows Server ...