Supportnet / Forum / Tabellenkalkulation
variable einfügen
Frage
Hallo an alle,
ich habe eine Schleife in der ein Befehl vorkommt, aber der Befehl eigentlich 100 mal.
gibt es eine Möglichkeit eine Variable einzubauen, dass ich z.b. den Befehl
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
als Varaibe irgendwo bestimmten kann mit "kopieren" oder ähnlichem und dann nur noch kopieren in den Befehl schreiben. so dass ich den Einfügenbefehl falls ich ihn ändern will nur noch einmal verändern muss.
Wenn ja wie könnte ich den änder? und wo muss das stehen.
Danke
Antwort 1 von Primut
Hi Fragenkatalog,
leider ist mir nicht ganz klar, wie dein Problem genau aussieht.
Du wirst doch nicht 100-mal den gleichen Befehl in einer Schleife haben, sondern sicher den Befehl einfach in der Schleife 100 mal durchlaufen lassen.
Wie auch immer, hängt stark davon ab, wie der Befehl aussieht und wie er verwendet werden soll (Beispielsweise ob sich das Objekt schrittweise verändert o.ä.)
einfacher Vorschlag zu deinem Beispiel:
schreibe den "Befehl" einfach in ein neues Makro und rufe dieses Makro variabel auf, d.h. du brauchst für Änderungen nur den Inhalt des neues Makros ändern, nicht aber den Aufruf:
Du mußt bloß aufpassen, daß du dich in dem neuen Makro nicht auf Variablen beziehst, die dort nicht definiert sind, evtl. als
Gruß
leider ist mir nicht ganz klar, wie dein Problem genau aussieht.
Du wirst doch nicht 100-mal den gleichen Befehl in einer Schleife haben, sondern sicher den Befehl einfach in der Schleife 100 mal durchlaufen lassen.
Wie auch immer, hängt stark davon ab, wie der Befehl aussieht und wie er verwendet werden soll (Beispielsweise ob sich das Objekt schrittweise verändert o.ä.)
einfacher Vorschlag zu deinem Beispiel:
schreibe den "Befehl" einfach in ein neues Makro und rufe dieses Makro variabel auf, d.h. du brauchst für Änderungen nur den Inhalt des neues Makros ändern, nicht aber den Aufruf:
...
Call Variable
...
Sub Variable()
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End SubDu mußt bloß aufpassen, daß du dich in dem neuen Makro nicht auf Variablen beziehst, die dort nicht definiert sind, evtl. als
Public deklarieren.Gruß
- Primut

