Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
4159 connectés 

 


Dernière réponse
Sujet : ouvrir types de fichiers en VB
Styx0 Tu utilises conjointement l'API Vb "Dir" (qui permet de parcourir le repertoire )et la librairie Microsoft Excell - excel9.olb (qui te permet de commander Excell 2000 à partir de VB)
 
ou soit l'API "Dir" + l'API Shell Execute dont voici un exemple
(mais par contre tu n'auras la main sur Excel - il sera indépendant de VB)

Code :
  1. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
  2.     (ByVal hwnd As Long, _
  3.     ByVal lpOperation As String, _
  4.     ByVal lpFile As String, _
  5.     ByVal lpParameters As String, _
  6.     ByVal lpDirectory As String, _
  7.     ByVal nShowCmd As Long) As Long
  8. Const SW_SHOWNORMAL = 1


exemple:
 
ShellExecute 0, vbNullString, "EXCEL.EXE", <NOM DE TON FICHIER EXCEL>, "C:\Program Files\Microsoft Office\Office", SW_SHOWNORMAL

 

[edtdd]--Message édité par Styx0--[/edtdd]


Votre réponse
Nom d'utilisateur    Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Le ton de votre message                        
                       
Votre réponse


[b][i][u][strike][spoiler][fixed][cpp][url][email][img][*]   
 
   [quote]
 

Options

 
Vous avez perdu votre mot de passe ?


Vue Rapide de la discussion
Styx0 Tu utilises conjointement l'API Vb "Dir" (qui permet de parcourir le repertoire )et la librairie Microsoft Excell - excel9.olb (qui te permet de commander Excell 2000 à partir de VB)
 
ou soit l'API "Dir" + l'API Shell Execute dont voici un exemple
(mais par contre tu n'auras la main sur Excel - il sera indépendant de VB)

Code :
  1. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
  2.     (ByVal hwnd As Long, _
  3.     ByVal lpOperation As String, _
  4.     ByVal lpFile As String, _
  5.     ByVal lpParameters As String, _
  6.     ByVal lpDirectory As String, _
  7.     ByVal nShowCmd As Long) As Long
  8. Const SW_SHOWNORMAL = 1


exemple:
 
ShellExecute 0, vbNullString, "EXCEL.EXE", <NOM DE TON FICHIER EXCEL>, "C:\Program Files\Microsoft Office\Office", SW_SHOWNORMAL

 

[edtdd]--Message édité par Styx0--[/edtdd]

macray je crois qu'il existe une API shellexecute, je n'en suis pas certains,essaye tout de même, tu pourra peut être la trouver a travers un liens sur  
 
www.vbfrancec.com
superjim Comment ouvrir un certain type de fichiers en VB
 
 
   Ex: Ouvrir tous les fichiers "*.xls" du répertoire "c:\Mes documents".
 
                            Merci d'avance
 
 
                          :bic:

Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)