Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Erscheinung der Userform dauert

Forumthread: Erscheinung der Userform dauert

Erscheinung der Userform dauert
Guido
Hallo Spezialisten,
der Aufruf einer Userform über einen Button aus der Tabelle dauert eine ganze Weile, weil Excel noch irgendwelche Berechnungen auf der Tabelle ausführt (z.B. ist da noch der Code auf Überprüfung von doppelten Aktenzeichen hinterlegt).
Wie kann ich Excel "überreden" dies beim Aufruf der Userform zu unterlassen?
Der Befehl: "Application.DisplayAlerts = False" ist es nicht.
Bin dankbar für jeden Tip.
Gruß aus Würzburg
Guido
Anzeige
AW: Erscheinung der Userform dauert
15.02.2006 10:41:51
Rene
Hallo!
Versuch's mal mit Application.Calculate=False
Gruß, Rene
AW: Erscheinung der Userform dauert
15.02.2006 10:55:15
Guido
Hallo Rene,
funzt leider nicht, dann kommt die Fehlermeldung: "Funktion oder Variable erwartet".
Gruß
Guido
AW: Erscheinung der Userform dauert
15.02.2006 11:04:32
Rene
Das war der falsche Code.Hier der richtige Code.
Am Anfang des Makros die folgende Zeile:
Application.Calculation=xlCalculationManual
Am Ende des Makros die folgende Zeile:
Application.Calculation=xlCalculationAutomatic
Gruß, Rene
Anzeige
AW: Erscheinung der Userform dauert
15.02.2006 11:14:52
Guido
Sorry,
aber er zeigt mir in der Statuszeile immer noch an, das er berechnet und es dauert immer noch eine Weile bis zum Erscheinen der Userform?!
Gruß
Guido
AW: Erscheinung der Userform dauert
15.02.2006 11:42:50
Rene
In welchen Makro hast Du die Codezeilen eingefügt?. Diese müssen bei den Code für den Button stehen, und nicht bei der Userform, z.B.:

Private Sub CommandButton1_Click()
Application.Calculation=xlCalculationManual
Userform1.Show
Application.Calculation=xlCalculationAutomatic
End Sub

Lade doch mal die Mappe hoch, dann können wir mal reinschauen. Normalerweise dürfte Excel nicht rechnen, wenn die automatische Berechnung abgeschaltet wird.
Anzeige
AW: Erscheinung der Userform dauert
15.02.2006 11:59:32
Guido
Hallo Rene,
danke, aber genauso schaut mein Code des Button in der Tabelle aus. Interessanterweise erscheint zunächst der Rahmen der Userform, dann rechnet Excel irgendwas und erst nach einer Weile füllt sich die Userform vollständig.
Die Mappe kann ich leider nicht hochladen, da Sozialdaten und außerdem 5 MB groß.
Gruß
Guido
Anzeige
AW: Erscheinung der Userform dauert
15.02.2006 12:04:38
Rene
Kann es sein, das die Userform Daten aus der Tabelle bezieht? Bei einer so großen Datei kann es schon länger dauern, bis alle Daten durchsucht sind. Auch ein langsamer Rechner könnte eine Ursache sein.
AW: Erscheinung der Userform dauert
15.02.2006 13:13:46
Guido
Hallo Rene,
du hast recht, sobald die Userform aktiviert wurde, beginnt die Filterung nach Daten (Datum in Spalte S) und Aussortierung von doppelten Daten mit folgendem Code:

Private Sub UserForm_Activate()
Dim intRow As Integer
ThisWorkbook.Sheets("Registrierte Vorgänge").Range("S:S").AdvancedFilter xlFilterCopy, CopyToRange:=Range("AA2"), unique:=True
intRow = Cells(Rows.Count, 27).End(xlUp).Row
Range("AA2:AA" & intRow).Sort Key1:=Range("AA2"), Order1:=xlAscending
intRow = Cells(Rows.Count, 27).End(xlUp).Row
ComboBox1.List = Range("AA2:AA" & intRow).Value
End Sub

und das dauert. Dieser Code stammt ursprünglich von Herrn Herber persönlich, ist aber nicht ganz zuverlässig, da er immmer mal wieder Daten unterschlägt. Kennst du etwas besseres (schnelleres)?
Vielen Dank für deine Geduld.
Gruß
Guido
Anzeige
;

Forumthreads zu verwandten Themen

In derTextBox das Format ändern
edie

Hallo zusammen,
würde gerne, wenn es möglich wäre, das Datum in der TextBox im Format TT.MM.YYYY
zurückschreibe in die Zelle A1 im Format YYYY-MM-TT 00:00 z. B. 2008-07-01 00:00
Wenn es möglich ist dann wie?
Hat jemand eine Idee und kann weiter helfen?
Danke im Voraus.
...
13.08.2008 15:27:49
Thread-ID: 1001560
3 Beiträge
Anzeige
Fehler in der Formel
Baywatch

Hi
ich habe eine Formel und die tut es leider nicht. Wenn ich MIN durch Max ersetze klappt es, aber warum bei min NIcht?
Vielleicht findet jemand den Denkfehler?
{=(BEREICH.VERSCHIEBEN(Daten!$A$1;SUMME(WENN(Daten!D1:D5002=MIN(WENN(Daten!F1:F5002="M"; Daten!D1:D5002;0));ZEILE(Date...
15.08.2008 15:59:00
Thread-ID: 1002235
8 Beiträge
Anzeige
Datum in der Userform formatieren
Nadine

Hallo,
ich habe im VBA eine Userform erstellt. In einem der Textfelder soll ein Datum stehen.
Wenn Buchstaben in dieser Textbox stehen, soll keine Übertrabung in die -von mir vorgesehen- Excelzelle erfolgen.
Bitte um HILFE!!!
Vielen Dank
Nadine
18.08.2008 16:17:00
Thread-ID: 1002660
7 Beiträge
Bearbeiten/Formatieren der x-Achse in Diagramm
Mayr,

Hallo zusammen,
ich hab ein Problem beim Formatieren der X-Achse in meinem Diagramm...
Und zwar soll es eine Zeitachse sein und um 4 Uhr anfangen und um 4 Uhr enden.... also nicht von 0-24Uhr.
Das stellt aber jetzt für mich ein Problem dar, da ich wnicht weiß wie ich excel sag das e...
15.10.2008 14:03:00
Thread-ID: 1016558
2 Beiträge
Formel - Anzeige der gefilterten Inhalte
Rocky

Hallo Excelfreunde und zweiäugigen unter den Blinden und Einäugigen,
ich möchte gern einen dynamischen "Querfilter" basteln. Mein Ansatz bisher: Ich kopieren die Tabelle und transportiere diese. dann wird in jede Zelle folgende Formel geschrieben:
=WENN(INDIREKT(ADRESSE(SPALTE()+0;ZEILE...
28.11.2008 08:53:12
Thread-ID: 1028554
4 Beiträge
Fehler in der Verkettung der Formel ?
Selma

Hallo Leute,
ich habe in Spalte E und F mit Formeln die Zelleninhalte verkettet. Mit einem Makro markiere ich ab Zeile 3 die Zellen in Spalte E und F und erzeugte eine Datei move.bat die danach ausgeführt wird.
In Spalte E stehen die Ordnername die erstellt werden und in Spalte F die D...
21.12.2008 13:20:00
Thread-ID: 1034590
2 Beiträge
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Per Userform oder Inputbox Daten selektieren
Bernd


Hallo Freaks,
ich habe im Archiv gesucht, aber leider nichts gefunden.
Ich suche ein Makro, in das ich per Userform (oder Inputbox?) einen Begriff (Namen) eingebe, dann VBA in das Tabellenblatt 1 geht, in Spalte G den Suchbegriff (Namen) sucht und dann als Ergebnis der Suche die...
05.02.2009 16:36:55
Thread-ID: 1047421
6 Beiträge
Per Userform oder Inputbox Daten selektieren
Bernd


Hallo Freaks,
ich habe im Archiv gesucht, aber leider nichts gefunden.
Ich suche ein Makro, in das ich per Userform (oder Inputbox?) einen Begriff (Namen) eingebe, dann VBA in das Tabellenblatt 1 geht, in Spalte G den Suchbegriff (Namen) sucht und dann als Ergebnis der Suche die...
05.02.2009 17:06:43
Thread-ID: 1047434
3 Beiträge
mehrzeilige Eingabe in Inputbox oder UserForm
Jakob

Hallo,
ich stehe vor folgenden Problem und suche eine Lösung.
Ich habe die Zellen C19-I25 miteinnander verbunden. Nun möchte ich aus einer SAP-Anwendung einen mehrzeiligen Text kopieren (Strg+c). Wenn ich direkt die oben genannten Zellen anklicke und dort mit Strg+v versuche den Text ei...
18.02.2009 14:34:00
Thread-ID: 1051819
5 Beiträge
untereinanderstehende Werte via VBA umformatieren
Harry

Hallo zusammen,
ich habe folgendes Problem, das ich gerne mit VBA lösen möchte:
Und zwar habe ich eine Tabelle, in der untereinander in verschiedenen Spalten Werte stehen, die ich auf einem weiteren Tabellenblatt hintereinander ausgeben möchte.
Ich benötige dazu ein Makro, das bspw....
30.03.2009 19:56:28
Thread-ID: 1065412
5 Beiträge
Bilder einfügen ander Tabelle Formel Reaktion
Karel

Hallo Exelianer,
Habe untestehende Code zum bilder einfügen von Hajo's Seite.
meine Frage:
- wie kan ich Bilder einfugen wobei die Bildernamen in ein andere tabelle liegen (Tabelle1) bereich A8:A100
- bildname komen in Zelle Set RaBereich = Range("A10,C10,E10,G10") Tabelle (bild...
11.06.2009 20:52:07
Thread-ID: 1080841
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige