InputBox à champs prédéfinis

Bonjour à tous,

Je n'ai trouvé que très peu de sujets parlant de ça et encore, ce n'était pas similaire.

Je voulais savoir s'il était possible de créer une InputBox qui viendrait inscrire en A1 ceci : S-10101-Equipement où il n'y aurait que le texte en gras à saisir?

Quelque de chose dans ce style S-[champs à remplir]-Equipement.

Merci à vous,

Floki

Finalement j'ai trouvé!

Alors cette solution n'est pas inscrite dans l'InputBox mais cela s'inscrit bien dans la cellule comme souhaité avec ce code :

Sub Gestion_Equipement()

Dim Mot As String

On Error Resume Next
Mot = Application.InputBox("Sélectionnez le point de structure", Type:=2)
On Error GoTo 0

Worksheets("Equipement").Activate
Range("C10").Value = "S-" & Mot & "-Equipement"

End Sub

En espérant que cela puisse aider quelqu'un,

Floki

Bonjour,

J'allais te proposer d'utiliser l'argument Default de la fonction Inputbox, mais tu as trouvé une solution avant bravo

Je te mets quand même le lien à toutes fins utiles: https://docs.microsoft.com/fr-fr/office/vba/api/excel.application.inputbox

Décidément, encore toi!

Merci pour l'astuce mais après réflexion, ma solution est plus appropriée dans mon cas car dans la suite du code, l'InputBox est réutilisée pour d'autres choses.

Donc voir "Equipement" pour les utilisateurs futurs les aurait possiblement induit en erreur!

En te souhaitant une bonne journée,

Floki