Hi Stefan,
Ich lasse das Makro über einen Button ausführen, weil sonst
wohl unser Virenscanner Alarm schlagen würde.
kenn mich da nicht aus, irgendwie ein schlechter Virenscanner, sobald mein Makro läuft, egal wie gestartet, habe ich die Macht über deinen Rechner, ich kann Dateien verändern, löschen, den Virenscanner löschen, die Festplatte formatieren…
Ein Makro starten ist wie eine Exe starten, das was drin steht wird gemacht.
Dadurch schließt sich aber ein Folgeproblem an - ich habe das
Excel-Blatt geschützt, nur bleibt der Schutz leider auch für
den Button bestehen. Den Button kann ich auch nicht im
Untermenü „Schutz“ freigeben. Hast Du auch noch ne Lösung
dafür? Irgendwo muss man das doch einstellen können…
Schreib anfangs des Codes:
ActiveSheet.Unprotect Password:=„abc“
und zum Ende hin:
ActiveSheet.Protect Password:=„abc“, DrawingObjects:=True, Contents:=True, Scenarios:=True
K.A. welche Excelversion du hast, die Parameter zu protect variieren je nach Version, schau in der Vba-Hilfe nach.
Zur Übergabe in WORD. Bei den Daten handelt es sich um zu
fertigende Etiketten, die auf dem Format 105 x 57 mm beruhen.
(Etiketten der Firma Avery No. 3425). Hierbei passen 10
Etiketten auf eine DIN A4- Seite, somit soll es also in eine
WORD-Tabelle mit 10 gleich großen Tabellenfeldern (Zeilen 5,
Spalten 2 - mit o.g. Abmaßen) fortlaufend eingefügt werden.
Aber wie schon gesagt, das wäre das absolute Sahnehäubchen.
Ich bin momentan schon happy, das hätte ich so nie hinbekommen
und deshalb nochmal ein großes DANKE an Dich!! :o)
Das geht prinzipiell. Kann sein einfach, kann sein daß wie üblich die Spaltenbreite Probleme macht. Die Zeilenhöhe ist damit verglichen problemlos.
Kleines Beispiel für die Spaltenbreitenproblematik:
/t/word-tabelle-in-excel-uebernehmen/4681664
Mit Word kenne ich mich nicht so aus, wenn es da bei Etiketten so einfach ist wie beim Seriendruck eine Exceltabelle als Quelle einzubinden so kriege ich das hin das mit in denien Code einzubinden.
Wenn nicht, kann ich nichts zusagen, ich schau halt mal.
Gruß
Reinhard