Fenetre personalisable en VBS

quent -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

je viens de découvrir le vbs mais je connais plutot bien le vba sur excel et c'est quasiment pareille. Ce que je voudrais c'est faire une fenetre personalisable comme les userform sur excel mais je ne sais pas si c'est possible.

merci d'avance
A voir également:

4 réponses

quent
 
up !
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Je te propose une série de choix (quiz) pour comprendre le fonctionnement de vbs:

Ouvrir un éditeur de texte et mettre ce code:

Dim Titre, Choix, vbCrlf, Tache, ChoixMsg 
Titre = "Essai"
vbCrlf = Chr(13)
Tache = Split("test1,test2,Quitter,",",")
Do
      Choix = Inputbox("Entrez le numéro de la tâche que vous désirez effectuer :" & vbCrlf & vbCrlf & "1) test1" & vbCrlf & "2) test2" & vbCrlf & "0) Quitter", Titre, "0")
If Choix <> 0 Then
       On Error Resume Next
        Select Case Choix
                Case 1: MsgBox "Ceci est le test1"
                Case 2 : MsgBox "Ceci est le test2"
          End Select
       
On Error Goto 0
End If
If Choix = 0 Then
	ChoixMsg = MsgBox("Souhaitez-vous quittez l'application ?", vbYesNoCancel, Titre)
		If ChoixMsg = vbYes Then WScript.quit
	End If
Loop


Tu l'enregistres. Ensuite tu affiches les extensions de fichier. Tu changes txt en vbs.

Faire un UserForm comme en vba n'est possible que par code. Avec cet exemple tu comprendras mieux!

Voilà


0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Tu peux t'inspirer de ce membre qui est spécialiste vbscript:

https://codes-sources.commentcamarche.net/profile/user/Hackoo
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
0