boite de dialogue

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : boite de dialogue

myelmehdi

Bonjour,

j'aurai besoin de votre aide.

voilà mon problème. je veux faire afficher une boite de dialogue, si à l'ouverture du fichier excel la cellule H1 de l'onglet "intro"est vide. sinon rien faire.

ci-dessous le code que j'ai essayé de faire mais ça ne marche pas.

Pouvez-vous m'aider.

Merci

[code]

Private Sub Workbook_Open()
Sheets("Intro" ).Activate
If Range("H1" ) = "" Then Response = MsgBox("xx", vbInformation, "ATTENTION : INFORMATION" )
Else
Range("A1" ).Select
End If

End Sub

[code]

Publicité

galopin01

bonjour,
comme ça c'est mieux :

Code :

Private Sub Workbook_Open()
Sheets("Intro" ).Activate
If Range("H1" ) = "" Then
Response = MsgBox("xx", vbInformation, "ATTENTION : INFORMATION" )
Else
Range("A1" ).Select
End If
End Sub

A+

FORUM HardWare.fr

Programmation

VB/VBA/VBS

boite de dialogue

Sujets relatifs
Mettre du GIF dans boite de dialogue	boîte de dialogue qui demande une info
Rafraichessement des éléments d'une boite de dialogue	Sélectionner un fichier ou un dossier dans la même boîte de dialogue
Macro boîte de dialogue à plusieurs questions	Boîte de dialogue - fermeture par la croix
lier des boite de dialogue entre eux	Boîte de dialogue pour copie d'un fichier
Lien hypertexte:Empecher la boite de dialogue "Ouvrir-Enregistrer-..."	VB/EXCEL : Inhiber boite de dialogue
Plus de sujets relatifs à : boite de dialogue

Page générée en 0.029 secondes