Erreur 13 VBA/UserForm

Arpam Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


j'aii récemment intégrer une entreprise avec pour but de créer une base de donnée sur Excel.
N’y connaissant rien en langage VBA, je requière vos connaissances afin de faire les choses au mieux.
L’idée derrière cette base de donnée est de rechercher des occurrences (avec les portes logiques « ET », « OU » et « SAUF ») et d’en afficher les lignes.
Je vous joins un petit fichier Excel.

Malheureusement, j'ai un message 'erreur 13 : incompatibilité de type' j'ai regarder plusieurs fois mon code mais je ne trouve aucun problème ( je ne suis pas très bon).

Si l'un de vous aurais les connaissance ainsi que la gentillesse de jeter un coup d'oeil sur ma macro, je l'en remercierai.

Bien à vous.

Louis

http://www.cjoint.com/c/GBjnYmJ1Xbj
PS : La colonne réponse est vide c'est normale mais normallement il y a du texte.
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

N’y connaissant rien en langage VBA
Qui a ecrit ce code ?
Que cherchez vous: n'importe quoi-n'importe ou, ou quelque chose d'un peu plus structuré
0
Arpam Messages postés 3 Date d'inscription   Statut Membre Dernière intervention  
 
L'UserForm me permet d'afficher une boite de dialogue afin de trouver ces mot-clés dans la feuille et une fois qu'il les a trouvé je veux qu'il affiche les lignes la ou les occurences ont été trouvé.
Le code macro est certe long mais il comprend des portes logiques "ET", "OU" et "SAUF".

Lorsque je clic sur le débogage il m'affiche la ligne:
Me.ListBox1.List = Application.Transpose(TL) ' alimente la Listbox1 avec le tableau TL transposé


Je n'ai pas réussi à trouvé ce qu'il ne va pas dans mon code.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Arpam Messages postés 3 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Ce sont vos tableaux TL et TS qui sont en cause, il faut inverser colonnes et lignes.
Pour palier a cela, j'ai ajoute du code pour retablir le bon ordre. il faudrait voir a la construction de ces tableaux, petit bemol: le redim ne peut se faire que sur le deuxieme index. A vous de voir car un peu alambique le code

https://www.cjoint.com/c/GBkplEJUKIf

A+
0
Arpam Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   > f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour ta réponse, on avance un peu, je pense qu'en faite travailler dans une boite de dialogue n'est pas pratique car elle ne permet pas de voire entierement la colonne "Question".

L'inversion de colonne et de ligne est-il obligatoire car je prefere éviter rajouter du code inutillement, d'autant plus que je souhaite garder la présentation des lignes entre ma feuille excel et la réponse affichée dans ma boite de dialogue
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Arpam Messages postés 3 Date d'inscription   Statut Membre Dernière intervention  
 
Re,
L'inversion de colonne et de ligne est-il obligatoire
Oui, puisque pas marche
Alors, si vous avez regarde le fichier joint, y a mal donne car y pas les modif, apparemment erreur de ma part sur sauvegarde
Colonne question: ben oui, afficher un livre c'est pas simple

Faites un affichage dans une feuille
0