Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Checkbox in Word einfügen, Abfrage Bedingung aus Excel
zurück: Problem Hyperlinks im Serienbrief \ gelöscht weiter: Feldfunktion "Titel" im Serienbrief Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
21. Apr 2007, 14:26
Rufname:

Checkbox in Word einfügen, Abfrage Bedingung aus Excel - Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Hallo,

ich bin mit Word nicht sonderlich vertraut, habe es immerhin hingekriegt einen Serienbrief zu erstellen Very Happy . Jetzt müsste ich noch 3 x 2 Kontrollkästchen (ja / nein) einfügen, die je nach Datenlage in der Excel-Serienbriefquelle leer oder ein Kreuz beinhalten.
Lässt sich so etwas bewerkstelligen?

Danke!
Hübi
Es gibt immer bessere Lösungen, als meine.


Verfasst am:
21. Apr 2007, 17:07
Rufname: Hübi (selten Herbert)
Wohnort: Strausberg


AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Hi,

ich würde eine ganz normale Wenn... Dann... Sonst... -Bedingung einfügen
{ IF { MERGEFIELD Datenfeld } = "ja" "angekreuzt" "nicht angekreuzt" } { IF { MERGEFIELD Datenfeld } = "ja" "nicht angekreuzt" "angekreuzt" }

und an die Stellen angekreuzt und nicht angekreuzt die Symbole aus Wingdings 2 einsetzen.

Die Feldansicht wechselt man mit Alt+F9, die {} werden mit Strg+F9 erstellt.

_________________
Gruß Hübi
[Tipps getestet mit Win XP Prof. SP-2, Office 2000 Premium SP3 / Office 2003 Prof. SP3 / Office Professional 2007 SP1]
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
22. Apr 2007, 06:45
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Guten Morgen Hübi,

vielen Dank, ich werde es morgen testen und melde mich dann!

Einen schönen Sonntag,

Gruß

1cyber

Edit:

Ich bräuchte noch einen Hinweis, wie der Speicherort der Datenquelle beschrieben wird, es handelt sich um eine Excel-Datei:

{ IF { C:\Daten\Berechnung\WordSerienbriefQuelle.xls H1:H145 = "ja" "angekreuzt" "nicht angekreuzt" } }

Ist das so korrekt?

Danke!
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
22. Apr 2007, 08:44
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Sorry, selbst der Ort an dem ich:

{ IF { MERGEFIELD Datenfeld } = "ja" "angekreuzt" "nicht angekreuzt" } { IF { MERGEFIELD Datenfeld } = "ja" "nicht angekreuzt" "angekreuzt" }

einfügen soll, ist mir unklar!


Embarassed
Hübi
Es gibt immer bessere Lösungen, als meine.


Verfasst am:
22. Apr 2007, 09:19
Rufname: Hübi (selten Herbert)
Wohnort: Strausberg


AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Hi,

du hast das Seriendruck-Hauptdokument erstellt - damit kennt Word die Datenquelle.
An den Stellen, wo die "Kontrollkästchen" erscheinen sollen, fügst du dies ein
{ IF { MERGEFIELD Datenfeld } = "ja" "angekreuzt" "nicht angekreuzt" } { IF { MERGEFIELD Datenfeld } = "ja" "nicht angekreuzt" "angekreuzt" }
Im Beispiel wird das Seriendruckfeld (MERGEFIELD) Datenfeld ausgewertet. Wenn darin ja steht, wird im roten IF-Konstrukt das angekreuzte Zeichen dargestellt, im blauen Bereich ein leeres Quadrat (nicht angekreuzt). Steht dort nicht ja, ist die Dastellung umgekehrt.

Natürlich musst du die Sache an deine Bedingungen anpassen. In H1 steht Datenfeld, in H2:H145 jeweils ja oder nichts.

In Wingdings 2 findest du die Zeichen für angekreuzt und nicht angekreuzt - die musst du natürlich statt der Wörter benutzen. Ich kann es hier leider nicht darstellen.

_________________
Gruß Hübi
[Tipps getestet mit Win XP Prof. SP-2, Office 2000 Premium SP3 / Office 2003 Prof. SP3 / Office Professional 2007 SP1]
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
22. Apr 2007, 09:46
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Hi Hübi,

vielen Dank, es wird schon klarer!
Ich hatte gedacht, ich müsste das fertige Kontrollkästchen konfigurieren.

Embarassed

Bis dann,

1cyber
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
25. Apr 2007, 21:18
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Hallo Hübi,

ich möchte mich noch einmal bedanken, hat ein bisschen gedauert - aber es klappt jetzt bestens.

Very Happy
Dr_Leech
Gast


Verfasst am:
11. Sep 2007, 17:32
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Ich hatte ein sehr ähnliches Problem, und nun funktioniert es.


Herzlichen Dank für diesen Thread an Ersteller und Beantworter Wink


mfg Dr_Leech
Gast



Verfasst am:
26. Nov 2008, 13:28
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

Wunderbar - so klappt es sehr gut. Lob für Dich!
1cyber
Excel Semi-Kenner ohne VBA


Verfasst am:
27. Nov 2008, 19:37
Rufname:

AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office XP (2002)

N'Abend!

Ich hatte mal Daten aus Excel in ein Word-Dokument gebracht, dort wurden bestimmte Teile per Makro zu Kontrollkästchen.

Code:
Sub Kontrolkaestchen()

' !XXXX!
' !0000!

' !XXXX! im Datensatz wird zu -> "Checkbox an"      -      !0000! im Datensatz wird zu -> "Checkbox aus"

Selection.HomeKey Unit:=wdStory, Extend:=wdMove
Selection.Find.ClearFormatting
With Selection.Find
    Do While .Execute(FindText:="!XXXX!", Forward:=True, _
            Format:=False) = True
       
        Selection.FormFields.Add Range:=Selection.Range, Type:=wdFieldFormCheckBox
        Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
        With Selection.FormFields(1)
            .EntryMacro = ""
            .ExitMacro = ""
            .Enabled = True
            .OwnHelp = False
            .HelpText = ""
            .OwnStatus = False
            .StatusText = ""
            With .CheckBox
                .AutoSize = True
                .Size = 11
                .Default = True
            End With
            Selection.Font.Size = 11
            Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdMove
            Selection.Collapse
        End With
    Loop
End With

' !0000! im Datensatz wird zu -> "Checkbox aus"

Selection.HomeKey Unit:=wdStory, Extend:=wdMove
Selection.Find.ClearFormatting
With Selection.Find
    Do While .Execute(FindText:="!0000!", Forward:=True, _
            Format:=False) = True
       
        Selection.FormFields.Add Range:=Selection.Range, Type:=wdFieldFormCheckBox
        Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
        With Selection.FormFields(1)
            .EntryMacro = ""
            .ExitMacro = ""
            .Enabled = False
            .OwnHelp = False
            .HelpText = ""
            .OwnStatus = False
            .StatusText = ""
            With .CheckBox
                .AutoSize = True
                .Size = 11
                .Default = False
            End With
            Selection.Font.Size = 11
            Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdMove
            Selection.Collapse
        End With
    Loop
End With

End Sub




Kontrollkaestchen1.doc
 Beschreibung:

Download
 Dateiname:  Kontrollkaestchen1.doc
 Dateigröße:  38 KB
 Heruntergeladen:  628 mal

Gast



Verfasst am:
05. Jun 2009, 13:17
Rufname:


AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel - AW: Checkbox in Word einfügen, Abfrage Bedingung aus Excel

Nach oben
       Version: Office 2003

Danke für die Info !

Genau das, was gesucht war bekommen.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Word Serienbriefe: IF Abfrage Mehrere "Briefe" aufs selbe Blatt 4 Martin2 4118 19. Sep 2012, 16:36
schneise IF Abfrage Mehrere "Briefe" aufs selbe Blatt
Keine neuen Beiträge Word Serienbriefe: Bilder in Serienbrief einfügen 4 Konte 10453 05. Aug 2009, 15:28
charlybrown Bilder in Serienbrief einfügen
Keine neuen Beiträge Word Serienbriefe: Problem bei Uhrzeit von Access Abfrage in Word Serienbrief 8 bikemike1020 7897 17. Okt 2008, 12:00
Ina Problem bei Uhrzeit von Access Abfrage in Word Serienbrief
Keine neuen Beiträge Word Serienbriefe: Zeilenabsatz nach Bedingung eines Seriendruckfeldes erzwinge 3 Spawnhunter 1086 17. Jul 2007, 10:52
Spawnhunter Zeilenabsatz nach Bedingung eines Seriendruckfeldes erzwinge
Keine neuen Beiträge Word Serienbriefe: Word Serienmnail auf Basis einer Access Abfrage 0 adamth 793 11. Jun 2007, 22:26
adamth Word Serienmnail auf Basis einer Access Abfrage
Keine neuen Beiträge Word Serienbriefe: Manuellen Seitenumbruch einfügen 1 BWolf 1401 16. Mai 2007, 21:05
Hübi Manuellen Seitenumbruch einfügen
Keine neuen Beiträge Word Serienbriefe: Leerzeile einfügen??? 5 tupelo1308 4360 27. März 2007, 22:20
shifra Leerzeile einfügen???
Keine neuen Beiträge Word Serienbriefe: Bedingung wenn im SD-Feld bestimmte Buchstaben vorkommen 1 woamo 1506 23. März 2007, 12:27
woamo Bedingung wenn im SD-Feld bestimmte Buchstaben vorkommen
Keine neuen Beiträge Word Serienbriefe: Einfügen einer Grafik (immer andere, je nach Kunden) 10 betti 3732 08. Mai 2006, 18:43
Hübi Einfügen einer Grafik (immer andere, je nach Kunden)
Keine neuen Beiträge Word Serienbriefe: Serienbrief mit Bedingung 4 front 6445 31. März 2006, 12:36
front Serienbrief mit Bedingung
Keine neuen Beiträge Word Serienbriefe: zusätzliche Zeilen in Seriendokument einfügen 4 Hunter211 1189 28. März 2006, 16:54
Hunter211 zusätzliche Zeilen in Seriendokument einfügen
Keine neuen Beiträge Word Serienbriefe: Einfügen einer Tabelle aus einem Word-Dokument in einen SB? 13 Gast 4734 26. März 2006, 18:30
Ina Einfügen einer Tabelle aus einem Word-Dokument in einen SB?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel-Formeln