bonsoir à tous,

Mon problème "le focus ne peux être déplacé sur le contrôle............."

je précise que se fichier et ancien et marche très bien sous XL 2000 mais j'ai 2010 et la sa cloche


merci pour le coup de main car je cherche depuis un moment

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub TabStrip1_click(ByVal Index As Long)
Dim typ As String
Select Case Index
Case 0 'recherche
    Label106.Visible = False ' affichage de l'immat en cour
    TextBox1.Visible = True 'boite de saisie de l'immat à rechercher
    TabStrip1.Value = 0 'bascule sur le tabstrip qui vas bien
    Cancel = True
    TextBox1.Enabled = True
    TextBox1.SetFocus '<---------- ligne avec le problème !
    TextBox1.SelStart = 0
    TextBox1.SelLength = 10
    Frame1.TabStop = False
    masquage
....................................