Clever-Excel-Forum

Guten Morgen zusammen,
ich habe eine vermessene Bitte:
ich habe eine Tabelle, die mir jeden Tag neu zugesendet wird und die ich jedesmal (auf die immer gleiche Weise) formatieren muß, also
a) diverse Spalten in der Breite verändern (bspw. Spalte A auf Breite 10)
b) diverse Spalten löschen (bspw. Spalte D)
c) die Tabelle nach Kriterium "Produkt" (bspw. Spalte C) sortieren
d) die Tabelle von Ausrichtung Hochformat auf Querformat umstellen
e) den linken Seitenrand auf Breite 0,3 anpassen

Üblicherweise habe ich bei solchen Sachen immer mit dem Rekorder gearbeitet, aber da müsste man im Falle einer Änderung ja wirklich alles neu machen...
Da ich mich jetzt überhaupt nicht mit der Programmierung von Makros auskenne, aber trotzdem für die Zukunft "gerüstet" sein will, wenn sich da mal Kleinigkeiten ändern, wollte ich fragen, ob Ihr mir ein Makro-Beispiel anhand der oben angegebenen Klammer-Beispiele geben könnt?!
Dann könnte ich das bei Änderungen selbst anpassen Smile

In jedem Fall vielen Dank vorab und bleibt gesund
Klaus
PS: kann man sich einen Makro-Button eigentlich auch oben ins Menü-Band legen?

Dieser Code

Code:
Sub Einstellung()

    Columns("A").ColumnWidth = 10

    Columns("D").Delete Shift:=xlToLeft

    With ActiveSheet.PageSetup

        .Orientation = xlLandscape

        .LeftMargin = Application.InchesToPoints(1.18110236220472)

    End With

End Sub

macht alles, ausser c), denn das geht nicht so allgemein ohne Kenntnis der Tabelle. Kannst mich dazu auch direkt fragen.

Es gibt eine Menüleiste für Schnellzugrriff. Da kann man einen Makrozugang reinlegen. Praktish und schnell.

LG Raoul

Hallo,

zwar bin ich kein Freund des Makrorekorders, aber das wäre eine Aufgabe, die man damit durchaus lösen könnte. Einfach die überflüssigen Select-Anweisungen raus nehmen und gut ist. Nach deiner schwammigen Beschreibung wie "diverse Spalten" "beispielsweise Spalte C" lässt sich ohnehin nichts erstellen.

Hi Raoul,
vielen lieben Dank für das Makro, werde ich nachher gleich mal "einbauen" Smile

Schönen Tag wünscht
Klaus

OK Klaus, gib Bescheid, wie Du damit klar kommst. LG, Raoul

Calafati

Raoul21

Klaus-Dieter

Calafati

Raoul21