Saisir une valeur dans une boite de dialogue
#1
Débutant XLPages

Inscription: 10/02/2011

Messages: 9

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 27-03-2015 14h53

Bonjour à toutes et tous,

 

Je cherche le moyen de saisir une valeur dans une boite de dialogue pour récupérer cette valeur dans une macro.

Je m'explique

Par une macro excel, je veux saisir une valeur dans une boite de dialogue, récupérer cette valeur pour aller chercher une valeur correspondante dans un tableau.

 

Par exemple, j'ai dans une feuille les valeurs suivante :

Cellule A1 "TOTO"

Cellule B1 "2"

Cellule A2 "TITI"

Cellule B2 "3"

 

Dons en saisissant TITI dans ma boite de dialogue, je veux récupérer "TITI" dans ma macro pour aller chercher la valeur 3 dans la feuille en question.

 

J'ai démarré une macro :

 

Rep = MsgBox("Saisir l'album" & "Continuer ?", vbYesNo + vbQuestion)

If Rep = vbYes Then

 

 

Else

   MsgBox "Procédure terminée", vbInformation

End If

 

Il me manque le principal entre le Then et le Else....

 

Merci de votre aide.

 

Bravo pour votre site, c'est un puit d'informations.

 

Cdlt

 

Olivier

Hors Ligne
Rapport   Haut 

Re: Saisir une valeur dans une boite de dialogue
#2
Débutant XLPages

Inscription: 01/06/2007
De Liège Belgique

Messages: 12

Système d'exploitation:
PC & Mac
Version Excel utilisée:
2016, MAC 2011
Posté le : 30-03-2015 08h48

Bonjour

 

Une première approche avec ce code

 

Public valeur as string
Sub test()
Rep = MsgBox("Saisir l'album" & "Continuer ?", vbYesNo + vbQuestion)

If Rep = vbYes Then
    valeur = Application.InputBox(prompt:="Entrer votre valeur")
Else
   MsgBox "Procédure terminée", vbInformation
End If
If valeur = True Then
MsgBox "ok"
End If
End Sub

Par la déclaration en en-tête de module, la variable "valeur" pourra être réutilisée ailleurs dans ton projet et ce, jusqu'à ce que tu fermes ton fichier

 

A te relire sur cette proposition

 

Crdlt


@+ Dan
Hors Ligne
Rapport   Haut 

Re: Saisir une valeur dans une boite de dialogue
#3
Débutant XLPages

Inscription: 10/02/2011

Messages: 9

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 03-04-2015 14h10

Bonjour,

 

Merci Dan, c'est exactement ce que je recherchai.

 

Cordialement

 

Olivier

Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes