Ich habe eine Tabelle die von Excel in Word überführt werden soll. Da in der Tabelle nicht in allen Zellen ein Wert errechnet wird, jedoch eine Funktion hinterlegt ist, möchte ich nur die Zelle mit Wert und die am Ende zusammengerechnete Summe übertragen.
Ich hab mit nem Kollegen schon die VisualRange definiert, kommen aber nicht weiter.
12.10.2015, 16:22 (Dieser Beitrag wurde zuletzt bearbeitet: 12.10.2015, 16:35 von snb.)
Code:
Private Sub CommandButton1_Click() with getobject("C:\Users\ruehlt\Documents\TobiasRühl.dotx") .variables("Preis")=Tabelle2.cells(35,5).value .fields.update .windows(1).visible=true end wtih End Sub
Setze in Word Dokument wo erwünscht ein 'DOCVARABLE Field', namens "Preis"
Hi, da nicht klar ist, wie oft dieser Copyvorgang laufen soll, hier mein Vorschlag für wenige Fälle:
Kopieren mit dem vorhandenen Code, funktioniert bei mir einwandfrei und danach in Word einfach die Leerzeilen manuell löschen, fertig.
Alternativ:
schaut den Code https://groups.google.com/forum/#!topic/...GYRNvyylbo, da werden nur die gefüllten Zellen kopiert in anderen Bereich. Das könnte als Zwischenschritt ja auch bei euch passieren, danach dann den zusammenhängenden Bereich nach Word kopieren.
Ich hab es jetzt ein bisschen anders gelöst, da ich & mein Kolleg uns mit VBA nicht wirklich auskennen. Wir haben es jetzt über nen Filter gemacht ( leer abwählen) und schon bekommen wir das gewünschte Ergebniss. Ist nicht die beste Variante.
Da meine Tabelle immer am Anfang meines Worddokument steht und ich dieses jedoch in einer Vorlage einbinden möchte, in dem die Tabelle Zwischen 2 Texten steht wie kann ich diese definieren bw. was muss ich in meiner Wordvorlage beachten.
