Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1012to1016
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Initialize versagt

Userform Initialize versagt
01.10.2008 15:28:31
Axel
hallo könner,
ich habe mit application.visible = false / true experimentiert.
hat funktioniert, außer beim schließen mit kreuz. Excel abgeschossen/weg. also hab ich windows abgemeldet und neu gestartet.
Und jetzt das Problem: seither funktioniert mein 

Privat Sub Userform1_initialise()
ComboBox3.AddItem "ST procedure"
ComboBox3.AddItem "CA procedure"
ComboBox3.AddItem "NIET GELIJST"
End Sub


nicht mehr (combobox3 nur als beispiel)! die Comboboxen bleiben leer, auf .visible = false gesetzte controls werde angezeigt. die in der userform belegten txt-boxen oder auch buttons reagieren einwandfrei... aber initializierung ist mir nicht mehr möglich.
ideen?
gruß, axel

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform Initialize versagt
01.10.2008 15:39:00
Gerd
Hi,
versuchs mal mit der richtigen Schreibweise:
Private Sub UserForm_Initialize()
mfg Gerd
AW: Userform Initialize versagt
01.10.2008 15:47:00
Axel
...hallo gerd,
du hast recht, aber so einfach ist es nicht. ich hab das mal so herunter getippt.

Private Sub UserForm1_Initialize()
ComboBox1.Clear
ComboBox1.AddItem "Belgie"
ComboBox1.AddItem "China"
ComboBox1.AddItem "Denmark"
ComboBox1.AddItem "Duitsland"
ComboBox1.AddItem "Frankrijk"
ComboBox1.AddItem "Italie"
ComboBox1.AddItem "Nederlande"
ComboBox1.AddItem "Norwege"
ComboBox1.AddItem "Ootsenrijk"
ComboBox1.AddItem "Russland"
ComboBox1.AddItem "Spanie"
ComboBox1.AddItem "NIET GELIJST"
ComboBox2.Clear
ComboBox2.AddItem "Aardegas"
ComboBox2.AddItem "Propan (LPG)"
ComboBox2.AddItem "Buthan"
ComboBox2.AddItem "Kokovengas"
ComboBox2.AddItem "Waterstof"
ComboBox2.AddItem "Olie"
ComboBox2.AddItem "Aardegas & Olie"
ComboBox2.AddItem "NIET GELIJST"
ComboBox3.Clear
ComboBox3.AddItem "ST procedure"
ComboBox3.AddItem "CA procedure"
ComboBox3.AddItem "NIET GELIJST"
TextBox1.Value = Date
TextBox2.Value = "AM"
TextBox3.Value = "Project#"
TextBox4.Value = "Klant"
TextBox5.Value = "XxX  mbar"
TextBox6.Value = "***  15  ***" & Chr(10) & "___"
TextBox7.Value = "***  20  ***" & Chr(10) & "___"
TextBox8.Value = "***  25  ***" & Chr(10) & "___"
i = 0
For i = 16 To 34
Controls("TextBox" & i).Visible = False
Next i
i = 0
For i = 28 To 44
Controls("Label" & i).Visible = False
Next i
i = 0
For i = 28 To 44
Controls("Label" & i).Visible = False
Next i
End Sub


hier ist es also schon richtig geschrieben, oder?
gruß,
axel

Anzeige
AW: Userform Initialize versagt
01.10.2008 16:06:29
Peter
Hallo Axel,
und was ist der Fehler?
Nachbauen kann man das schwerlich, bei der Vielzahl von Controls.
Gruß Peter
AW: Userform Initialize versagt
01.10.2008 16:10:00
Peter
Hallo Axel,
warum werden die Label28 - Label44 zweimal auf False gestzt?
Gruß Peter
AW: Userform Initialize versagt
01.10.2008 16:39:18
Axel
hallo peter,
das mit der doppelbelegung ist ein versehen, ich bin gerade dabei zu schreiben und die 2. labels sind inzwischen checkbox 8 ÷ 24
das problem: innerhalb dieser initialisierung passiert nichts. d.h. in anderen worten: ich kann einen haltepunkt setzen, ich kann den laufindex für die .visible = false zu setzenden controles zu groß/klein setzen (ohne dass er mir einen error ausgibt)... egal was ich tue, er führt das innerhalb der userform nicht aus.
dabei rufe ich die userform entweder über
Sub t()
UserForm1.Show
End Sub


auf oder indem ich die Userform1 direkt aus "ViewProject" heraus starte oder dies Makro 


Private Sub UserForm1_Initialize()
For i = 28 To 44
Controls("Label" & i).Visible = False
Next i
i = 0
For i = 8 To 24
Controls("Checkbox" & i).Visible = False
Next i
End Sub


direkt starte... es passiert nichts (außer, dass die userform1 gestartet wird, die dann aber in seinen buttonbelegungen einwandfrei läuft). Die TextBox1...8 bleiben leer, die ComboBox1...2 bleiben leer, die TextBox16...34 bleiben sichtbar etc. Und wie gesagt: haltepunkte/out of bounds indices sieht er selbst dann nicht, wenn ich das makro direkt starte...
mysthisch?
gruß,
axel

Anzeige
AW: Userform Initialize versagt
01.10.2008 16:46:13
Axel
hallo peter,
doppeltes false ist work in progress geschultet: das ist inzwischen auf einige andere textboxen bezogen.
mein problem:
selbst wenn ich die userform über das von dir "kritisierte" makro starte (die userform startet dann und die buttons verhalten sich korrekt):
Die ComboBox1...3, die TextBox1...8 bleiben leer und auch die übrigen zeilen werden nicht ausgeführt. so weit gehend sogar, dass selbst haltepunkte nicht gefunden werden und indices, die out of bounds sind keinen fehler auswerfen. aber die userform wir gestartet...
ich bin verblüfft.
gruß,
axel
Anzeige
AW: Userform Initialize versagt
01.10.2008 16:50:00
Herbert
Hi,
lad ein Beispiel hoch.
mfg Herbert
AW: Userform Initialize versagt
01.10.2008 16:51:00
Axel
...ich hab es:
es muss in meinem fall userform_initialize() heißen. frag mich nicht warum, der name der userform ist UserForm1, aber wenn ich auf die fläche doppelt klicke ist dennoch
Private Sub UserForm_Click()
die "antwort". sorry für die aufregung.
schönen abend euch!
gruß, axel
AW: Userform Initialize versagt
01.10.2008 17:23:59
Peter
Hallo Axel,
versuch doch einmal folgendes Makro

Public Sub Hilfe()
Application.EnableEvents = True
End Sub


und danach erneut das UserForm_Initialize
Gruß Peter

AW: Userform Initialize versagt
01.10.2008 17:54:44
Gerd
Hi,
Events wirken nicht in Userformen und auf Steuerelemente!
mfg Gerd
Anzeige

80 Forumthreads zu ähnlichen Themen

UserForm_Initialize
Werner

Hallo zusammen,
mit folgenden Makro........
Private Sub UserForm_Initialize() Dim blatt As Worksheet For Each blatt In ThisWorkbook.Worksheets If blatt.Index > 193 And _ blatt.Index .....werden alle Tabellenblätter zwischen Blatt > 193 und den Aktuellen Blatt mit der UserForm ge...
27.07.2009 23:30:21
Thread-ID: 1091767
8 Beiträge
Anzeige
Wiederholungen im UserForm_Initialize vermeiden
chandler

Hallo,
ich habe drei Dutzend Selectboxen die den gleichen Inhalt haben, siehe Beispiel:
With Me.cbo4
.Clear
.AddItem "N"
.AddItem "O"
.AddItem "S"
.AddItem "W"
End With
Wie kann ich die unzähligen Wiederholungen im UserForm_Initialize vermeiden, dadurch auch...
24.12.2011 15:21:50
Thread-ID: 1243439
7 Beiträge
UserForm_Initialize
Matthias Alles

Hallo,
ich hab hier - aus meiner Sicht - was sehr seltsames.
Ich programmiere gerade ein neues Userform. Folgenden Code habe ich bisher:Private Sub UserForm_Initialize()
For Each WB In Application.Windows
lst_Workbooks.AddItem WB.Caption
Debug.Print lst_Workbooks.Height...
05.06.2002 09:33:24
Thread-ID: 126004
3 Beiträge
Anzeige
UserForm_Initialize aus Tabelle aktivieren, wie?
Lorenz

Hallo VBA´ler
Kann man in "Private Sub Worksheet_Change(ByVal Target As Range)" die "UserForm_Initialize" Prozedur aufrufen?
Die UF ist dabei "VbModeless" geladen. Innerhalb der UF aufgerufen funkts problemlos. Wie soll (muß) der Code lauten um so nach dem Motto: "Call Userform1.UserFor...
14.06.2012 09:44:05
Thread-ID: 1267354
5 Beiträge
Unload Me in UserForm_Initialize
Timo

Hallo zusammen,
kann man eigentlich im UserForm_Initialize Sub ein "Unload Me" einbauen?
Es funktioniert einfach nicht.
Hintergrund:
Sobald die UserForm geladen wird, soll eine Prüfung ausgeführt werden.
In einem Label steht dann entweder ein Text oder eben "Fehler".
Wen...
19.10.2012 18:32:12
Thread-ID: 1282910
2 Beiträge
UserForm_Initialize()
Thomas

Liebes Forum!Kann mir jemand "UserForm_Initialize()" erläutern?Vielen Dank
Thomas
01.07.2002 15:45:55
Thread-ID: 132765
2 Beiträge
UserForm_Initialize()
Rainer

Hallo,ich dreh bald durch! Hab folgendes Problem...Ich habe eine User Form "frmAA" mit 29 Textboxen (EingabeAA1 - EingabeAA29).
Diese Textboxen möchte ich beim Öffnen der Form automatisch mit Daten aus der Tabelle "Test" füllen. Diese Daten stehen in der selben Reihenfolge von Zelle (B41:B69...
12.07.2002 07:57:56
Thread-ID: 135993
2 Beiträge
Laufzeitfehler 91 bei UserForm initialize
Pascal

Guten Tag miteinander
habe folgenden Code hinter einer UserForm (diesen Code hab ich dank der guten Hilfe hier im Forum zusammengebastelt). An dieser Stelle ein DANKESCHÖN allen Forumanen:
Private Sub Userform_Initialize() 'Schichtplan für den laufenden Monat wird angezeigt Dim Monat As...
28.11.2013 13:19:14
Thread-ID: 1340378
8 Beiträge
Anzeige

Links zu Excel-Dialogen

Label TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
1
6
2
1
4
1
1
1
7
3
3
3
1
5
4
2
7
12
5
5
3
2
11
2