Ich habe mir ein VBA-Makro in Excel geschrieben, um Kopiervorgänge und Textumsetzungen in HTML zu automatisieren. Den Code habe ich Buttons zugeordnet, damit es nur noch auf Klick passiert.
Das Ergebnis dieser HTML-Geschichte steht in einem Spaltenbereich, der je nach Eingabe eine verschiedene Größe haben kann.
Diesen Bereich muß ich kopieren.
Range("D5:D10").Select bis Range("D5:D30").Select
Das sind die möglichen. Nun wäre es prima, wenn man das Ende des Bereichs mit einer Variablen versehen könnte.
Außer die Case-Funktion zu benutzen ist mir nichts Besseres eingefallen.
Ideal wäre: Range("D5:D(X)").Select, da ich wegen der Case-Anweisung ja vorher den notwendigen Bereich ermittelt habe.
hw.schmidt
