online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Lheom_C vom 16.09.2020, 13:58 Options

Eigenschaften von MSFoms Objekten

Hallo

gibt es die Möglichkeit bei Excel/VBA gleichzeitig die eigenschaften von mehren MSFoms Objekten zu ändern?

z.B.
AllTextboxes.Enabled = True

Danke Chris


Antwort schreiben

Antwort 1 von Teerbaby vom 16.09.2020, 14:44 Options

mal ohne Anspruch auf korrekte Syntax, geht das in etwa so

dim c as control
for each c in Me.Controls
  if typeof(c) = "Textbox" then
    c.enabled = true
  end if
next

Antwort 2 von Lheom_C vom 16.09.2020, 15:14 Options

Danke für die Antwort
Nach ein paar Syntaxanpassungen in der IF-Anweisung hat das Programm nicht mehr gemeckert

Dim c As Control
     For Each c In Me.Controls
        If TypeOf c Is TextBox Then
        c.enabled = true
        End If
    Next


Aber irgend eine Wirkung hat es auch nicht gezeigt.

Chris

Antwort 3 von Teerbaby vom 16.09.2020, 16:21 Options

Unter VB mit Windows-Forms funzt das. Hast du das mal debugged?

Antwort 4 von Lheom_C vom 17.09.2020, 07:02 Options

währen des debuggen zeigt VBA die ganze Zeit
c=nothing

an. Er scheint also keine TextBox zu finden obwohl 4 Stück eingebaut sind.

Chris

Antwort 5 von Lheom_C vom 17.09.2020, 07:13 Options

Sorry,
das war eine Falschmeldung.
Während der For-Schleife findet er die vier Textboxen
und zeigt z.B.

c=box1


an

Antwort 6 von Lheom_C vom 17.09.2020, 07:18 Options

Noch ne Falschmeldung

die Anzeige entsprache den .value von c

Antwort 7 von Lheom_C vom 17.09.2020, 08:42 Options

Ich habe die
TypeOf
-Anweisung mit anderen Controlobjekten ausprobiert.
CommandButton
Togglebutton

funtionieren
Textbox
Label

funktionieren nicht.
Wieso????

Antwort 8 von Teerbaby vom 17.09.2020, 09:38 Options

Versuch mal
Type of c is MSForms.Textbox

Gibt ja noch die System.Windows.Forms.Textbox

Antwort 9 von Lheom_C vom 17.09.2020, 09:41 Options

Will man TypeOf auf Textboxen anwenden dann muss man
... Is [b]MSForms[/b].Textbox

in die If-Anweisung schreiben.
Warum man das bei CommandButton nicht brauch weis ich nicht, aber mein Problem ist gelöst

Ähnliche Themen

Diagrammerstellung in Excel
AlCapole  07.03.2007 - 100 Hits - 2 Antworten

automatische Zellenformatierung
gone2fast  08.03.2007 - 77 Hits - 4 Antworten

Teil einer Zelle auslesen
broedu  07.03.2007 - 176 Hits - 4 Antworten

Dateinamen nicht immer angeben müssen !!!
Kennyger  08.03.2007 - 52 Hits - 3 Antworten

Wenn-Funktion???
kiri  23.06.2008 - 144 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026