Dépassement capacité

bonjour,

suite a plusieurs modif je me retrouve avec Dépassement capacité a l'ouverture de l userform3,

par contre des que je le rouvre c'est bon ,cela ce passe juste a la première ouverture

au démarrage il faut peut changer la destination des photos

MDP

pour affichage des toutes les feuilles user:ADMIN mdp:ADMIN

Bonsoir Cisco38,

Chez moi, cela semble fonctionner. Tu n'as pas compressé les images avant de les zipper ?

Bonjour,

Private Sub ComboBox_Platine_Change()
Dim n As String, Fichier1$, chemin As String, combo As String, i
     ...
    Dim no_colonne As Integer, nb_lignes As Integer
    ....
    'Nombre de lignes de la colonne  choisi :
    nb_lignes = Cells(3, no_colonne).End(xlDown).Row

A l'ouverture tu es sur la feuille d'accueil qui n'a aucune donnée.

Cells(3, no_colonne).End(xlDown).Row => 65536 et nb_lignes As Integer (<=255)

eric

Ok je dois donc lui dire que c est sur la feuille 2 qu il doit chercher les valeurs

Bonjour,

Voilà, partout où c'est nécessaire.

eric