Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
1592to1596
1592to1596
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textbox wird erst nach Berechnung angezeigt...

Forumthread: Textbox wird erst nach Berechnung angezeigt...

Textbox wird erst nach Berechnung angezeigt...
20.11.2017 09:33:10
Christian
Hallo Zusammen,
ich schon wieder - ach mann...
Ich habe in einer UserForm7 einen Commandbutton3, der, während die Inhalte aus den Comboboxen in das Tabellenblatt "Dropdown Analyse" übertragen werden, die UserForm8 anzeigen soll. Das passiert auch, nur zeigt er - warum auch immer und das ist meine Frage - die Textbox1 erst nach der Übertragung der Inhalte an. Bis dahin bleibt die UserForm8 leer. Habt Ihr eine Idee? 
Private Sub CommandButton3_Click()
UserForm8.TextBox1 = "Einen Augenblick bitte..."
UserForm8.Show vbModeless
Worksheets("Dropdowns Analyse").Range("i2") = UserForm7.ComboBox1.Value
Worksheets("Dropdowns Analyse").Range("n2") = UserForm7.ComboBox2.Value
Worksheets("Dropdowns Analyse").Range("T2") = UserForm7.ComboBox3.Value
Worksheets("Dropdowns Analyse").Range("Y2") = UserForm7.ComboBox4.Value
If UserForm7.ComboBox1  "" And UserForm7.ComboBox2  "" And UserForm7.ComboBox3  "" And  _
UserForm7.ComboBox4  "" Then
If UserForm7.ComboBox1 = "" Or UserForm7.ComboBox2 = "" Or UserForm7.ComboBox3 = "" Or  _
UserForm7.ComboBox4 = "" Then
Exit Sub
End If
UserForm7.CommandButton1.Enabled = True
End If
End Sub

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Textbox wird erst nach Berechnung angezeigt...
20.11.2017 09:41:56
Daniel
HI
VBA arbeitet so, dass die Bildschirmanzeige der Userform erst dann aktualisiert wird, wenn der Makrocode durchgelaufen ist.
Um eine Aktualisierung der Anzeige der Userform sofort durchzuführen, musst du den Befehl UserformXXX.Repaint durchführen.
außdem solltest du die Userform erst starten und danach ihre Inhalte ändern: 

Userform8.Show vbModeless
Userform8.Textbox1.Text = "Einen Augenblick bitte..."
Userform8.Repaint
Gruß Daniel
Anzeige
AW: Textbox wird erst nach Berechnung angezeigt...
20.11.2017 09:46:13
Christian
Ihr seid einfach klasse - vielen vielen Dank!
AW: Textbox wird erst nach Berechnung angezeigt...
20.11.2017 09:49:28
Sepp
Hallo Christian,
wobei Daniels Aussage "außdem solltest du die Userform erst starten und danach ihre Inhalte ändern:" so nicht stimmt.
Sobald du UserForm8 ansprichst, wird diese Initialisiert und du kannst alle Steuerelemente nach belieben ansprechen und befüllen, mit .Show wird sie dann angezeigt.
Gruß Sepp

Anzeige
AW: Textbox wird erst nach Berechnung angezeigt...
20.11.2017 09:43:17
Sepp
Hallo Christian,
probier es mal so.

With UserForm8
.TextBox1 = "Einen Augenblick bitte..."
.Repaint
.Show vbModeless
End With
Gruß Sepp

Anzeige
;

Forumthreads zu verwandten Themen

Es wird nur die Formel angezeigt, nicht der Text
Oswald

Hallo an die guten Geister,
hab mal wieder ein Problem.
In der angeängten Datei in B41 hatte ich das Problem das nicht der Text angezeigt wird sondern die Formel.
https://www.herber.de/bbs/user/54704.xls
Habe ich dadurch gelöst das ich das Selbe noch mal in einer anderen Datei...
18.08.2008 14:47:05
Thread-ID: 1002609
4 Beiträge
Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Format(etwas, "sonstwas") wird nicht erkannt
Mike

Hallo zusammen,
in einigen VBA-Projekten wird "Format" nicht erkannt. Meldung: "Fehler beim kompilieren, Falsche Anzahl an Argumenten oder Zuweisung einer Eigenschaft"
Öffne ich im gleichen VB-Editor eine neue Mappe/Projekt funktioniert es für die neue Mappe nicht aber für besagte alte...
20.08.2008 11:13:00
Thread-ID: 1003138
16 Beiträge
Code wird nicht richtig erkannt
Reinhard

Hallo Wissende,
wegen einer Anfrage hier (irgendwas mit Lottozahlen) habe ich mir
https://www.herber.de/bbs/user/55214.xls
heruntergeladen.
In Blatt1 steht Zeilenweise der nachstehende Code, den habe ich in den VB-Editor in einem Modul eingefügt.
Die Zeilen
Sub Lotto_...
06.09.2008 19:00:21
Thread-ID: 1007881
8 Beiträge
Spalten lassen sich nicht auf Breite 0 schieben
Gordon

Moin,
ich versuche gerade per Makro bestimmte Spalten auf die Breite 0 zu schieben. Als es da fr mich unerklärliche Probleme gab, hab ich mal versucht, die Spalten per Hand auf Breite null zu schieben und siehe da, folgende Meldung erscheint: "Objekte können nicht über das Blatt hinausver...
17.09.2008 14:10:57
Thread-ID: 1010385
4 Beiträge
Teilergebnis einer Spalte wird nicht angezeigt
thaake

Hallo,
ich lasse mir die Teilergebnisse verschiedener Spalten anzeigen mit =Teilergebnis(9;V5:V300), was auch überall klappt, aber nur eine Spalte weigert sich. Formatierung ist vollkommen ok, das Anzeigen in einer anderen Zelle mit Verweis auf diese Spalte klappt auch nicht. Summe dagegen...
22.09.2008 11:21:12
Thread-ID: 1011416
2 Beiträge
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Filterergebnisse werden nicht angezeigt
hajo


Hallo zusammen,
wenn ich mit Autofilter einen Filter in VBA setze, wird mir das Ergebnis nicht angezeigt. Wenn ich die gleiche Aktion manuell ausführe bekomme ich das gewünschte Ergbniss. Kann mir jemand helfen?
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter F...
29.10.2008 12:43:42
Thread-ID: 1020236
5 Beiträge
Anzeige
Rechtschreibung: Pop-Up wird nicht mehr angezeigt
Norbert

Hallo,
nach dem Auswählen des Menüpunktes "Extras" - "Rechtschreibung", wird das zugehörige Pop-Up zur Auswahl der Korrekturvorschläge nicht mehr angezeigt.
Nach einem Klick auf die Schaltfläche "Rechtschreibung" ebenfalls nicht mehr.
Ich habe die möglichen Optionen zur Einstellung...
11.11.2008 11:22:22
Thread-ID: 1023480
3 Beiträge
Anzeige
Spalte keine Ansicht und nicht drucken
Frederic

Hallo Zusammen
Hätte eine blöde Frage:
Wie kann ich mit VBA erreichen, dass die Spalte C1:C60 nicht in der Seitenansicht und auch nicht gedruckt wird. Grund: Habe dort Listenvermerke drin.
Für Eure generöse Hilfe danke ich schon im Voraus
Salvus
Frederic
20.12.2008 19:23:00
Thread-ID: 1034447
23 Beiträge
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Wenn Links keine Zahl - MsgBox
Heinz

Leute ich habe bitte noch ein Problem
Mit unteren Code werden Werte (Zahlen) verschoben.
Nun möchte ich bitte wenn in " Range("F65") = Left(wks.Range("C5").Value, 5) " keine 5 Zahlen stehen, das dann eine MsgBox erscheint "Linie 311 keine gültige SAP Nummer".
Ist das mit diesen unte...
02.02.2009 20:00:18
Thread-ID: 1046400
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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