XL 2016 POsition Listview

B

bof

XLDnaute Occasionnel

• 22 Juin 2024

• #2

Bonjour,
Pour mois ce classeur est inutilisable. Non compilable pour cause multiples.
A+

 

Vote positif 0 Vote négatif

B

bernardrustrel

XLDnaute Occasionnel

• 22 Juin 2024

• #3

bof à dit:

Bonjour,
Pour mois ce classeur est inutilisable. Non compilable pour cause multiples.
A+

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

B

bernardrustrel

XLDnaute Occasionnel

• 22 Juin 2024

• #4

Bonjour. N'étant pas à l'abri d'une erreur. J'ai pu ouvrir le fichier en question après l'avoir téléchargé.
Pourriez vous me preciser la nature des problèmes que vous avez rencontré.
Cordialement, Bernard

 

Vote positif 0 Vote négatif

jurassic pork

XLDnaute Occasionnel

• 22 Juin 2024

• #5

Hello,
comme problème par exemple, ton classeur n'est pas compatible 64 bits (moi je suis en Excel 64 bits) à cause des déclarations d'API windows, il y a aussi des références à Adobe Acrobat et Adobe Distiller que tout le monde n'a pas. Il faudrait un classeur avec beaucoup moins de code, sans API windows, qui ne fait appaître que le problème des listviews ( celles qui sont dans UsfFichier ?). Et que se passe-t-il exactement dans le formulaire quand le problème apparaît ?
Ami calmant, J.P

 

Dernière édition: 22 Juin 2024

Vote positif 0 Vote négatif

B

bernardrustrel

XLDnaute Occasionnel

• 22 Juin 2024

• #6

Merci, pour vos remarques. Il est vrai que il y a beaucoup de code, je vais essayer de remédier à la chose.
Cordialement, B

 

Vote positif 0 Vote négatif

B

bof

XLDnaute Occasionnel

• 22 Juin 2024

• #7

Bonjour,
Faites Débogage > Compiler VBA project vous promènera dans toutes les erreurs de codage. Je me suis arrêté aux 2 premières fonctions...
A+

 

Vote positif 0 Vote négatif

B

bernardrustrel

XLDnaute Occasionnel

• 23 Juin 2024

• #8

Bonjour s
Je reviens avc mon souci de positionnement de la "listview1". J'ai allege le fichier, il est vra que c'etait le bazard pour etre poli. Je l'ai compile et pense y avoir upprimer les erreurs.

Voila ce qu'il faut faire pour avoir le probleme
1/ Click bouton "Video"
2/ Bouton "Dossier"
La listview1 est alimentee par une liste de video
3/Click bouton "Inventaire"
Listview2 et Listview3 apparaissent alimentées
4/ Double Click sur une ligne de la listview3 (celle de droite)
la listview1 apparait alimentée mais se trouve a cheval sur le bord superieur gauche de la Frame. En faisant glisser le USF elle reprend sa place, à l'iintérieur de la Frame.

J'aimerais que ce changement impromtu de position cesse.
Merci à tous pour votre aide et conseil.
Cordialement, Bernard

 

Pièces jointes

• ClasseurEssai.xlsm

  99.9 KB · Affichages: 3

Vote positif 0 Vote négatif

jurassic pork

XLDnaute Occasionnel

• 23 Juin 2024

• #9

Hello,
il y a encore pas mal d'erreurs dans le classeur. J'ai mis toutes les lignes en erreur en commentaire et je suis arrivé à ouvrir ton formulaire. J'ai trouvé une solution temporaire à ton problème (en attendant mieux) : dans la procédure de double clic de la Listview3 décaler le formulaire d'un pixel vers le bas :

VB:

Private Sub ListView3_DblClick()


Dim X As Long
 
    'With UsfFichier
        ListView3.FullRowSelect = True
        ListView3.Enabled = True
        For X = 1 To ListView3.ListItems.Count
            If ListView3.ListItems(X).Selected = True Then
                TextBox3 = ListView3.ListItems(X).Text
            End If
        Next X
      
        ListView1.Visible = True
       Me.Top = Me.Top + 1   ' Modif ici
    'End With
      
        AffichFilmActeur
        InitCritVideoGenea
      
End Sub

Ami calmant, J.P

 

Vote positif 0 Vote négatif

B

bernardrustrel

XLDnaute Occasionnel

• 23 Juin 2024

• #10

BonjouR JP, merci pour cette solution, qui permet de pallier au défaut. En outre comment explique t on ce défaut, est ce un bug de VBA ou tout autre chose.
Encore merci a toi.
Cordialement, Bernard

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 23 Juin 2024

• #11

Bonjour le Fil
il m'est souvent arrivé ce problème !
Ma solution Lol
mettre la ListView dans Un Frame dimensionné aux dimensions de la ListView.(je n'avais pas vu la superposition des Listview)
Bonne Journée
Jean marie
Edit : Après avoir décoché les Nombreuses références manquantes
Chez moi pas de problème d'affichage des ListView (en suivant la Liste des opérations a faire)

 

Pièces jointes

• ListView Position-1.gif

  199.9 KB · Affichages: 10

Dernière édition: 23 Juin 2024

Vote positif 0 Vote négatif

jurassic pork

XLDnaute Occasionnel

• 23 Juin 2024

• #12

bernardrustrel à dit:

En outre comment explique t on ce défaut, est ce un bug de VBA ou tout autre chose.

Cliquez pour agrandir...

Je ne sais pas d'où cela vient. Et pour éviter de décaler le formulaire : après avoir décaler le formulaire d'un pixel vers le bas, le décaler d'un pixel vers le haut juste après :

VB:

Me.Top = Me.Top + 1
Me.Top = Me.Top - 1

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 23 Juin 2024

• #13

Bonjour tous,
J'ai rencontré ce PB sur des listview sur multipage
Pour que la liste se retrouve à bonne hauteur il me fallait changer de page et revenir
Donc à l'ouverture je navigue sur toutes les pages et reviens à la 1ère
J'ai adapté le même principe sur la macro et c'est bon
Ajouter les 2 dernière lignes

En double_click de listview3
Next X
ListView1.Visible = True
'End With

AffichFilmActeur
InitCritVideoGenea
''''ces 2 lignes en plus
ListView1.Visible = False
ListView1.Visible = True
End Sub

Bruno

 

Vote positif 0 Vote négatif