activation d'une feuille pour l'execution de la suite du programme

activation d'une feuille pour l'execution de la suite du programme - VB/VBA/VBS - Programmation

Marsh Posté le 01-06-2005 à 09:39:30    

Bonjour,  
je programme depuis peu en VB6 et la je suis confronté un probleme que je n'arrive pas a resoudre. c'est pourquoi je vous demande de bien vouloir m'aider.  
avec un programme en VB6, j'ouvre un fichier excel pour y effectuer une recherche.le probleme c que je dois d'abord activer le fichier puis une feuille precise (par exemple la feuille 1).  
j'ai ecris ceci:  
workbooks(Chemin).Select  
Worksheets(feuil1).Select  
 
'dans chemin se trouve le chemin d'accés du fichier ouvert  
mais a l'execution ca me met : indice en dehors de la plage en me surlignant workbooks(Chemin).Select  
(je ne comprend pas trop ce que ca veux dire).  
 
si quelqu'un peut m'aider. je le remercie d'avance
 

Reply

Marsh Posté le 01-06-2005 à 09:39:30   

Reply

Marsh Posté le 06-06-2005 à 15:20:49    

Petite piste pour t'aider :
1- si tu dois activer utilise activate.
2-Chemin semble pas être reconnu, verifie que ta variable chemin a bien la forme "xxx.xls" si ce n'est pas le cas tu peux essayer avec : workbooks(Chemin & ".xls" ).activate
 
sinon je crois qu'il faudra plus de détails
@+


Message édité par watashi le 06-06-2005 à 15:22:20

---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)
Reply

Marsh Posté le 06-06-2005 à 17:03:27    

il faut que tu déclare d'abord ton fichier et feuille en tant que variable (ca sera plus imple d'utilisation)
dim xlapp as excel.application
dim xlwkb as excel.workbook
dim xlwks as excel.worksheet
 'pour ouvrir excel (si cpa deja fait)
set xlapp = new excel.appliacation
Pour ouvrir ton fichier  
set xlwkb = xlapp.workbooks.open(chemin)
'cela va "initialiser xlwkb"
'ensuite tu défini ta feuille
set xlwks = xlwkb.sheets(nom de ta feuille ou numero de ta feuiile)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed