Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
16.10.2025 00:15:51
Passwort im Herbersforum ändern
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
376to380
376to380
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

makro im hintergrund ausführen

Forumthread: makro im hintergrund ausführen

makro im hintergrund ausführen
08.02.2004 18:01:22
arne
Hallo Forum,
ich habe folgende frage:
ich habe einen kleinen timer, der im hintergrund dafür sorgt, dass in kurzen abständen ein zellvergleich durchgeführt wird.
mit dem folgenden code, kommt es aber durch den sheet wechsel zu kurzen bildschirmflackern. ist es möglich die aktion komplett in den hintergrund zu verlegen, dass ich nicht zwischen den blättern hin und her springen muss?
schönen dank
arne

Sub Sub_Aus()
Application.ScreenUpdating = False
Sheets("Text").Activate
Range("B2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False 'aktuellen Zeitpunkt holen
If Range("A2").Value = Range("B2").Value Then
GoTo StartTimer
Else: Sheets("Pivot").PivotTables("Pivot1").RefreshTable
Range("B2").Select
Selection.Copy
Range("A2").Select
ActiveSheet.Paste
Sheets("Pivot").Activate
Application.ScreenUpdating = True
StartTimer
End If
StartTimer:
Sheets("Pivot").Activate
Application.ScreenUpdating = True
StartTimer
End Sub

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: makro im hintergrund ausführen
08.02.2004 19:21:01
Jens
Hi
Wie wäre es so. Nur in VBA und nicht noch mit Basic drin (goto).

Sub Sub_Aus()
Application.ScreenUpdating = False
With Sheets("Text") 'Vor alles was mit . beginnt noch die Tabelle davor setzten
.Range("B2").QueryTable.Refresh BackgroundQuery:=False 'aktuellen Zeitpunkt holen
If .Range("A2") <> .Range("B2") Then
Sheets("Pivot").PivotTables("Pivot1").RefreshTable
.Range("B2").Copy .Range("A2") 'Copy - Ziel
Application.ScreenUpdating = True
StartTimer
Exit 


Sub 'Als "Exit Sub" schreiben - Fehler im Forum
End If
End With
Application.ScreenUpdating = True
StartTimer
End Sub



Gruß Jens
Anzeige
AW: makro im hintergrund ausführen
08.02.2004 20:50:39
arne
Hi Jens!
klar! :) geht ja auch anders rum! danke!
so ist es eleganter.
seltsamerweise, flackert der bildschirm immer noch kurz, obwohl in der version kein blattwechsel vorgenommen wird... ?!
das hier ist der timer code 

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, _
schedule:=True
End Sub

dazu gehören noch ein paar globale var, aber das wars dann eigentlich auch schon.
keine ahnung wo das herkommen kann.
Schönen dank und schönen gruß
arne
Anzeige
AW: makro im hintergrund ausführen
08.02.2004 20:56:57
Jens
100%ig bekomme ich das Flackern auch nie Weg.
Gerate wenn man andere Datei öffnent z.B. Flackert das Bild kurz.
Vielleicht wird es durch das QueryTable.Refresh BackgroundQuery ausgelöst.
Ich hatte mal ein Programm da konnte man den Bildschirm einfrieren lassen.
Ist aber nicht so gut da man beim Programm fehler nur Reset drücken konnt um wieder was zu sehen.
Gruß Jens
Anzeige
AW: makro im hintergrund ausführen
08.02.2004 21:54:14
arne
ich werd da wohl noch ein wenig rumdoktorn.
vielen dank für das umschreiben. :)
gruß
arne
;

Forumthreads zu verwandten Themen

Infomeldung während Makro im Hintergrund läuft
Lötschy

Guten Tag miteinander
Ich suche nun schon seit längerem im Internet nach einer Möglichkeit, dem User eine Meldung auszugeben
wie z.B. "Bitte warten Sie ! - Das Makro läuft !"
solange das Makro noch läuft. - Evt. dem User in der Zwischenzeit im Vordergrund (also so dass das Makro im...
20.01.2009 12:36:00
Thread-ID: 1041801
4 Beiträge
Makro im Hintergrund
Meissen

Es soll im Hintergrund ein komplexes Makro ausgeführt werden. Dieses Makro wird periodisch automatisch gestartet. Das funktioniert soweit auch alles zufriedenstellend. Sobald Excel (Version 2000) allerdings in den Hintergrund verschoben wird, wird die Ausführungsgeschwindkeit auf ein Minimum re...
26.06.2009 15:56:18
Thread-ID: 1084586
5 Beiträge
Makro bleibt immer im Hintergrund | Herbers Excel-Forum
Eddie Felson
Hallo,
Ich habe eine sehr langsame Routine, welche bei der Ausführung schon mal 15 min brauchen kann. Die Routine ist ein normales 'Sub' als Modul.
Wenn mir langweilig wird bin ich der Weile im Internet. Will ich aber nun Excel mit Alt-Tab wieder aufrufen, bleibt der Bildschirm tod, bis die...
06.02.2010 23:48:06
Thread-ID: 1136480
3 Beiträge
Combobox soll Makro nicht zweimal ausführen
GTFuchs

Ich möchte den Inhalt einer Combobox dynamisch beim Auflappen laden.
Alles klappt wunderbar, bis auf die Tatsache, dass das Makro bei einmal aufklappen und wählen eines Eintrages zweimal ausgeführt wird.
Es soll nur einmal, beim Aufklappen ausgeführt werden, nicht zweimal. Einfach test...
26.09.2010 22:56:59
Thread-ID: 1179492
5 Beiträge
Makro beim speichern ausführen
Andre

Hi Leute,
kurze Frage, was mache ich falsch? Ich möchte beim speichern das verschiedene Makros ausgeführt werden, sobald "active" in der entsprechenden Zelle steht. Aber irgendie klappt es nicht.
Vielen Dank im voraus.
Gruss
Andre
Private Sub Workbook_BeforeSave(ByVal SaveAs...
11.01.2011 16:49:24
Thread-ID: 1195049
4 Beiträge
Makro auf einer bestimmten/offenen Datei ausführen
bastula

Hallo Excel-Experten,
ich bin mal wieder mit meinem Latein am Ende. Teile meines Problems sind lösbar, aber ich bin mir nicht sicher, ob ich einen guten Weg gehe:
- ich möchte ein Makro in einer Datei X speichern und starten
- dieses Makro soll prüfen, welche sonstigen XLS Dateien s...
01.07.2011 22:52:21
Thread-ID: 1220587
5 Beiträge
Makro beim öffnen jeder Datei ausführen
\/\/

Liebe Community,
ich versuche gerade eine eigene Passwortabfrage zu schreiben, da ich den Blatt-/Arbeitsmappenschutz von Excel nicht für besonders sicher halte. Da ich aber nicht jedem das Makro in alle Dateien einspielen möchte, wollte ich wissen, ob es eine Möglichkeit gibt, dass Makro so...
29.04.2013 10:22:42
Thread-ID: 1310912
5 Beiträge
Makroberechnung im Hintergrund?
Ingo

Hallo Leute,Problem:
Ich habe inzwischen einen Button mit einem recht langen Makro versehen, soll heißen: bei Aktivierung rechnet der PC eine geraume Zeit. Man sieht dabei alle Millisec. eine andere Tabelle. Frage:
Gibt es die Möglichkeit das ganze irgendwie Auszublenden, sodaß der Benutz...
08.07.2002 17:25:22
Thread-ID: 134774
6 Beiträge
Anzeige
Makro bei bestimmtem Dateinamen NICHT ausführen
Wolfango

Hallo zusammen,
folgender Wunsch;
innerhalb einer Datei gibt es ein Makro welches Formeln in Werte umwandelt.
Dieses Makro funktioniert auch einwandfrei.
Kann ich diesem Makro ein paar VBA-Zeilen voranstellen, die den anschließenden (bereits vorhandenen) VB-Code nur dann ausf...
28.04.2014 16:44:13
Thread-ID: 1358917
6 Beiträge
Makros im hintergrund laufen lassen
Jan

Hallo,eine kurze Anfängerfrage:
Wie kann ich Makros ablaufen lassen, ohne dabei die verschiedenen Aktionen am Bildschirm mitverfolgen zu müssen?Vielen Dank für jede HilfeJan

15.07.2002 13:47:24
Thread-ID: 136639
2 Beiträge
Aufgezeichnetes Makro bringt Fehler beim Ausführen
Kasimir

Hall an Alle!
Ich habe mir folgendes mit dem Makrorecorder aufgezeichnet:
Sub Makro2() ' Makro2 Makro Range("Q2").Select ActiveCell.FormulaR1C1 = _ "=IF(AND(Hilfstabelle!R3C2>0,Hilfstabelle!R4C2>"""",Hilfstabelle!R5C2>""""),IF(AND(RC[- _ 3]=""ja"",RC[-2]=""ja"",RC[-1]=""ja""),"...
04.09.2014 15:23:26
Thread-ID: 1379956
2 Beiträge
Aufgezeichnetes Makro bringt Fehler beim Ausführen
Kasimir

Hall an Alle!
Ich habe mir folgendes mit dem Makrorecorder aufgezeichnet:
Sub Makro2() ' Makro2 Makro Range("Q2").Select ActiveCell.FormulaR1C1 = _ "=IF(AND(Hilfstabelle!R3C2>0,Hilfstabelle!R4C2>"""",Hilfstabelle!R5C2>""""),IF(AND(RC[- _ 3]=""ja"",RC[-2]=""ja"",RC[-1]=""ja""),"...
04.09.2014 15:23:32
Thread-ID: 1379957
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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