Bouton ANNULER inactif ...

Bouton ANNULER inactif ... - VB/VBA/VBS - Programmation

Marsh Posté le 30-08-2007 à 08:31:34    

Bonjour,
 
J'ai un problème pour rendre inactif le bouton "annuler" de la box GetOpenFilename ...
 
Pouvez-vous m'aider ...
 
Voici mon code :
 

Code :
  1. .../...
  2. Private Sub Ouvrir_Click()
  3. Fichier = Application.GetOpenFilename("Text Files (*.txt), *.txt" )
  4. Open Fichier For Input As #1
  5. Dim inputdata As String
  6. Dim NumLigne As Long
  7. Do While Not EOF(1)
  8. NumLigne = NumLigne + 1
  9. Line Input #1, inputdata
  10. If NumLigne = 1 Then
  11. TextBox1 = inputdata
  12. End If
  13. End
  14. .../...

Reply

Marsh Posté le 30-08-2007 à 08:31:34   

Reply

Marsh Posté le 31-08-2007 à 09:11:05    

bjr,
sans nécessairement rendre inactif le bouton annuler, sache qu'il renvoie la valeur false
aussi, tu peux faire un
Fichier = False
Do
Fichier = application.getopenfilename()
While Fichier <> false

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed