Thema Datum  Von Nutzer Rating
Antwort
Rot Objektbezeichnung aus Variablen zusammenstellen
 16.09.2005 17:35:44 Helmut
NotSolved
19.09.2005 12:20:19 Oliver
NotSolved

Ansicht des Beitrags:
Von:
Helmut		 Datum:
16.09.2005 17:35:44		 Views:
1884		 Rating:
     
Antwort:
  Ja
Thema:
Objektbezeichnung aus Variablen zusammenstellen
Hallo Zusammen,

habe mal wieder ein Problem wo ich absolut nicht weiter komme:

Ich möchte eine Reihe von Objekten in einer Userform über eine Schleife (For ...next) mit den erforderlichen Daten und einstellungen füllen. Dazu habe ich eine Excelliste mit den Spalten: Name des Objektes, Eigenschaft, Zuordnung erstellt. In Spalte 1 finde ich den Namen des Objektes in Userform uf3. Die Eigenschaft ist zum Beispiel Visible. Unter Zuordnung habe ich eine Zelle aus einer weiteren Datentabelle beschrieben z.B. worksheet("datentabelle.cells(a,55)).

Ich möchte nun bei der Aktivierung der Uferform3 diese Schleife durchlaufen lassen in Form wie nachstehend beschrieben:


For textfeld = 131 To 157 'gehe von Zeile 131 bis 157
eigenschaft = ws2.Cells(textfeld, 2) 'z.B. Visible, Top, Left, etc.
zuordnung = ws2.Cells(textfeld, 3) 'Datenzuordnung aus 2.Datentabelle
(z.B. Wert für Top 300)


uf3.Controls(ws2.Cells(textfeld, 1)).eigenschaft= zuordnung

'in der obigen Zeile soll nun das Objekt angesprochen werden, dann die Eigenschaft zugefügt und letzendlich der Wert als Zuordnung aus der 2. Tabelle
zugeteilt werden.


Next textfeld 'dann soll bis zur Zeile 157 so wie oben beschrieben verfahren werden


Ich hatte schon vor 3-4 Wochen ein so ähnliches Problem und da hat mir ein NEPUMUK (vielleicht liest Du ja auch zufällig diese Anfrage von mir) einen Lösungsansatz genannt wie folgt:

controls(cells(22,4).text).hight=120

Dieser Lösungsansatz hat mir auch weitergeholfen und in der anderen Anwendung so funktioniert. Nun möchte ich eine Userform anhand einer Datentabelle über die oben aufgeführte Schleife (For ... next) aufbauen (in aktivate des uf3) und habe hier die Position in NEPUMUKS Lösung "hight" variabel machen wollen (Eigenschaft). Gleichzeitig sollten die Werte (Beim NEPUMUK die 120) auch über eine Variable zugeführt werden.
VBA sagt mir entweder Typenkonflikt oder Objekt konnte nicht gefunden werden.

Zur Zeit bin ich schlichtweg ratlos, warum die Lösung von NEPUMUK wunderbar läuft und mein Ansatz (Zuordnungen über Variablen) nicht.

Weiß jemand von Euch was ich mal wieder falsch mache????

Würde mich über eine Antwort freuen!
Gruß,
Helmut Palmen

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Objektbezeichnung aus Variablen zusammenstellen
 16.09.2005 17:35:44 Helmut
NotSolved
19.09.2005 12:20:19 Oliver
NotSolved