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
136to140
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
136to140
136to140
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Steuerelemente

Steuerelemente
13.07.2002 23:17:23
Kerstin
Hallo an alle ,

wie kann ich einer Scrollbar oder einem Drehfeld mitteilen das wenn ich vorwärts oder rückwarts blättere dass dann in meinem Formular (4 Textfelder) die entsprechenden Werte aus der Excel Tabelle eingetregen werden?
Also rückwärts vorherige Datensatz (4 Spalten) oder vorwärts.

Schon mal Danke
Kerstin

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

Betreff
Datum
Anwender
Anzeige
Re: Steuerelemente
14.07.2002 00:06:13
L.Vira
Nehmen wir an deine Daten stehen in Zeile 1 bis 100 jeweils
in den Spalten 1 bis 4
Spinbutton max = 100, min = 1

Private Sub SpinButton1_Change()
Textbox1 = Tabelle1.cells(spinbutton1,1)
Textbox2 = Tabelle1.cells(spinbutton1,2)
Textbox3 = Tabelle1.cells(spinbutton1,3)
Textbox4 = Tabelle1.cells(spinbutton1,4)
End Sub

Das ist das Prinzip, geht aber auch eleganter.

Re: Steuerelemente
14.07.2002 00:32:59
Kerstin
Halllo L.Vira
aber da passiert nichts, hab ich auch schon so probiert.

Kerstin

Re: Steuerelemente
14.07.2002 07:00:29
Hajo_Zi
Hallo Kerstin

dann löse es mit L.Vira Ihrem Ansatz so

Gruß Hajo

Re: Steuerelemente
14.07.2002 16:23:55
L.Vira
Hab vergessen zu schreiben, dass das die Codenamen der tabellen sind, sonst eben so:

Textbox1 = Sheets("Tabelle1").cells(spinbutton1,1).Value

Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige