erreur with

[fr832]

Bonjour à tous j'utilisais ce code qui fonctionne trés bien

Private Sub UserForm_Initialize()
With Feuil1
    Label3 = .[K4]
    Label4 = .[L4]
    Label5 = .[M4]
    Label6 = .[N4]
    Label7 = .[O4]
    Label8 = .[P4]
    Label9 = .[Q4]
    Label10 = .[R4]
    Label11 = .[S4]
    Label12 = .[T4]
    Label13 = .[U4]
    Label14 = .[V4]
    Label15 = .[W4]
    Label16 = .[X4]
    
End With
End Sub

mais je l'ai modifié ainsi (nom de la feuille changé) et j'ai une erreur with.
Comment dois je modifier mon code pour que ça fonctionne ? par avance merci

Private Sub UserForm_Initialize()
With "base de données"
    Label3 = .[B1]
    Label24 = .[C1]
    Label5 = .[D1]
    Label6 = .[E1]
    Label7 = .[F1]
    Label8 = .[G1]
    Label9 = .[H1]
    Label10 = .[I1]
    Label11 = .[J1]
    Label12 = .[K1]
    Label13 = .[L1]
    Label14 = .[M1]
    Label15 = .[N1]
    Label16 = .[O1]
    Label17 = .[P1]
    Label18 = .[Q1]
    Label19 = .[R1]
    Label20 = .[S1]
    Label21 = .[T1]
    Label22 = .[U1]
End With
End Sub

 

[RV37]

Re : erreur with

Bonsoir,

Tu dois metre ton nom de feuille entre parenthèse.

 

[fr832]

Re : erreur with

ok merci beaucoup je mettais des guillemets, amitiés

 

[RV37]

Re : erreur with

pour moi ce serait :

With ("base de données")
donc parenthèses + guillemets

A essayer

 

[RV37]

Re : erreur with

J'ai posté après Jean-Marcel,

Je pense qu'il a la bonne réponse.

Oups

 

[fr832]

Re : erreur with

super merci à tous mes amitiés, c'est le code de jean marcel qui fonctionne amitiés

 

[RV37]

Re : erreur with

rien à faire contre les xlsAccros ils sont trop forts.

Vive le forum XLD

 

[fr832]

Re : erreur with

trop forts et rende trop service encore merci