Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
320to324
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
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Range-Objekt und Schleifen

Range-Objekt und Schleifen
12.10.2003 19:16:04
andreas
Hallo Leute,

ich habe in einer UF viele Checkboxen und in der dazugehörigen Tabelle sollen jeweils die Werte übertragen werden.

Tabelle1.Range("feld1")=UF.CheckBox1
Tabelle1.Range("feld2")=UF.Checkbox2
usw.

Wie kann ich dieses mit einer Schleife lösen?

Danke und tschüß
andreas

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Range-Objekt und Schleifen
12.10.2003 19:29:23
Hajo_Zi
Hallo Andreas

Schreibe das Rangefeld in die Tag de Checbox und lase eine Schleife über alle Checkboxen laufen und lese dabei die Eigenschaft Tag aus. Ein Beispiel dazu für Textboxen findest Du auf meiner Homepage.



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Bitte besuchen Sie ?
12.10.2003 19:45:07
Hajo_Zi
Hallo H--o

schlecht geschlafen???

Aber mit solchen Beiträgen müssen wir eben auch Leben im Forum.

Einige Leute lernen es nicht, da hilft auch kein Löschen.



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Danke Hajo
13.10.2003 19:11:24
andreas
Dank deiner Hilfe habe ich mir viel Tipparbeit erspart;-)

Dim obj As Object
For Each obj In Me.Controls
Select Case TypeName(obj)
Case "ComboBox"
Worksheets("Tabelle1").Range(obj.Name & "") = obj.Text
Case "CheckBox"
Worksheets("Tabelle1").Range(obj.Name & "") = obj
End Select
Next

Und tschüß
andreas

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige