Sujet Précédent Sujet Suivant

VB sur Workbooks

jijudu Messages postés 215 Statut Membre -  
lermite222 Messages postés 9042 Statut Contributeur -
Salut,

est-il possible de dire en VB :

Si le Workbooks "machin" n'est pas ouvert alors ......

Merci
A voir également:
  • VB sur Workbooks
  • Vb - Télécharger - Langages
  • Vb audio cable - Télécharger - Audio & Musique
  • Vb editor - Télécharger - Langages
  • Vb 6 - Télécharger - Divers Utilitaires
  • Vb express - Télécharger - Langages

1 réponse

Réponse 1 / 1
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour, 
Sub TestWkBk()
Dim Fichier As String
    On Error GoTo Ouvrir
Reco:
    Workbooks("machin.xls").Activate
Sortie:
    Exit Sub
Ouvrir:
    On error Goto Sortie 'Si trouve pas, éventuellement mettre message
    Fichier = "C:\Mes documents\Machin.xls"
    Workbooks.Open Fichier
    Resume Reco
End Sub

A+
0

Discussions similaires

VB
mya1 -
Lazarey -

1 réponse
Commentaires sur VB.
goondy -
Olaf -

5 réponses
vba excel active workbooks
aurelie76 -
aurelie76 -

9 réponses
[VB]MsgBox avec variable
Reese -
Anonymatum -

5 réponses
Sleep (Vb)
Mimi -
Mimi -

2 réponses