XL 2010 erreur d'execution "13"

[MAN]

bonjour le forum bonjour a tous
j'ai mon fichier ci joint. il fonctionne normalement jusqu'à ce que j''alimente la listview 1 du MARIO; LORSQUE JE RENSEIGNE DONC LES TEX BOX 19 0 21? J4OBTIENS LE MESSAGE erreur d'execution "13"INCOMPATIBILIT2 DE TYPE Toutes les données insérés dans les colonnes AB et y sont flouées avec les colonnes Z et AC #VALEUR# aidez moi a resoudre le probleme svp. le code macro est 96663204 dans le cas ou ça se bloque. merci d'avance pour les reponses.
cliquez sur APPELER de la l'onglet 1 puis sur MARIO DE L'USF.

 

[Lone-wolf]

Bonjour MAN et bienvenue sur XLD

Moi je ne vais pas y mettre les mains mais tu pourrais enlever le mot de passe du projet VBA. Et ce n'est pas CODE 96663204 Mais mot de passe. Il faudrais faire une capture d'écran de la ligne(en jaune) qui cause problème.

 

[MAN]

Bonsoir Monsieur la page il suffit d'enlever la protection de la feuille sans mdp après ouvrir le projet va qui demande le mdp qui est 96663204 vous aurez accès au projet

 

[MAN]

bonjour le forum bonjour a tous.
voici la partie du code vaa qui cree probleme et presque toutes les lignes en fonction des circonstances.
ci joint le fichier après cet obstacle.
cette fois, cet la ligne de code ci dessous
.Controls("Label" & i + 8) = Range("Z" & i) 'mise à jour des Labels 13 à 18
Sub refreshCalcul()
For i = 5 To 10
With Me
.Controls("Label" & i + 8) = Range("Z" & i) 'mise à jour des Labels 13 à 18
With Me
.Controls("Label" & i + 35) = Range("AC" & i) 'mise à jour des Labels 40 à 45
End With
With Me
.Controls("Label" & i + 29) = Range("AD" & i) 'mise à jour des Labels 34 à 39
End With
End With
With Me.Label56
Label56 = Range("Y3").Value
End With
With Me.Label57
Label57 = Range("AD3").Value
End With
With Me.Label59
Label59 = Range("Z3").Value
End With
Next i

End Sub

 

[MAN]

rebonjour le forum
je ne reçois pas d'avis?

COMMENT FAIT ON UNE CAPTURE D'ECRAN afin que je puisse présenter les défaillaces du fichier ci dessus joint