Update

Canard64 · 12 Juillet 2007

Update Screen

Bonjours a tous.

Alors voila mon problème qui n'en ait pas un en fait.
J'aimerais savoir comment fait on pour ne pas voir l'evolution sur la page excel d'un module vba.
Pour ceux qui n'ont pas compris je m'explique un peu plus:

L'utilisateur clique sur un bouton et apres le clik je lance un module VBA et ce module fait plusieurs traitements sur la feuille où il y a le bouton et j'aimerais que l'utilisateur ne voit pas les étapes intermédiaire mais seulement la fin du traitement.

Voila j'espère que j'ai été clair. Merci pour vos conseils!

Canard64 · 13 Juillet 2007

Re : Update

je ne peux pas mettre tout le code car il y a plus de 2000 ligne de code

Private Sub ListBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
'creation de la feuille historique
'on teste si on l'avait déja créée
If Worksheets.Count < 4 Then
'on créée la feuille historique
ActiveWorkbook.Sheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "Histo"
Else
'on supprime la derniere feuille
Worksheets(Worksheets.Count).Delete
'on créée la nouvelle feuille
ActiveWorkbook.Sheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "Histo"
End If
End Sub

Canard64 · 13 Juillet 2007

Re : Update

C'est bon j'ai trouvé :

'on enlève la demande
Application.DisplayAlerts = False
Worksheets(Worksheets.Count).Delete
'on réactive la demande
Application.DisplayAlerts = True

Update

Canard64

Guest

Canard64

Guest

Canard64

Guest

Discussions similaires

Update

Canard64

Guest

Canard64

Guest

Canard64

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency