Inputbox avec fonction conditionnelle

N

naitsirhc

XLDnaute Junior

• 7 Juin 2006

• #2

Oubli d'envoyer le fichier
Merci

 

Vote positif 0 Vote négatif

N

naitsirhc

XLDnaute Junior

• 7 Juin 2006

• #3

Maintenant le fichier [file name=exempleinputbox.zip size=2953]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exempleinputbox.zip[/file]

 

Pièces jointes

• exempleinputbox.zip

  2.9 KB · Affichages: 18

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 7 Juin 2006

• #4

bonjour

c'est quelque chose comme ceci que tu recherches ?

Sub Rectangle3_QuandClic()
Dim t As Double

t = Application.InputBox('Le code ?', Type:=1)
If Not t = 0 Then Selection = t

End Sub

Cliquez pour agrandir...

salut

 

Vote positif 0 Vote négatif

N

naitsirhc

XLDnaute Junior

• 7 Juin 2006

• #5

Salut Eric,
En effet cela fonctionne très bien et programmation très simple.
Merci à toi et au forum
Très bien ce forum!

 

Vote positif 0 Vote négatif

N

naitsirhc

XLDnaute Junior

• 7 Juin 2006

• #6

Hervé,
Sorry de t'avoir appelé Eric
Naitsirhc

 

Vote positif 0 Vote négatif