[VBA] pb avec inputbox
arxg
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
arxg Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
arxg Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je soumets un petit pb aux experts, concernant INPUTBOX en VBA.
Code concerné :
Public Msg As String
Public Titre As String
Public Rng_Place_pointee As Range 'place pointée dans "gradins"
...
Workbooks(Class_gradins).Sheets("gradins").Activate
On Error GoTo SB_annule 'l'utilisateur a cliqué "annuler"
Set Rng_Place_pointee = Application.InputBox(Prompt:=Msg, Title:=Titre, Type:=8, Left:=500, Top:=50)
On Error Resume Next
Pb rencontré :
L'INPUTBOX marche d'une manière apparemment aléatoire : bien que cliquant toujours sur OK, la routine d'erreur "SB_annule" reçoit parfois la main, d'autre fois on passe bien en séquence.
Si je supprime l'instruction "on error goto ..." j'ai une erreur 424 aléatoirement.
APPLICATION a bien pour valeur "Microsoft Excel".
Configuration :
Windows/XP SP2
MS Office 2002 SP3
Merci pour la réponse, je patine dur ...
Je soumets un petit pb aux experts, concernant INPUTBOX en VBA.
Code concerné :
Public Msg As String
Public Titre As String
Public Rng_Place_pointee As Range 'place pointée dans "gradins"
...
Workbooks(Class_gradins).Sheets("gradins").Activate
On Error GoTo SB_annule 'l'utilisateur a cliqué "annuler"
Set Rng_Place_pointee = Application.InputBox(Prompt:=Msg, Title:=Titre, Type:=8, Left:=500, Top:=50)
On Error Resume Next
Pb rencontré :
L'INPUTBOX marche d'une manière apparemment aléatoire : bien que cliquant toujours sur OK, la routine d'erreur "SB_annule" reçoit parfois la main, d'autre fois on passe bien en séquence.
Si je supprime l'instruction "on error goto ..." j'ai une erreur 424 aléatoirement.
APPLICATION a bien pour valeur "Microsoft Excel".
Configuration :
Windows/XP SP2
MS Office 2002 SP3
Merci pour la réponse, je patine dur ...
A voir également:
- [VBA] pb avec inputbox
- Excel compter cellule couleur sans vba - Guide
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
- Mkdir vba ✓ - Forum VB / VBA
3 réponses
Précision : le cas décrit se produit si on scrolle le feuille active (verticalement ou horizontalement) avant de cliquer sur une cellule. Si on clique sans scroller, INPUTBOX marche correctement.
Tout les événements sont alors appliquer à l'inputBox
Essaye avec l'appel suivant
dim RS as long
RS=inputBox(titre..
A+
louis