Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre CFI [mvp]
bonjour une solution Sub ss() On Error Resume Next Dir "a:" If Err <> 0 Then MsgBox "pas de disquette" Else
End If Err.Clear End Sub ici on provoque une erreur, récupérée, il est souhaitable, de gérer les erreurs aprés, ne pas garder un resume next
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
Merci
-- merci et salut Philzig34
bonjour
une solution
Sub ss()
On Error Resume Next
Dir "a:"
If Err <> 0 Then
MsgBox "pas de disquette"
Else
End If
Err.Clear
End Sub
ici on provoque une erreur, récupérée, il est souhaitable, de gérer les erreurs aprés, ne pas garder un resume next
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"philzig34" <no_spam_zigan.philippe@libertysurf.fr> a écrit dans le message de news:mn.aa687d4bd778b1db.14764@libertysurf.fr...
Salut
en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le
lecteur
pouvez vous m'indiquer le code SVP
bonjour une solution Sub ss() On Error Resume Next Dir "a:" If Err <> 0 Then MsgBox "pas de disquette" Else
End If Err.Clear End Sub ici on provoque une erreur, récupérée, il est souhaitable, de gérer les erreurs aprés, ne pas garder un resume next
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
Merci
-- merci et salut Philzig34
Jacky
Salut Philzig34
Ceci pourrait convenir '----------- Sub teste_presence_disquette() On Error Resume Next If Dir("A:", 16) = "" Then MsgBox "Pas de disquette dans le lecteur" End Sub '------------ Salutations JJ
"philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
Merci
-- merci et salut Philzig34
Salut Philzig34
Ceci pourrait convenir
'-----------
Sub teste_presence_disquette()
On Error Resume Next
If Dir("A:", 16) = "" Then MsgBox "Pas de disquette dans le lecteur"
End Sub
'------------
Salutations
JJ
"philzig34" <no_spam_zigan.philippe@libertysurf.fr> a écrit dans le message
de news:mn.aa687d4bd778b1db.14764@libertysurf.fr...
Salut
en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le
lecteur
pouvez vous m'indiquer le code SVP
Ceci pourrait convenir '----------- Sub teste_presence_disquette() On Error Resume Next If Dir("A:", 16) = "" Then MsgBox "Pas de disquette dans le lecteur" End Sub '------------ Salutations JJ
"philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
C'est du Futur os Code...de Poitier... mdr mdr bonsoir à tous
Jacky a présenté l'énoncé suivant :
Bonjour Clément
Ben oui,,,, et si les codes donnés dans ce file fonctionnent, on pourrra se venter d'avoir inventé les codes du futur. ;-o)) JJ
"Clément Marcotte" a écrit dans le message de news:%238ZleT%
Bonjour,
en VBA sous Excel 2203
T'es sur ? ;-)
-- merci d'éclairer ma lanterne. (un jour, serai Calife à la Place du Calife...)
philzig34
Pierre CFI [mvp] a utilisé son clavier pour écrire :
bonjour une solution Sub ss() On Error Resume Next Dir "a:" If Err <> 0 Then MsgBox "pas de disquette" Else
End If Err.Clear End Sub ici on provoque une erreur, récupérée, il est souhaitable, de gérer les erreurs aprés, ne pas garder un resume next
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
Merci
-- merci et salut Philzig34
Mille excuses pour la faute de frappe... :oÞ Merci aux autres pour leurs conseils. :-) salut
-- merci et salut Philzig34
Pierre CFI [mvp] a utilisé son clavier pour écrire :
bonjour
une solution
Sub ss()
On Error Resume Next
Dir "a:"
If Err <> 0 Then
MsgBox "pas de disquette"
Else
End If
Err.Clear
End Sub
ici on provoque une erreur, récupérée, il est souhaitable, de gérer les
erreurs aprés, ne pas garder un resume next
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"philzig34" <no_spam_zigan.philippe@libertysurf.fr> a écrit dans le message
de news:mn.aa687d4bd778b1db.14764@libertysurf.fr...
Salut
en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le
lecteur
pouvez vous m'indiquer le code SVP
Merci
--
merci et salut
Philzig34
Mille excuses pour la faute de frappe... :oÞ
Merci aux autres pour leurs conseils. :-)
salut
Pierre CFI [mvp] a utilisé son clavier pour écrire :
bonjour une solution Sub ss() On Error Resume Next Dir "a:" If Err <> 0 Then MsgBox "pas de disquette" Else
End If Err.Clear End Sub ici on provoque une erreur, récupérée, il est souhaitable, de gérer les erreurs aprés, ne pas garder un resume next
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "philzig34" a écrit dans le message de news:
Salut en VBA sous Excel 2203 detection presence d'une disquette
Dans une macro je voudrais tester la présence d'une disquette dans le lecteur pouvez vous m'indiquer le code SVP
Merci
-- merci et salut Philzig34
Mille excuses pour la faute de frappe... :oÞ Merci aux autres pour leurs conseils. :-) salut