VB sur Workbooks

jijudu Messages postés 211 Date d'inscription Statut Membre Dernière intervention -
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention - 3 avril 2009 à 10:30

Salut,

est-il possible de dire en VB :

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

Merci

Afficher la suite

A voir également:

VB sur Workbooks
Vb - Télécharger - Langages
Vb cable - Télécharger - Audio & Musique
Vb editor - Télécharger - Langages
Vb runtime - Télécharger - Divers Utilitaires
Vb express - Télécharger - Langages

1 réponse

Réponse 1 / 1

lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention 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+

Discussions similaires

TP EN VB + COURS +EXERCICES CORRIGES

code vb.net

Commentaires sur VB.

vba excel active workbooks

Votre réponse

Discussions similaires