Office: Makrorekorder

oder auch "Makrorekorder was machst du da bloß" *grins

Hallo allerseits

Dieser Artikel richtet sich an alle, die Makros aufzeichnen und auch ein wenig bearbeiten wollen.

Notwendige Vorkenntnisse:
Wie man Makros aufzeichnet, die Entwicklungsumgebung öffnet
Artikelinhalt:
Weg mit den Select, Erklärung des Objektmodells, Grundlegende VBABegriffe

Wenn Sie die Beispiele testen wollen, öffnen Sie eine neue leere Mappe

Starten Sie eine Aufzeichnung:

• Geben sie dem Makro den Namen Aufzeichnung
• Markieren Sie Zelle C4
• schreiben Sie in diese Zelle MOF
• drücken Sie die Taste Enter (Return)
• schreiben sie in die Zelle Übung
• drücken Sie die Taste Enter (Return)
• schreiben sie in die Zelle =Anzahl2(C4:C5)
• drücken Sie die Taste Enter (Return)

Wenn sie sich nun das Makro anschauen, müßte folgendes in einem allgemeinen Modul der Mappe abgelegt sein:

Code:

Im Code habe ich jetzt die einzelnen Zeilen dokumentiert, Sie können selbiges auch machen, indem sie ein Hochkomma an erster Stelle einfügen.
Der Rekorder gaukelt jetzt einem vor, das der Cursor bewegt werden muß, nur diese SELECT Anweisungen sind vollkommen überflüssig!
Ebenso diese Standardeigenschaft bei Eingaben (.FormulaR1C1), das normale Eingaben zuläßt, sowie auch Formeln. Da der Rekorder eben nicht weiß, ob ich eine Formel oder ein „normaler“ Eintrag erzeugt wird, wird eben diese Eigenschaft bei einer Aufzeichnung genutzt.
Für Zelleingaben sollte die Eigenschaft .value gewählt werden. (diese könnte in VBA sogar weggelassen werden, da dies die Default Eigenschaft ist.)

Code:

Bereich C4 soll den Eintrag MOF erhalten.
Vielleicht ist Ihnen aufgefallen, dass ich für die Zelle C4 die Bezeichnung Bereich verwende.
dazu eine kleine Exkursion des Objektmodells in Excel

1. Application-Objekt (kann bei einfachen Makros, die durch Aufzeichnung entstanden sind wegfallen)
2. Workbook-Objekt (in welcher Arbeitsmappe)
3. Worksheet-Objekt (in welcher Tabelle)
4. Range-Objekt (in welchem BEREICH)

Beispiel:
Code:

das würde im Bereich von A1 bis D3 eine Eins eintragen.
Range kann aber auch noch anders wiedergegeben werden
Code:

Die Formel =ANZAHL2(C4:C5) ist aber nicht gerade gut leserlich.

statt dem .FormulaR1C1 kann auch

.Formula
.FormulaLocal

verwendet werden
Code:

Nun noch ein Beispiel mit einer aufgezeichneten Formel.

• Starten Sie die Aufzeichnung
• vergeben Sie für das Makro den Namen Formel
• klicken Sie auf die Zelle H1
• geben sie folgende Formel ein =WENN(A1="";D1*E1;"x")
• beenden Sie die Aufzeichnung

=WENN(A1="";D1*E1;"x") mal in Sprache übersetzt
(wenn in der Zelle A1 nichts steht, multipliziere Zelle D1 mit E1 ansonsten schreibe den Text x in die Zelle)

folgendes müsste jetzt im Modul stehen
Code:

Ich glaube fast der Code spricht für sich, entscheiden Sie selber, welcher von den Beiden besser lesbar ist.

Nun geht es weiter mit dem Objektmodell:
Angenommen ich möchte etwas in einem anderen Tabellenblatt ausführen.
Zeichnen Sie einmal folgendes auf.

• Starten Sie die Aufzeichnung
• vergeben Sie für das Makro den Namen kopieren
• Markieren sie in der Tabelle1 den Bereich von C4:C6
• kopieren Sie diesen
• wechseln Sie auf die Tabelle2
• klicken Sie auf die Zelle C4
• Befehl einfügen
• beenden Sie die Aufzeichnung.

folgendes müsste jetzt vorliegen
Code:

sehen wir uns einmal das Objektmodell an indem wir unsere Referenz um das Worksheet erweitern

möchte ich, dass in einem bestimmten Tabellenblatt etwas ausgeführt wird, kann folgendes verwendet werden.

Code:

so das wars mal fürs erste.

eine sehr gute Erklärung finden sie auch hier
Online - Excel Programmierung VBA Makro: Achtung Makrorekorder oder Wer selektiert denn da?

alle VBACodes wurden mit
Code eingefügt mit dem MOF Code Converter
eingefügt.

:)

 

Hallo Allerseits

da ich in letzter Zeit immer wieder lese, "wie kann ich im Hintergrund Excel öffnen".
Habe ich dazu ein paar Tutorials erstellt.

Code:

jetzt noch eine Spielerei wo ich Daten aus einer "unsichtbaren" Mappe in die aktuelle übertrage.

Code:

 

Hallo Chris
Danke fuer die Muehe des zusammenfassens.
gruss hary

 

Hallo Chris,

DANKE für die Mühe!

Ich will folgenden Code schlanker machen.

Das Copy und Paste schlanker machen geht auch wunderbar, aber das Einfügen (neue Zeilen einfügen) bekomme ich dann nicht hin.
Wie geht das denn?

DANKE
hugolee

 

Hi Hugo,
Code:

 

DANKE Beverly !!!

 

Hallo Hugo

sry, erst jetzt gesehen... ich komme im Moment einfach zeitlich nicht dazu ins
Forum zu schauen bzw. auch was zu schreiben..*frown.gif*
Ich hoffe das ändert sich bald...
und danke an Karin!

 

Hallo
Ich hoffe ich bin hier richtig mit meinem anliegen.

möchte per schaltknopf ein bild in einem ordner auf der festplatte auswählen das dann verkleinert in die active zelle eingefügt wird und beim drauf klicken gößer wird
danke für eure hilfe

 

Hallo,

Der Artikel sollte eher eine allgemeine Hilfestellung und Anleitung sein. Konkrete Fragen, die nichts mit dem Artikel direkt zu tun haben, bitte in einem eigenen Thread im Forum eröffnen, damit dieser hier übersichtlich bleibt. Im Forum wird Dir bestimmt jemand helfen.

Grüße
EarlFred

 

Danke für die rasche antwort

war auf der suche und habe deinen artikel ob gelesen der sehr ausführlich und für ein VB wields.. wie mich auch verständlich ist
da ich das makro dringend benötige habe ich mich auf diesem weg herangewagt
dachte es sind ein paar zeilen code die hier her passen

trotzdem danke

 

Hallo,

Du kannst doch einfach ein neues Thema erstellen:
http://www.ms-office-forum.de/forum/...splay.php?f=29
Unten Links auf den Button "Neues Thema" und dort Deine Frage erstellen (hineinkopieren). Es findet sich bestimmt wer, der was dazu schreiben kann.

Grüße
EarlFred

 

Danke - genau die Erklärungen, nach denen ich gesucht habe*Smilie

Gruß,
MrLinux