Excel Makros

[Frodo01]

Ich möchte mal ein paar selbst geschriebene Makros reinstellen,

das ganze lässt sich um Transversalen und sonstige Satzmöglichkeiten

erweitern. Ich habe noch ein kleines Testprogram, das mit Strg s gestartet wird.

vielleicht hat jemand noch verbesserungsvorschläge oder konkrete Anwendungen,

da für mich programmieren noch ein relatives Neuland ist, brauchts manchmal etwas länger.

Nachdem es mit dem Anhang offensichtlich nicht klappt, stell ich mal den Quelltext rein, der muß dann

nur in ein Modul reinkopiert werden. Wenn man das direkt ins Workbook reinkopiert startet das Program automatisch.

Hätte fast vergessen, Tabelle1 must in Test umbenannt werden oder Sheets("Test").Activate in Sheets("Tabelle1").Activate. Auch fehlt noch eine Fehlerroutine, da bei Abbruch oder Enter in der Inputbox, es zu einer Fehlermeldung kommt. Anscheinend kann ich hier auch keine rar Dateien ranhängen

Gruss Matthias

Test.txt

bearbeitet Februar 3, 2009 von Frodo01