Hallo,
ich habe in Word ein Formular erstellt, auf welchem sich Checkboxen befinden. Hinter jeder Checkbox steht letztlich eine Produktbeschreibung (Ablage im Word-Format). Beispiel: Apfel, Birne, Kirsche - jede Fruckt wird in einer einzlenen Word-Datei beschrieben.
Der Anwender soll jetzt wählen können, welche Früchte er dem Kunden anbieten möchte (in Form eines Angebots). Er soll seinen Wünsch mit Hilfe der Checkboxen kundtun können. Mit einem Klick auf Erstellen soll aus den gewählten Einzeldokumenten ein Gesamtdokument entstehen.
Das Formular steht, der erste Code (absoluter Beginner) auch:
Private Sub Erstellen_Click()
Dim rng As Range
Dim MainDoc As Document
Dim strFile As String
If (Apfel.Value = True) And _
(Birne.Value = True) And _
(Kirsche.Value = True) Then
Const strFolder = "T:\Unterlagen\Angebote\"
Set MainDoc = Documents.Add
strFile = Dir$(strFolder & "*.docx")
Do Until strFile = ""
Set rng = MainDoc.Range
rng.Collapse wdCollapseEnd
rng.InsertFile strFolder & strFile
strFile = Dir$()
Loop
ElseIf (Apfel.Value = True) And _
(Birne.Value = True) And _
(Kirsche.Value = False) Then
Set MainDoc = Documents.Add
strFile = Dir$(strFolder & "*.docx")
Do Until strFile = ""
Set rng = MainDoc.Range
rng.Collapse wdCollapseEnd
rng.InsertFile strFolder & strFile
strFile = Dir$()
Loop
End If
End Sub
Das funktioniert soweit grundsätzlich ganz gut. Jetzt stelle man sich vor, es kommen 10 weitere Früchte hinzu. Ich habe nun 2 Probleme:
1.) Wie selektiere ich zielführend auf die gewünschten Früchte? im obigen Beispiel screene ich den ganzen Zielordner und baue alles in einem Dokument zusammen, was dort liegt. das ist nicht der eigentliche Sinn...
2.) Die Prüfung über True/False ist bei einer hohen Anzahl an Früchten nicht mehr durchführbar, da es sehr, sehr viele Kombinationen gibt (Apfel und Birne ja, Kirsche neine, Kiwi ja, Mango nein a.s.o), die nicht mehr zu überschauen sind. Daneben könnte morgen das Produkt Kokosnuss dazukommen.
Ziel sollte also sein, anhand der Checkboxprüfung konkrete Einzeldateien ansprechen zu können, d. h. wähle ich die Checkboxen Kiwi, Birne und Mango, sollte er exakt diese Dateien im Zielordner suchen und nur diese zu einer Datei verknüpfen (wie oben).
Vielen Dank.
|