Das Problem, das mir gegeben wurde, besteht darin, eine Worktabelle zu formatieren, bei der mehrere Zeilen basierend auf einem doppelten Datumswert zusammengeführt werden. In dem Beispiel unten, Spalte 1 zeigt die Datumswerten dupliziert und in Spalte 2 ist der entsprechende Text in diesem Zeitpunkt beziehen:Vergleichen von Werten in Wordtabellenzeilen und -spalten und Löschen oder Zusammenführen von Zellen
01/03/2017 Email von einem Email 2017.01.03 zu Subcommittee Durchlesen 01/03/2017 Durchsicht E-Mail von A 2017.01.03 Telefonanruf an Herrn D 2017.01.03 Telefonanruf von Herrn D 2017.01.03 Telefonanruf von Dr B
Was ich will am Ende mit ist das folgende:
01/03/2017 Durchsuchende E-Mail von A E-Mail an Unterausschuss Durchsicht E-Mail von A Telefonanruf an Herrn D Telefonanruf von Herrn D Telefonanruf von Dr B
Das heißt, ich ein Datum in Spalte 1 und will fusionierte Text in Spalte 2 I couldn Ich finde nicht viel Hilfe beim Programmieren in MS Word, da es mehr auf MS Excel ausgerichtet ist.
Ich weiß, dass ich verwenden kann:
If ActiveDocument.Tables.Count >= 1 Then
With ActiveDocument.Tables(1)
.Cell(Row:=1, Column:=1).Merge _
MergeTo:=.Cell(Row:=1, Column:=2)
.Borders.Enable = False
End With
End If
jedoch, dass nur eine einfache Zusammenführung ist, und ich brauche etwas komplexere auf der Grundlage der Kriterien, die ich oben erwähnt habe.
Ich hoffe, jemand kann helfen und mir in die richtige Richtung zeigen.
Vielen Dank für Ihre Kommentare. Ich würde liebend gerne den Code neu schreiben, der die Ausgabe erzeugt, aber es ist von einem gesperrten Softwareprogramm. Die Anforderung zum Formatieren der Tabelle ist ein nachträglicher Einfall des Benutzers. Da die Ausgabe viele Seiten lang sein kann, war dies lediglich ein Versuch, den Editor zu speichern, um mühsam bei jeder Änderung im Datumsfeld auszuwählen, zusammenzuführen und zu löschen. Ich werde darüber nachdenken, was ich tun kann. –