Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
336to340
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
336to340
336to340
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mehrere ausgeblendete Textboxen sichtbar machen

Mehrere ausgeblendete Textboxen sichtbar machen
12.11.2003 09:28:59
Karsten J.
Hallo

Ich habe eine Useform, wo ich mehrere Textboxen habe, die ich erst mal mit visible=false versteckt habe.

Erst wenn jemand einen Button betätigt, sollen die Felder sichtbar werden.

Muß ich jetzt jede Textbox einzeln auf visible=true setzten oder gibt es eine möglichkeit, alle mit einem Befehl zu ändern?

MfG

Karsten

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mehrere ausgeblendete Textboxen sichtbar machen
12.11.2003 09:40:44
Galenzo
Hallo,
bau dir für deinen Button diese Prozedur ein:


Private Sub CommandButton2_Click()
Dim obj As Object
    For Each obj In ActiveSheet.OLEObjects
        If TypeName(obj.Object) = "TextBox" Then
            obj.Visible = True
        End If
    Next
End Sub

(Beachte die Schreibweise von "TextBox")
Dann Viel Erfolg!
Anzeige
AW: Mehrere ausgeblendete Textboxen sichtbar machen
12.11.2003 09:47:34
Karsten J.
Hallo Galenzo

Es funktioniert leider nicht. Es springt von der "For Each obj...." Zeile direkt zum Ende ohne etwas zu machen.

Was mache ich falsch?

MfG

Karsten
AW: Mehrere ausgeblendete Textboxen sichtbar machen
12.11.2003 09:56:44
GerdW 

Private Sub CommandButton2_Click()
Dim tb As control
For Each tb In me.controls
If TypeName(tb) = "TextBox" Then
tb.Visible = True
End If
Next
End Sub


Gerd
AW: Mehrere ausgeblendete Textboxen sichtbar machen
12.11.2003 10:08:59
Karsten J.
Hallo

Ich habe mal nur das Modul extrahiert und auf den Server geladen:

https://www.herber.de/bbs/user/1895.xls

Dort habe ich mehrer Textboxen und Labels die erst eingeblendet werden sollen wenn der Button JA geklickt wurde.

Mit deinem Code bekomme ich die Textboxen hin aber nicht die Labels.

Wie kann ich das auch noch bekommen?

MfG

Karsten

PS: Es werden noch viel mehr Boxen und Labels.
Anzeige
AW: welche Textboxen?
12.11.2003 09:58:47
Galenzo
hmmm - hast du die TextBoxen auch aus der Symbolleiste "Steuerelemente" eingefügt?
Wenn du die aus "Formulare" genommen hast geht's natürlich nicht so.

Sollen die TextBoxen des aktiven Blattes eingeblendet werden?

mfg
AW: welche Textboxen?
12.11.2003 10:10:32
Karsten J.
Hi

Das ich in einem Macro und dort einer Userform bin ist doch klar oder?

Falls nicht, tut es mit leid.

MfG

Karsten
AW: deine Prozedur
12.11.2003 10:19:51
Galenzo
Mist! - hab' ich doch glatt überlesen, sorry!
Also dann nimma diese Prozedur:


Private Sub CommandButton1_Click()
Dim ctl As Control
    For Each ctl In Me.Controls
        If Not TypeName(ctl) = "CommandButton" Then
            ctl.Visible = True
        End If
    Next
    TextBox1 = Sheets("Leer").Cells(2, 256).Value
    TextBox2 = Sheets("Leer").Cells(3, 256).Value
End Sub

So sollte es gehn.
Anzeige
AW: deine Prozedur
12.11.2003 10:24:08
Karsten J.
Hi

Klappt super!!!

Danke vielmals an alle dir hier anderen Helfen.

MfG

Karsten
AW: deine Prozedur
12.11.2003 11:51:19
Karsten J.
Hallo

Bräuchte nochmals eure Hilfe bei zwei sachen:

1. Ich habe einige Textboxen gesperrt, damit sie nicht verändert werden können. Jedoch wird der Text jetzt hellgrau abgebildet. Ich bekomme das nicht hin, das es wieder schwarz wird. Wenn ich unter ForeColor etwas anderes auswähle, bleit es grau.

Wie kann ich das auf schwarz ändern?

2. Wenn die Prioritäten geändert werden, dürfen es nur Zahlen sein, die durch einen Punkt getrennt sind. Komma darf nicht. Wie kann ich das verhindern oder sofort nach der eingabe auf punkt ändern?

MfG

Karsten
Anzeige

300 Forumthreads zu ähnlichen Themen

@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Anzeige
Textformatierung in einer Formel
Dieterlem

Hallo Excelfreunde,
ich möchte ein Wort fett innerhalb eines Formelergebnisses fett darstellen. Beispiel:
"WENN(A1="Ja";"Beispieltext soll Fett dargestellt werden";"")
Dabei soll nur das Wort 'Fett', fett formatiert werden.
Ist so etwas möglich?
Gruß
Dieterlem
27.10.2008 19:55:00
Thread-ID: 1019731
3 Beiträge
Zeilenumbruch in Formel
Jochen

Hallo, kann ich einen Zeilenumbruch in eine Formel berücksichtige.
Das ist meine Formrl:
=WENN(A11"";VERKETTEN(A11;"/";$C$2;" - ";B11;"/";$C$2;
"ZEILENUMBRUCH AN DIESE STELLE";$C$4;". Trommel X von ";F11);"")
Danke im voraus
Jo. Bo.
04.11.2008 13:35:00
Thread-ID: 1021604
3 Beiträge
Anzeige
Formel: Summe= Monat, Jaht und Text
Frank

Hallo, bräuchte mal eure Hilfe.
Habe eine Tabelle und möchte nur die Anzahl des Textes die in A stehen
aber nur von bestimmtem Jahr und Monat
es wird erst in M der Monat gesucht den ich in B2 eingebe
dann das Jahr in M das ich in F1 eingebe
und nun der Text der in A steht.
14.12.2008 10:38:00
Thread-ID: 1032734
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
Formel mit festem Textinhalt
Felix

Hallo Zusammen
Könnte mir jemand diese Formel überprüfen warum sie nicht geht!
C8 = ist der Name der Gesellschaft
C9 = ist das Datum z.b. 31.Dezember 2008
="Abschlussmemo für die "&TEXT(Stammdaten!$C$8;"per")&TEXT(Stammdaten!$C$9;"TT. MMMMMMMM JJJJ")
Für Eure hilfe...
30.01.2009 21:22:49
Thread-ID: 1045527
3 Beiträge
Formel und Text (Tage) einsetzen
Leon

Hi
Wie kann ich in einer Formel den Text (Tage) noch dazu schreiben:
Zelle A1/Zelle B2 gibt mir z.B Wert 39
Dahinter soll noch Tage stehen.
Kann mir Jemand helfen?
Gruß
Leon
06.02.2009 20:26:00
Thread-ID: 1047897
6 Beiträge
Objekt in Formel verwenden
Michael

Schönen Sonntagmorgen,
ich möchte mit der Bedingung, dass ein Objekt angezeigt wird oder eben nicht (innerhalb eines If-Tests) eine Berechnung durchführen.
Weiß jemand, wie ich das in die If-Formel einbaue? Die "Shapes"-Eigenschaft wie im VBA ist es offensichtlich nicht...
Wäre supe...
15.02.2009 10:45:00
Thread-ID: 1050847
5 Beiträge

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
7
2
2
4
1
5
2
5
4
2
5
1
6
2
3
4
2
4
6
1
10
2
1
10