BLOCAGE DES PROPRIETES DE L'USF

  • Initiateur de la discussion Initiateur de la discussion MAN
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

MAN

XLDnaute Occasionnel
bonjour le forum. bonjour a tous
j'ai mon fichier excel qui fonctionnait bien jusqu'au jourdh'ui. mais j'ai voulu le develloper mais il bloque. exactement au niveau de MARIO de l'usf 1 que l'on appelle par APPELER DE CHAQUE FEUILLE DE CALCUL. lorsque vous rennseigner les text box et que vous tapez entrée, l'usf bloque. ATTENTION MOT DE PASSE 96663204; MERCI D'avance pour toute aide que je pourrai avoir du forum
 

Pièces jointes

Bonjour
dans la macro Private Sub UserForm_Initialize() de l'userform5
Il manque la feuille REC (For i = 3 To Sheets("REC").Range("AF65536").End(xlUp).Row...)
il n'y a rien en colonne 33
For Each cel In ActiveSheet.Columns(33).SpecialCells(xlCellTypeConstants)
De plus une boucle For k = 33 To 33 je vois pas bien à quoi elle sert...
A+ François
 
bonjour,

il n'y a pas d'userf 1 !?

il y a une erreur (pas de cellule correspondante) dans l'userf5 ici:
For Each Cel In ActiveSheet.Columns(33).SpecialCells(xlCellTypeConstants)

pour voir, tu te places sur le code de l'userf, et tu l'exécutes au pas à pas avec la touche F8

et j'espère que tu t'y retrouves dans tous tes
End With
End With
End With
End With
End With
End With
End With
End With
End With
End Sub
qui n'en finissent pas !?

manque de lisibilité !
 
Dernière édition:
rebonjour le forum. c'est bien grace a ce forum que j'ai crée ce fichier en 2014. je suis un peu troublé il est vrai. cela peut servir aux autres un autre jour. MODIFIEZ; AMELIOREZ, CHANGEZ A VOTRE GUISE POURVU QUE NOUS EXECUTONS CE FICHIER. merci encore
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour