Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1456to1460
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
1456to1460
1456to1460
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aufruf Userform aus ausgeblendeter Datei

Aufruf Userform aus ausgeblendeter Datei
14.11.2015 15:44:06
Dieter(Drummer)
Guten Tag VBA Spezialisten,
in einen eigenen Menüpunkt, im eigenen Menüband, rufe ich eine Userform auf, die in einer ausgeblendeten Datei mit einigen Makros ist.
Hier mein Script:
  • 
Sub MxReStart()
ActiveWindow.Visible = False
UserForm1.Show
End Sub

    • Die Userform wird nicht angezeigt und das Makro bricht mit dem Fehler ab: "Fehler beim kompilieren: Variable micht definiert", in (s. fett im Script).
    Was ist da falsch?
    Mit der Bitte um Hilfe.
    Gruß, Dieter(Drummer)

    8
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Nachtrag
    14.11.2015 15:49:00
    Dieter(Drummer)
    Das augferufene Makro ist in der PersonL.xlsb Date.
    Gruß, Dieter(Drummer)

    AW: Nachtrag
    14.11.2015 16:27:00
    Nepumuk
    Hallo,
    ist das Userform auch in deiner PERSONL? Wenn nein, dann benötigst du in der Mappe in dem sich das Userform befindet eine kleine Prozedur:
    Public Sub ShowForm()
        Call UserForm1.Show
    End Sub

    In deiner PERSONL rufst du dann das Makro so auf:
    Sub MxReStart()
        ActiveWindow.Visible = False
        Call Application.Run("Mappe1.xlsm!Modul1.ShowForm")
    End Sub

    Den Namen der Mappe und des Moduls musst du natürlich anpassen.
    Gruß
    Nepumuk

    Anzeige
    AW:Danke Nepumuk, klappt prima. Weiteres ...
    14.11.2015 16:48:51
    Dieter(Drummer)
    Hi Nepumuk,
    das Userform ist nicht in der PersonL.xlsb Datei. Deine Makros habe ich richtig installiert unde jetzt klappt es prima! Danke dir.
    Ein Zusatzfrage. In der Userform sind Commadbuttons, z.B. CommandButton1. Dieser löst bei Klick die Zahl 1, in der Textbox aus. Frage: Kann man sich din deisem Fall die Zahl aus aus dem Klick vorlesen lassen?
    Ein Makro zum vorlesen aus Text oder Zahl in einer Zelle eines Tab.blt. habe ich:
  • 
Sub VorLesen() 'Alle markierten Zellen
Dim Zelle As Range 'Anpassung von Herber: Daniel und Ransi 29.10.2015
Dim objSpeaker As Object, x&
MsgBox "Inhalte der markierten Zellen werden vorgelesen"
Set objSpeaker = CreateObject("SAPI.SpVoice")
objSpeaker.Volume = 100
For Each Zelle In Selection.Cells 'Anpassung von Herber: Daniel und Ransi
objSpeaker.Speak Zelle 'Anpassung von Herber: Daniel und Ransi
'For x = 1 To 1
'objSpeaker.Speak Range("A" & x)
Next
End Sub

    • Wäre toll, wenn ich bei Klick auf CommandButton, z,B, 1, die EINS vorgelsen würde.
    Danke für evtl weitere Hilfe und Gruß,
    Dieter(Drummer)

    Anzeige
    AW: AW:Danke Nepumuk, klappt prima. Weiteres ...
    14.11.2015 16:55:38
    Nepumuk
    Hallo,
    so:
    Private Sub CommandButton1_Click()
        Dim objSpeaker As Object
        Set objSpeaker = CreateObject("SAPI.SpVoice")
        objSpeaker.Volume = 100
        objSpeaker.Speak 1
        Set objSpeaker = Nothing
    End Sub

    Gruß
    Nepumuk

    Anzeige
    AW: AW:Danke Nepumuk, klappt auch prima!
    14.11.2015 17:08:38
    Dieter(Drummer)
    Danke dir Nepumuk. Alles klappt toll.
    Gruß und ein schönes Wochenende,
    Dieter(Drummer)

    AW: AW: Hinweis für andere User
    14.11.2015 17:44:11
    Dieter(Drummer)
    Falls andere auch daran interessiert sind, kann man auch Worte vorlesen lassen. Ich habe es dann so gemacht:
  • 
Private Sub CommandButton12_Click()
zahl1 = Text1
rechenart = "multiplizieren"
Dim objSpeaker As Object
Set objSpeaker = CreateObject("SAPI.SpVoice")
objSpeaker.Volume = 100
objSpeaker.Speak "multipliziert mit"
Set objSpeaker = Nothing
Text1 = ""
End Sub

    • Gruß und noch mal Dank an Nepumuk,
    Dieter(Drummer)

    Anzeige
    Kannst du dich noch erinnern, ...
    16.11.2015 02:21:40
    Luc:-?
    …Dieter,
    dass es hier auch schon mal um sprechende Zellen ging…? ;-]
    (Die Vorlauf- und Nachfolge-Threads dürfen Interessenten selber raussuchen!)
    Morrn, Luc :-?

    AW: Danke Luc:-? ...
    16.11.2015 09:11:21
    Dieter(Drummer)
    Guten Morgen, Luc:-?,
    da hatte ich nicht mehr dran gedacht, Sorry! Den ganzen Thread werde ich mir abspeichern und entsprechendes für mich - bei anderen Gelegenheiten - natürlich verwenden.
    Einen schönen Tag und Danke an alle unermüdlichen Helfer des Forums.
    Gru, Dieter(Drummer)
    Anzeige

    299 Forumthreads zu ähnlichen Themen

    Maximum aus Zeile,ausgeblendete Spalte nicht berüc
    HermannZ

    Hi;
    wie kann ich mit VBA in einer Zeile das Maximum ermitteln,aber ausgeblendete Spalten nicht berücksichtigen.
    Mit einer Formel z.B könnte man das so machen.
     CEFGH1246  2     3     4     5&n...
    13.08.2008 19:42:43
    Thread-ID: 1001641
    4 Beiträge
    Anzeige
    Daten aus Userfom in eine ausgeblendete Tabelle
    Ramon

    Hallo alle zusammen,
    ich möchte nach Klick auf den Command_Button "cb_send" Eingabewerte aus einer
    Userform in eine Tabelle schreiben.
    In Abhängigkeit der eingegebenen Werte sollen die Daten entweder in das Tabllenblatt
    "data_booked" oder in "data_planned" geschrieben werden, u...
    16.09.2008 12:28:00
    Thread-ID: 1010054
    5 Beiträge
    UDF - pos. oder neg. Wert in ausgeblendet. Bereich
    Peter

    Guten Abend
    Ich möchte mit Hilfe einer Funktion (z.B. yWert) abfragen, ob innerhalb einem benannten Bereich (z.B. "Zahlenteil") positive oder negative Werte in ausgeblendeten Zeilen enthalten sind. Falls dies zutrifft, sollte die Rückgabe der Tabellenname sowie die betreffenden Zelladressen...
    26.09.2008 21:20:00
    Thread-ID: 1012746
    4 Beiträge
    Anzeige
    Gruppierung mit ausgeblendeten Spalten
    Leander

    Hallo Zusammen!
    Ist möchte eine Spalte, beispielsweise Spalte "E" ausblenden, die jedoch in einem Gruppierungsbereich, Spalten "C:G", liegt.
    So weit so gut, schließe ich diese Gruppe und öffne diese wieder, ist auch die vorher ausgeblendete Spalte wieder sichtbar.

    Kann ich das...
    13.11.2008 06:59:45
    Thread-ID: 1024010
    3 Beiträge
    ausgeblendete Zeilen auf Blattkopie auch ausblende
    Thomas

    Hallo,
    ich habe folgendes Problem:
    Mittels VBA und der Funktion PastSpecial kopiere ich ein Tabellenblatt, welches ausgeblendete Zeilen enthält.
    Zum Einfügen des zu kopierenden Inhaltes verwende ich die o.a. Funktion zwei mal:
    Zielblatt.Range(Quellenblatt.UsedRange.Address).Past...
    20.11.2008 09:18:00
    Thread-ID: 1026312
    3 Beiträge
    Rechnen ohne Ausgeblendetes
    Klemens

    Hallo,
    wenn ich eine Funktion benutze (z. B. SUMME), werden Werte, die in ausgeblendeten Zeilen oder Spalten stehen, in die Berechnung einbezogen. Wie kann ich dies verhindern?
    mfg
    Klemens Baake
    20.11.2008 11:28:51
    Thread-ID: 1026351
    6 Beiträge
    Ausgeblendete Zeilen werden ausgedruckt
    Josef

    Hallo Profis,
    Wenn in bestimmten Zellen eine 0 steht soll der definierte Bereich (Zeilen) ausgeblendet werden.
    Das funktioniert aber nur im ersten Bereich, bei weiteren werden in der Seitenansicht nur leere Seiten angezeigt und dann auch ausgedruckt, was nicht gewünscht ist.
    Zum bes...
    09.12.2008 12:39:59
    Thread-ID: 1031348
    5 Beiträge
    Combobox ausgeblendete Zeilen nicht anzeigen
    helena

    Schönen Guten Morgen
    Kleines Problem ich verstecke Zeilen wenn in Spalte C Begriff nicht vorhanden dies klappt auch
    aber via Combobox suche ich Namen (Adressvergabe) aber es werden mir immer alle aufgelistet auch wenn Zeilen ausgeblendet sind, ich Blende aus ob ich nur G_kunden oder P_...
    28.12.2008 09:10:32
    Thread-ID: 1035521
    12 Beiträge
    Anzeige

    Links zu Excel-Dialogen

    CommandButton 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
    3
    3
    4
    3
    2
    2
    2
    5
    4
    11
    13
    5
    2
    6
    1
    2
    2
    2
    1
    4
    2
    1
    7
    4
    7