Recherche:

essaye
end

Je pensais que ça marchait sur VB6...
Tu peux aller voir ici: http://www.developpez.net/forums/showthread.php?t=6886&highlight=hwnd+vba

Essaye un truc comme ça:

mi.Do open table "Z:\MapInfo\Excel\Cat6.TAB"

Tu travaille à partie de koi? Excel ou Mapinfo?
Pour moi, ton chemin doit être obligatoirement entre guillemets

tu devrais peut-être mettre la ligne
declare function .... dans un module

tu n'as pas laisser les numéros: 1. 2.

le code que tu as doit être mis entre ces 2 lignes:

Private Sub CommandButton1_Click()

End Sub


A adapter selon le nom de ton bouton

faut mettre B4 en premier alors...

Tu as vérifié tous les noms de classeur et de feuilles?

Ton tableau n'est pas dimensionner donc la case de ton tableau n'existe pas.
De plus, sur la ligne où il y a l'erreur, j'aurai échangé les 2 éléments car, là, tu change la valeure de...

Vu le message d'erreur, je dirais que tu as un problème dans les noms de classeur ou de feuille. Donc vérifie bien chaque nom(espaces, accents...)

l'erreur se produit à quelle ligne?

je sais pas si ça peut venis de ça (sincèrement jepense pas) mais ya une faute de frappe dans
Appliaation.ScreenUpdating = True

je pense que pour commencer tu pourrais utiliser l'enregistreur de macro, au moins pour la partie de copie.
ensuite pour la derniere vide, je suppose que c'est première ligne vide, et il suffit...

A ton service ;)

pour les largeurs de colonne je sais pas

et tu te base sur koi pour la supprimer? tu la sélectionne?

supprimer une enregistrement dans koi? Access, ta liste, ou excel?

ça y est , ya plus du tout de problème? tu as exactement ce que tu veux?

oui c'est une bonne idée. tu fais ça et tu me dis si tu bloques

je crois que oui. en fait il faut que tu fasse une nouvelle requete avec ce que tu veux dedans, tu pourrais mettre le résultat dans une liste invisible (ya surement une meilleure solution mais pour...

je t'écoute, mais fait pas trop dur stp, je vais finir par fatiguer... :?

ça veux dire que ça marche?

essaye avec ça:

wsExcel.Range(Chr(j + 65) & i + 1).Value = lstResults.Column(j, i)

c koi comme liste? zone de liste, liste modifiable?