Fenetre condition temps
Bonjour,
Je ne m'y connais pas du tout en VBA et j'aurai donc besoins d'un peu d'aide.
Pour l'instant j'ai réussi à faire ceci:
Quand j'appui sur un bouton cela m'ouvre une fenêtre me posant 3 question:
_Texte à faire apparaître
_Temps d'attente en seconde
_Texte suivant
Le premier texte apparaît en D10 puis en fonction du temps que j'ai indiqué à la deuxième question (exemple: 2), il m'affiche le deuxième texte au bout de 2 seconde en D11.
Ce que je voudrai c'est que quand je valide cette fenêtre et une fois qu'il m'a afficher le premier texte, que excel m'ouvre une nouvelle fenêtre qui me demande si j'ai bien renseigné le temps en seconde.
SI oui, il continue la manip
si non, il revient sur la première fenêtre pour que je puisse modifier le temps.
En attente de solution
Cordialment
Bonsoir,
Et voila,
en revanche petite modification de ma demande précédente, il faudrait que la fenêtre qui me demande si j'ai bien renseigner le temps en seconde pop quand je clique ailleurs une fois que j'ai rempli la case de temps.
Merci d'avance
Bonjour,
Ce fichier ne contient pas de macro !
User form 1:
Dim VarSec As Integer
Private Sub Ok_Click()
Range("D10").Value = Me.Texte_1.Value
VarSec = Me.Secondes
Application.Wait Time + TimeSerial(0, 0, VarSec)
Range("D11").Value = Me.Texte_2.Value
End Sub
Private Sub Secondes_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Not IsNumeric(Chr(KeyAscii)) And Chr(KeyAscii) <> "." Then
KeyAscii = 0
End If
End Sub
Private Sub Secondes_Change()
End Sub
Private Sub Texte_2_Change()
End Sub
Private Sub UserForm_Click()
End Sub
User Form 2
Private Sub Ok_Click()
End Sub
Private Sub UserForm_Click()
End Sub
Private Sub CommandButton1_Click()
End Sub
Module 1
Sub Rectangle1_Cliquer()
UserForm1.Show
End Sub
Module 2
Sub Effacer_Page()
'
' Effacer_Page Macro
'
Cells.Select
Selection.ClearContents
Range("A1").Select
End Sub
Pas indenté, pas épuré, pas sous balises Code, et pas dans le fichier ! Ça le fait pas... !
Le site n'accepte pas de mettre mon fichier enregistré avec les macro en pièces jointes