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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA-E]verifier si une feuille est ouverte

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA-E]verifier si une feuille est ouverte

n°1552569
cufy59
Posté le 02-05-2007 à 20:03:13  profilanswer
 

bonjour a tous
je suis novice dans la programmation en VBA et je suis confronter a un probleme
 
dans ma macro j'aimerai suppprimer une feuille nommer "amplitude" qui contient un graph
pour cela pas de probleme
mon probleme est:  
lors de mon tout premier calcul cette feuille n'existe pas, il m'est donc impossible de la supprimer (ecxel m'affiche d'ailleur un message d'erreur)
j'aimerais savoir s'il est possible de faire un test pour voir si une feuille "amplitude" existe et si oui je la supprime  
 
si cela n'est pas possible auriez vous une option qui me permettrai de contourner ce probleme
 
je vous remercie de votre attention

mood
Publicité
Posté le 02-05-2007 à 20:03:13  profilanswer
 

n°1552582
ingenieurc​esi
Posté le 02-05-2007 à 20:21:03  profilanswer
 

aide toi de ca
 
For Each ws In Worksheets
    MsgBox ws.Name
Next ws

n°1552589
cufy59
Posté le 02-05-2007 à 20:35:25  profilanswer
 

ok
je vous remercie sincerment de votre reponse

n°1552601
cufy59
Posté le 02-05-2007 à 20:54:55  profilanswer
 

bonjour  
je viens de regareder attentivement votre reponse
je ne comprend pas le "ws"
 
pouvez vous m'eclaircir un peu la route svp
 
je vous remerci de votre attention

n°1552607
cufy59
Posté le 02-05-2007 à 21:07:37  profilanswer
 

oublier ma question
j'ai compris  
je vous remercie encore de votre reponse
 
pour les gens qui sont intereser par la reponse voici le code
[CODE]
 
Sub PP()
Dim ws As Worksheet
For Each ws In Worksheets
    If ws.Name = "amplitude" Then
    Worksheets("amplitude" ).Delete
    End If
Next
 
End Sub
 
[CODE]
 
 

n°1552608
galopin01
Posté le 02-05-2007 à 21:08:11  profilanswer
 

Bonjour,
ws est une notation courament utilisée pour une variable de type WorkSheet
 
Voici une fonction personnalisée qui permet de vérifier sur une feuille existe :
 

Code :
  1. Function WsExist(Nom$) As Boolean
  2.   On Error Resume Next
  3.   WsExist = Sheets(Nom).Index
  4. End Function


 
On l'utilise de cette manière :
 

Code :
  1. Sub test()
  2. If WsExist("amplitude" ) then MsgBox "la feuille existe" Else MsgBox "la feuille n'existe pas"
  3. End Sub


 
A+


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

  [VBA-E]verifier si une feuille est ouverte

 

Sujets relatifs
Execution SQL sous VBA[resolu] [VBA] Cacher check box sous conditions
[resolu] Mise à jour si modification d'une feuilleProgrammes VBA
VBA - Détecter commande "Imprimer" dans ExcelExecuter une macro VBA excel sans excel
[VBA] Ouverture fichier avec boite dialogueVBA - Détecter sélection plusieurs cellules...résolu
VBA - macro et événements - RésoluVBA - Excel,liens hypertext et screentips
Plus de sujets relatifs à : [VBA-E]verifier si une feuille est ouverte


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