XL 2016 la méthode Add de l'Objet Listrows à échoué

TooFatBoy

XLDnaute Barbatruc

• 6 Février 2024

• #16

Bonjour à Mariam...

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 6 Février 2024

• #17

re
@TooFatBoy
comme je ne l'utilise plus depuis des années
je sais plus mais il me semble que call tape dans le vent si la sub ou fonction n'est pas dans un module standard
je te dis ça mais c’était avec 2007
aujourd'hui je ne pourrais pas te dire ce qu'il en est
mais comme j'ai réussi à m'en passer depuis toutes ces années , je ne vois pas de raison pour que je décide de m'en resservir

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Février 2024

• #18

Bonjour à tous,

Chez moi sur Win 11 Excel 2019 Excel plantait.

J'ai pu y remédier avec l'ouverture différée du 2ème UserForm depuis le 1er :

VB:

Private Sub BOUTON_AJOUTER_Click()
'BOUTON AJOUTER USERFORM PRINCIPAL
Application.OnTime 1, "USF_2" 'ouverture différée
Unload Me
End Sub

Private Sub BOUTON_MODIFIER_Click()
'BOUTON MODIFIER USERFORM PRINCIPAL
If Me.ListBox1.ListIndex = -1 Then
    MsgBox "Veuillez Selectionné l'Enregistrement à Modifier", vbCritical
Else
    fmAjout.ligne = Me.ListBox1.ListIndex + 1
    Application.OnTime 1, "USF_2" 'ouverture différée
    Unload Me
End If
End Sub

Bonne nuit.

 

Pièces jointes

• BaseDonnees.xlsm

  35.5 KB · Affichages: 4

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #19

re
bonsoir
je suis quasiment sur qu'il y a une chose a faire sur vos Windows 11
c'est pas normal un encombrement mémoire pareil

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Février 2024

• #20

Je ne me suis pas occupé du traitement de la date en 5ème colonne.

Il faut traiter cette date en utilisant CDate si c'est bien une date.

Ou bien entrer cette date dans la TextBox avec le format US mm/jj/aaaa.

 

Vote positif 0 Vote négatif

H

Hamadou

XLDnaute Nouveau

• 7 Février 2024

• #21

Bonjour Patrick ! Vraiment je ne sais pas comment vous remercier , j'ai mes entêtes qui s'affiche et le code qui fonctionne parfaitement , c'est ce que j'ai recherché à réaliser depuis là merci pour votre expertise

 

Vote positif 0 Vote négatif

H

Hamadou

XLDnaute Nouveau

• 7 Février 2024

• #22

job75 à dit:

Je ne me suis pas occupé du traitement de la date en 5ème colonne.

Il faut traiter cette date en utilisant CDate si c'est bien une date.

Ou bien entrer cette date dans la TextBox avec le format US mm/jj/aaaa.

Cliquez pour agrandir...

D'accord, Effectivement c'est une date je le ferai merci

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Février 2024

• #23

Bonjour Hamadou, le forum,

patricktoulon à dit:

je suis quasiment sur qu'il y a une chose a faire sur vos Windows 11
c'est pas normal un encombrement mémoire pareil

Cliquez pour agrandir...

Pas sûr que le plantage vienne de la mémoire car il ne de produisait que sur le bouton AJOUTER.

J'ai mis l'ouverture en différé sur les 2 boutons par souci de symétrie.

A+

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #24

re
Bonjour @job75 je suis quasiment sur que c'est un problème de mémoire ou gestion MDI des fentre sur les versions excel 2019 et plus
2007 2013 2016 je n'ai aucun souci (bien que 2016 commence déjà a donner des latence d'affichage significatif)
sur 2013


et j'ai dans l'idée qu'il faut aller voir un peu l'accélération matériel
je me rappelle quand j’étais sur 2007 sur pc fixe et portable(portable pas très puissant) et bien j'avais résolu le problème avec l'accélération matérielle qui utilise la memoire graphique pour tout ce qui s'affiche)

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #25

re
L'accélération matérielle est un processus dans lequel les applications déchargent certaines tâches sur le matériel de votre système, en particulier pour accélérer cette tâche. Cela permet d'obtenir de meilleures performances et une plus grande efficacité que si le même processus n'utilisait que le processeur à usage général. L'accélération matérielle peut être définie comme toute tâche déchargée vers autre chose que le processeur, mais elle fait généralement référence à la transmission de tâches aux GPU et aux cartes son1. L'accélération matérielle est une fonction importante qui permet d'utiliser non seulement le processeur principal de l'ordinateur, mais aussi le processeur de la carte graphique lors de l'exécution de tâches complexes de traitement graphique.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #26

re
1° touche windows(si vous avez pas l'input dans la barre des taches)
2° taper "paramètres graphiques" dans l'input
---------------------------------------------------------------------------


----------------------------------------------------------------------------
3°on arrive à la fenêtre paramètres graphiques
4°cliquez sur parcourir
-----------------------------------------------------------------------------------------


-----------------------------------------------------------------------------------------

5° rechercher excel.exe la boite de dialogue et selectionnez le

6°on reviens automatiquement à la fenêtre des paramètres

7°dans l'encart qui s'affiche avec excel cliquez options
-----------------------------------------------------------------------------------------

-----------------------------------------------------------------------------------------
8° la petite fenêtre des préférences graphique va s'ouvrir


9° dans la fenêtre "préférence graphiques sélectionnez "Performances élevées




10°vous obtenez ça


11° cliquez enregistrer

12° fermer la fenêtres des paramètres

désormais vous allez voir des amélioration dans divers domaines dans l'utilisation d'excel
voila

 

Dernière édition: 7 Février 2024

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Février 2024

• #27

Merci Patrick pour ces informations.

Plutôt qu'une ouverture différée on peut aussi ouvrir le 2ème UserForm en non modal :

VB:

Private Sub BOUTON_AJOUTER_Click()
'BOUTON AJOUTER USERFORM PRINCIPAL
Unload Me
fmAjout.Show 0 'non modal
End Sub

Private Sub BOUTON_MODIFIER_Click()
'BOUTON MODIFIER USERFORM PRINCIPAL
If Me.ListBox1.ListIndex = -1 Then
    MsgBox "Veuillez Selectionné l'Enregistrement à Modifier", vbCritical
Else
    fmAjout.ligne = Me.ListBox1.ListIndex + 1
    Unload Me
    fmAjout.Show 0 'non modal
End If
End Sub

Dans le fichier joint je traite aussi les dates avec CDate.

 

Pièces jointes

• BaseDonnees(1).xlsm

  36.7 KB · Affichages: 0

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #28

re
@job75
ouvrir le 2 en non modal si le 1 l'est aussi non?

purée je viens de faire la manip accélération matérielle
même avec des MFC très nombreuse je booste comme un dingue

sur 2016 le teste de la capture et export graphique(image blanche si on ne fait pas ton astuce du multi paste dans un do/loop)
et bien terminé çà booste comme sur 2007

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Février 2024

• #29

patricktoulon à dit:

re
@job75
ouvrir le 2 en non modal si le 1 l'est aussi non?

Cliquez pour agrandir...

Non le 1er peut être ouvert comme on veut car on le ferme avant d'ouvrit le 2ème.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 7 Février 2024

• #30

re
ha ok si il est fermé oui
ça fait tu moulinage ça quand même

le fait que tu me décrive que ça fonctionne comme, me conforte dans l'idée que c'est bien un soucis de gestion des fenêtre MDI

 

Vote positif 0 Vote négatif