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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

   [Resolu] Existe?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Resolu] Existe?

n°1161850
OyT
dyslexics have more fnu
Posté le 27-07-2005 à 16:32:13  profilanswer
 

voila jvoudrai ouvrir plusieur fichiers excel a partir de mon premier mais jvoudrait pouvoir tester q'ils existe tous car g entre 1 et 4 fichiers mais le nombre est variant dc comment faire pour traduire cet algo?
 
  si le fichier 2 existe l'ouvrir
  si le fichier 3 existe l'ouvrir
  si le fichier 4 existe l'ouvrir    
 
merci
 
ps: je c ouvrir les fichiers


Message édité par OyT le 28-07-2005 à 17:10:15
mood
Publicité
Posté le 27-07-2005 à 16:32:13  profilanswer
 

n°1161868
jpcheck
Pioupiou
Posté le 27-07-2005 à 16:40:58  profilanswer
 

OyT a écrit :

voila jvoudrai ouvrir plusieur fichiers excel a partir de mon premier mais jvoudrait pouvoir tester q'ils existe tous car g entre 1 et 4 fichiers mais le nombre est variant dc comment faire pour traduire cet algo?
 
  si le fichier 2 existe l'ouvrir
  si le fichier 3 existe l'ouvrir
  si le fichier 4 existe l'ouvrir    
 
merci
 
ps: je c ouvrir les fichiers


 
un booléen peut faire le travail
tu les ouvres si le booléen est a true...
sinon ca ca te sert à verifier si une feuille existe, et a l'ouvrir auquel cas, ou alors de la crééer, meme topo pour des fichiers
 
Sub SelectFeuille(Nom$)
On Error Resume Next
Worksheets(Nom).Select
If Err <> 0 Then Worksheets.Add.Name = Nom
End Sub

n°1161914
OyT
dyslexics have more fnu
Posté le 27-07-2005 à 17:00:42  profilanswer
 

je n'ai pas bien compris... et je ne veux pas creer de nouveau fichier jveux juste saavoir si il existe: j'ai en fait
 
ActiveWorkbook.FollowHyperlink Address:= _
        "fichier1.xls" _
        , NewWindow:=False, AddHistory:=True
Application.Run "'fichier2.xls'!MonSub"
 
pareil pour les fichiers 3 et 4
 
mon problème et de savoir si c fichier 2,3,4 existe sinon ca me retourne un erreur ce qui est normal.
 
je ve dc arriver a un truc de genre:
 
If fichier2.xls existe
ActiveWorkbook.FollowHyperlink Address:= _
        "fichier1.xls" _
        , NewWindow:=False, AddHistory:=True
Application.Run "'fichier2.xls'!MonSub"


Message édité par OyT le 27-07-2005 à 17:01:28
n°1162054
jpcheck
Pioupiou
Posté le 27-07-2005 à 18:23:53  profilanswer
 

tu fais un test d'existence
http://forum.hardware.fr/hardwaref [...] 8318-1.htm
et youpla boum :bounce:

n°1162555
OyT
dyslexics have more fnu
Posté le 28-07-2005 à 09:13:59  profilanswer
 

merci c exactement ca que je cherhcé mais jla va pas trouvé sur le forum... ^^


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

   [Resolu] Existe?

 

Sujets relatifs
[RESOLU]Retourner un code d'erreur dans une VbYesNo Box[resolu]ouverture et enregistrement
[résolu] impossible d'uploader depuis changement d'hébergementarray array array :) [Resolu]
[Résolu] variable VBA[resolu]Comment supp une valeur dans la BDR
[PHP] Tester si une valeur existe dans un tableau [RESOLU]Comment vérifier si un dossier existe déjà ? [Résolu]
[Résolu] Existe-t-il une fonction si sous access?[Resolu] timeout sur un recv(...) ca existe?
Plus de sujets relatifs à : [Resolu] Existe?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR