Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Exception suite à utilisation de combobox

P

POLO

Guest
Re-Bonjour le forum !!!

J'ai un soucis que je ne m'explique pas depuis plusieurs jours.
Est-ce que quelqu'un connait ?
j'écris le code suivant pour initialiser une Combobox (avec un tableau) destinée à me rendre un historique de fichiers.
Le problème est qu'aléatoirement j'obtiens un plantage complet d'Excel avec une exception et un message du style "Violation d'accès, la mémoire ne peut pas être read..."
Que fais-je de mal ???
Merci d'avance pour votre aide !

POLO



code du module:


' **************Partie déclarations
Dim TFichier(105) As Variant


' **************Partie procédures
Private Sub ComboBoxFichier_Enter()
ComboBoxFichier.ColumnCount = 1
For i = 1 To 100
TFichier(i - 1) = Workbooks("ClasseurOutils.xls").Sheets("Feuil1").Range("A" & i).Value
Next i
ComboBoxFichier.List() = TFichier

End Sub
 
Z

Zon

Guest
Salut,

D'aprés Support Microsoft c'est un pb connu pour NT4 et windows 2000, il faut télécharger les services packs adéquats.

Tu peux remplir ta combo de la façon suivante, tu peux omettre Workbooks si ton usf est dans le classeur actif.

ComboBoxFichier.List = Workbooks("ClasseurOutils.xls").Sheets("Feuil1").Range("A1","A100").Value


A+++
 
P

POLO

Guest
Merci beaucoup Zon.
En fait ton aide m'a été précieuse parce que je ne savais pas utiliser comme ça l'aide Microsoft.com.
Je vais de ce pas essayer ta portion de code.


POLO
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…