Probléme de renvoie d'une valeur d'une autre feuil

nizar.achich.2018 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Sub calcul_semelle_dimensionnement()
Dim i, A, x, y, d1, d2, h As Integer
Dim Sigma_calcul, h1, d As Single
T=Worksheets.("Feuille1").Range("B4").Value

svp je ne trouve pas c'est quoi le probléme est ce que quelqu'un peut m'aider?


1 réponse

Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   338
 
Bonjour
Pas de point après worksheets
Il faut déclarer toutes les variables individuellement
    Dim i  As Long, A As Long, x As Long, y As Long, d1 As Long, d2 As Long, h As Long
    Dim Sigma_calcul As Single, h1 As Single, d As Single
    T = Worksheets("Feuille1").Range("B4").Value
Cdlt
0