Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
264to268
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
264to268
264to268
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Setfocus i.o. nur bei 98

Setfocus i.o. nur bei 98
05.06.2003 21:55:36
Walter
Hallo Zusammen,
hatte Problem mit SetFocus gehabt.
Jetzt habe ich solange gefummmmmmelt bis ich dahinter gekommen bin.
In Excel 7 funktioniert es. In Excel97 nicht.
Habe folgendes Makro :
Private Sub MultiPage1_Change()
TextBox1.SetFocus
End Sub
Gibts bei 2000 was besonderes ?
Wenn ja bin dankbar wenn mir jemand einen Tip gibt.
Gruss Walter


6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Setfocus i.o. nur bei 98
05.06.2003 23:18:43
RAnton

Hallo Walter

wo hast du denn die TextBox1 versteckt? Kann es sein, daß sie nicht im WB erreichbar ist?

Gruß
RAnton

Re: Setfocus i.o. nur bei 98
06.06.2003 09:24:01
walter

Hallo Anton,
herzlichen Dank für die Info.
Habe die Textbox1 nicht versteckt.
Ich habe eine UserForm erstellt und dann 2 MultiPage Seiten
erstellt und auf der ersten Seite sind die Textboxen.
Was meinst Du in WB nicht erreichbar ?
Ich freue mich wenn Du mich aufklären könntest.
Gruss Walter

Re: Setfocus i.o. nur bei 98
06.06.2003 09:43:01
RAnton

Hallo Walter,

kannst du denn die Textbox1 in den UserForm ansprechen. D.h. kannst du Werte eingeben und kannst du sie wieder lesen.

WB=Workbook

Gruß

RAnton

Anzeige
Re: Setfocus i.o. nur bei 98
06.06.2003 10:17:33
Walter

Hallo Anton,
hier meine Makros:
Private Sub UserForm_Initialize()
Dim Datum1
Label1.Caption = Format(Date, "YYYY")
TextBox3 = Format(Worksheets("Datenbank").Range("A12").Value, ("###,##0.00"))
'so geht auch Format mit TAB-Taste direkt rein !
Walter.TextBox1.SetFocus
End Sub


Hier, bei dem Datenfreigabebutton blinkt der Courser:
Private Sub Datenfreigabe_Click()
TextBox3 = Format(Worksheets("Datenbank").Range("A12").Value, ("###,##0.00"))
'so geht auch Format mit TAB-Taste direkt rein !
TextBox1.SetFocus
End Sub


Im folgenden Makro wiederum nicht, wieso?
Private Sub CommandButton1_Click()
TextBox3 = Format(Worksheets("Datenbank").Range("A12").Value, ("###,##0.00"))
'so geht auch Format mit TAB-Taste direkt rein !
' Walter.TextBox1 = Range("a12").Text
Walter.TextBox1 = SetFocus
Walter.Show
End Sub

Also auslesen funktioniert, hatte nur später festgestellt das
ich die MultPage Seite ansprechen muß oder ?

Also in Excel7 funktioniert nur nicht in Excel 97
Gruss walter

Anzeige
Re: Setfocus i.o. nur bei 98
06.06.2003 13:25:03
RAnton

wieso verwendest du unterschiedliche Anweisungen

1. Walter.TextBox1.SetFocus

2. TextBox1.SetFocus

3. Walter.TextBox1 = SetFocus
Walter.Show

Ist das richtig so?

Gruß

RAnton

Re: Setfocus i.o. nur bei 98
06.06.2003 14:36:12
Walter

Hallo Anton,
der Vorschlag kam von Hajo hatt nur probiert.
Gruss Walter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige