[Résolu][Calc]touche entréé dans boite de dialogue

[kikoo74910]

Bonjour,

J'ai une boite de dialogue dans lequel je doit cliquer sur confirmer pour que les critères de la boite de dialogue soit validés. Je souhaiterais pouvoir taper la touche entréé directement sur le clavier au lieu de cliquer sur le bouton "comfirmer"(OK) de la boite de dialogue. Cela est-il possible ?

Voici le code:

Code : Tout sélectionner

Sub Main

Dim Dlg As Object, MotPasse as String
	DialogLibraries.LoadLibrary("Standard")
	Dlg = CreateUnoDialog(DialogLibraries.Standard.Dialog1)
	If Dlg.execute = com.sun.star.ui.dialogs.ExecutableDialogResults.OK Then
		MotPasse = dlg.getControl("txtMP").Text
		If MotPasse = "1234" then
			Dlg.dispose
		Else
			Ouverture
		End If
		call recalculer
		call dashboard
		call fullscreenoff
		call timerpassword
	Else
		thisComponent.Close(True)			
	End If
End Sub

[micmac]

Bonjour,

libreoffice 5.3.6.1 (x64) ;windows 10

Votre signature indique une version de OpenOffice qui n'est plus maintenue.
Est-ce une erreur, un oubli, un choix, une obligation ?
Dans ce dernier cas, mentionnez-le dans votre signature par "Obligation de version".

Pour connaître la version que vous possédez : https://forum.openoffice.org/fr/forum/v ... 582#p11582

Afin de profiter des dernières améliorations, il est fortement recommandé d'être à jour de la dernière version (6.0.6)

Dans votre signature il est nécessaire d'indiquer :
1- La version exacte de AOO ou LibO (AOO 4.1.5, LibO 6.0.6 par exemple) ;
2- La version exacte du système d'exploitation (Windows XP SP3, Vista SP2, Windows 7 SP1, Win 8.1, Win 10, Ubuntu 18.04, MacOS 10.13.6 par exemple).
Accès direct à votre signature pour la corriger.

Cordialement.

[Dude]

Pas besoin de macro pour ça.
Dans les propriétés du contrôle bouton, dès lors que le type est paramétré à "OK", c'est la touche Entrée qui est affecté par défaut.

[kikoo74910]

Suite à réponse, j ai regardé dans les options du bouton. Il faut que l'option "Bouton par defaut" soit sur "oui".
Merci.