Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1988to1992
1988to1992
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Variable per inputbox in eine Prozedur laden

Forumthread: Variable per inputbox in eine Prozedur laden

Variable per inputbox in eine Prozedur laden
02.09.2024 13:21:26
rmz
Hallo ihr VBA Profis,

ich habe bei euch u. s. Prozedur gefunden, und für meine Zwecke abgeändert.
funktioniert so ganz gut, nur muss ich die Max-Anzahl der Makro-Starts immer manuell ändern.
Ich möchte ich diese über eine Inputbox nach dem Makrostart in u. s. Prozedur eingeben können.
ich habe leider über die Suchfunktion nichts passendes gefunden, und keinen Plan wie das funktionieren könnte.


Sub Makro_mal_X()

Application.ScreenUpdating = False

Dim z As Integer
For z = 1 To 14
Call DatensatzKopieren
Next
Application.ScreenUpdating = True
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Variable per inputbox in eine Prozedur laden
02.09.2024 13:42:48
daniel
Hi

Probier mal: 

dim x as long

dim z as long



x = application.inputbox("Anzahl", Type:=1)

for z = 1 to x

    Call DatensatzKopieren

Next


Gruß Daniel


AW: Variable per inputbox in eine Prozedur laden
02.09.2024 15:31:17
rmz
Hallo Daniel,

du bist perfekt..., funktioniert genau so wie ich es mir gwünscht habe.

es dauert das natürlich eine weile bis 70-200 wiederholungen durchgelaufen sind.
da ich ScreenUpdating = False gesetzt habe, passiert auf dem Bilschirm lange nix.
gibt es ne möglichkeit einen Zähler (Infobox) mitlaufen bzw. anzeigen zu lassen wie oft das Makro "Datensatz kopieren" bereits gestartet wurde.

wenn es zu aufwändig ist, bitte keine Energie rein stecken
ich bis so schon mehr als zufrieden.

beste Grüße aus Unterfranken
Rainer
Anzeige
AW: Variable per inputbox in eine Prozedur laden
02.09.2024 15:40:56
Uduuh
Hallo,
möglicherweise kann man DatensatzKopieren beschleunigen.

Gruß aus'm Pott
Udo
AW: Variable per inputbox in eine Prozedur laden
02.09.2024 15:47:10
daniel
Hi

die einfachste Methode für so einen Zähler ist die Statuszeile am unteren Rand des Fensters.
Diese kann man für einfache Angaben nutzen und die ist auch aktiv, wenn der Bildschirm abgeschaltet ist: 

x = application.inputbox("Anzahl", Type:=1)

for z = 1 to x

    Application.Statusbar = "in Bearbeitung: " & z & " von " & x

    Call DatensatzKopieren

Next

Application.Statusbar = false


ich weiß ja nicht, was hinter deinem Makro "DatensatzKopieren" so steckt, aber vermutlich ist da noch Optimierungspotential vorhanden, vielleicht sollten wir da mal drauf schauen. Es ist beispielsweise so, dass wenn du Befehle wie Range(...).Copy oder Range(...).Delete ausführst, die benötigte Rechenzeit unabhängig von der Anzahl der Zellen in der Range ist. Dh Range("1:1").Delete dauert genauso lange wie Range("1:100000").Delete. Daraus folgt, wenn man solche Aufgaben nicht einzeln per Schleife durchführt sondern möglichst als Block für alle betroffenen Zellen gemeinsam, kann man solche Aufgaben extrem beschleunigen.

Gruß Daniel
Anzeige
AW: Variable per inputbox in eine Prozedur laden
02.09.2024 22:06:58
rmz
Hallo Daniel,

wie schon im Vorpost erwähnt, du bist spitze....!
Funktioniert super!

nomals vielen lieben Dank
Gruß Rainer
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige