Userform

• Userform von golem vom 06.10.2003 11:39:53
  • AW: Userform - von lars am 06.10.2003 11:46:05
    • AW: Userform - von golem am 06.10.2003 12:00:20
  • AW: nutze doch eine Symbolleiste - von Galenzo am 06.10.2003 11:46:08
    • AW: nutze doch eine Symbolleiste - von golem am 06.10.2003 11:54:50
      • AW: nutze doch eine Symbolleiste - von Galenzo am 06.10.2003 12:07:46
        • im Grunde hast Du recht - Merci beaucoup o.T. - von golem am 06.10.2003 14:13:54
          • AW: war nur'n Vorschlag :-) o.T. - von Galenzo am 07.10.2003 07:47:29
            • thx o.T. - von golem am 10.10.2003 12:48:13
  • AW: Userform - von Sabine am 06.10.2003 11:50:27
    • AW: Userform - von golem am 06.10.2003 11:59:33
      • AW: Userform - von Sabine am 06.10.2003 14:20:47
        • Danke o.T. - von golem am 09.10.2003 15:52:35
  • AW: Userform - von zacharias am 06.10.2003 13:40:34
    • AW: Userform - von golem am 06.10.2003 14:12:21

Betrifft: Userform
von: golem


Geschrieben am: 06.10.2003 11:39:53

Hallo Forum,
Jetzt mal ein schwieriges Problem:
Kann man ein Userform aufrufen UND dabei weiter in der Tabelle arbeiten, so daß das Userform nur als Navigationsleiste dient, auf der Buttons sind.
Das Userform soll während der Bearbeitung der Tabelle geöffnet bleiben.
Gruß
Goli


Betrifft: AW: Userform
von: lars
Geschrieben am: 06.10.2003 11:46:05

ist ja witzig, bin auch gerade dabei! hiermit hat es bei mir geklappt. hab etwas weiter unten auch eine frage hierzu gestellt, vielleicht kannst du mir weiterhelfen. hiermit geht das navi auf jedenfall soweit!



Private Sub UserForm_QueryClose _
(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
MsgBox "Die Navigation kann nicht geschlossen werden."
Cancel = True
End If
Application.CellDragAndDrop = True
End Sub




Private Sub UserForm_Activate()
Dim hwndXL&
hwndXL = FindWindow("XLMAIN", Application.Caption)
If hwndXL <> 0 Then
EnableWindow hwndXL, 1
Application.CellDragAndDrop = False
End If
End Sub



Gruß Lars




Betrifft: AW: Userform
von: golem

Geschrieben am: 06.10.2003 12:00:20

Hi Lars,
Danke für den Quellcode werde ihn mal testen.
Gruß Goli




Betrifft: AW: nutze doch eine Symbolleiste
von: Galenzo
Geschrieben am: 06.10.2003 11:46:08

Hallo,
nur so als Vorschlag:
Benütze doch eine Symbolleiste - da hast du keine Probleme mit...

mfg




Betrifft: AW: nutze doch eine Symbolleiste
von: golem

Geschrieben am: 06.10.2003 11:54:50

danke für den Hinweis - geht aber nur bedingt, da u.U. die Tabellen im Vollbildmodus laufen sollen.
Kenne mich auch nicht sonderlich gut aus dies in VBA zu realisieren...




Betrifft: AW: nutze doch eine Symbolleiste
von: Galenzo
Geschrieben am: 06.10.2003 12:07:46

naja - du kannst Symbolleisten doch vom oberen rand lösen und verschieben...
(auf den allerersten senkrechten Blaken einer Menüleiste klicken und ziehen)
Brauchst du auch kein VBA für...




Betrifft: im Grunde hast Du recht - Merci beaucoup o.T.
von: golem

Geschrieben am: 06.10.2003 14:13:54






Betrifft: AW: war nur'n Vorschlag :-) o.T.
von: Galenzo
Geschrieben am: 07.10.2003 07:47:29






Betrifft: thx o.T.
von: golem

Geschrieben am: 10.10.2003 12:48:13






Betrifft: AW: Userform
von: Sabine
Geschrieben am: 06.10.2003 11:50:27

Ich hoffe, ich hab dich richtig verstanden: UF anzeigen und ohne die UF zu schließen in der Tabelle weiter arbeiten?
versuchs mal mit Showmodal=false
und bei mir hat es sich als günstig erwiesen, die Commandbuttons in der UF auf takefokusonclick =false zu stellen

Viel Spass

Sabine




Betrifft: AW: Userform
von: golem

Geschrieben am: 06.10.2003 11:59:33

hi sabine,
ja, Du hast mich richtig verstanden.
wird Showmodul=false im UF Code geschrieben und
takefokusonclick =false für jeden Button im UF reinschreiben?
Danke für den Tipp!




Betrifft: AW: Userform
von: Sabine
Geschrieben am: 06.10.2003 14:20:47

Hi,

ich hab das showmodal in den Eigenschaften der UF gesetzt
und das Takefokusonclick der Commandbuttons über Entwurfsmodus,Steuerelementtoolbox, dann den Button anklicken,Eigenschaften und dann dort einstellen

Viel Spass

Sabine




Betrifft: Danke o.T.
von: golem

Geschrieben am: 09.10.2003 15:52:35






Betrifft: AW: Userform
von: zacharias
Geschrieben am: 06.10.2003 13:40:34

hey

Userform sei UF_Test

wie folgt aufrufen: UF_Test.show false

das reicht schon, hab's erst vor 4 Tagen gelernt und bin verdammt dankbar dafür




Betrifft: AW: Userform
von: golem

Geschrieben am: 06.10.2003 14:12:21

hi zacharias,
danke für deinen Beitrag.
Wo schreibt man UF_Test.show false rein (in UF code Initialize Fkt..)? Ist es nicht das selbe wie me.hide?
mfg Goli




Excel-Beispiele zum Thema " Userform"

Diagramm in Userform		XL-Dateien in UserForm listen
UserForm an Excel-Fenster anpassen		Fundstellen in UserForm listen
Module und UserForms austauschen		In einer Schleife auf Elemente einer UserForm zugreifen
Werte in eine ComboBox einer UserForm übernehmen		Zellinhalt als Label-Aufschrift in UserForm
Alle CheckBoxes einer UserForm ansprechen		Wenn kein Eintrag, UserForm nicht schließen
Aktiven Drucker in UserForm wechseln		Text aus UserForm-Textbox in Variable einlesen
UserForm in Abhängigkeit einer RefEdit-Auswahl anzeigen		Nur Buchstaben in eine UserForm-TextBox
Wert in Tabelle suchen und in UserForm ausgeben		Tabellenblatt in UserForm
Neue UserForm bedingt nach ComboBox-Auswahl aufrufen		Nach Ortsauswahl neue UserForm mit Ortsteilauswahl
Textfelder in UserForm beim Start vorbelegen		Text aus UserForm in eine Zelle schreiben
Verhindern des Schließens einer UserForm mittels Schließkreuz		Wert in UserForm-TextBox eintragen und selektieren
Auf UserForm-CommandButton-Klick eine Internetseite aufrufen		ComboBox-Felder in UserForm aufklappen
Eingabekontrolle bei UserForm		UserForm-ComboBox-Feld nach Tasteneingabe aufklappen
Userform in der Entwicklungsumgebung anzeigen		Wert aus 2. UserForm-ComboBox-Spalte berechnen
CheckBoxes in UserForms in eine Schleife einbinden		Anzahl von CheckBoxes in einer UserForm ermitteln
Vereinfachte Datumseingabe über UserForm		Auslesen des ausgewählten Optionsfeldes in einer UserForm
Werte von CheckBoxes in einer UserForm abfragen		Mit Drehfeld durch UserForm-TextBoxes blättern und Daten auslesen
Mit TextBox-Werten in UserForm rechnen		Datensätze in UserForm auswählen und im Blatt löschen
Bilder in UserForm und Bildgröße anpassen		Aktuelle Zeit über UserForm eintragen und Rennzeit berechnen
Werte aus UserForm-TextBox in bestimmten Formate übertragen		UserForm als Fortschrittsanzeige
AcrobatReader mit *.pdf-Dokument über UserForm starten		Zu einer aufrufenden UserForm zurückkehren
In einer UserForm Berechnungen aufaddieren		Matrix in UserForm-ListBox einlesen
Bereichsnamen in UserForm-ListBox auflisten und editieren		Spalte A mehrer Mappen in UserForm und aktives Blatt
Adressfeld aus UserForm-ComboBox füllen		Ausgewählte Werte aus UserForm-ListBoxes addieren
Mehrfachauswahl aus UserForm-ListBoxes in Tabelle eintragen		Gruppe von UserForm-ListBoxes über eine Schleife ansprechen