Microsoft 365 Bulle : affichage à droite de la cellule cliquée

[Usine à gaz]

Bonjour à toutes et à tous,
Je vous souhaite un beau WE

Je fais appel à nos ténors pour un affichage que je ne sais pas faire.
Est-il possible :

Mes tests et recherches sont infructueuses.
Auriez-vous le bon code ?

Je joins un p'tit fichier test,
Et je continue à chercher.
Un grand merci, encore une fois,
Amicalement,
lionel

 

[JM27]

Bonjour
avec une textbox

 

[Usine à gaz]

Re JM27
C'est super aussi avec une TextBox.
Cela permet de saisir dedans ce que l'on veux.
Merci à toi

LOL, j'en ai une nouvelle

Collins parlait dans son #post 11 d'une "zone de textes".​

ça pourrait se faire avec une zone de texte ?

 

[JM27]

bonjour
Pour moi une zone de texte est une textbox

après relecture de son post c'est pas tout à fais ca , je regarde

 

[JM27]

Bonjour
Zone de texte comme cela
Au masquage on efface la zone de texte

 

[Usine à gaz]

Merci Merlin

C'est nickel !
lionel

 

[Collins]

Bonjour JM27, Usine à gaz, le forum

C'est super toutes ces solutions.
Hier comme je te l'ai dit Lionel j'ai réussi avec cette zone de texte ci-dessous donc je pense textbox comme le dit JM27.

Le seul regret c'est que la textbox s'adapte à la hauteur de la ligne. J'ai bien essayé de faire des modifications dans ses propriétés. Je l'ai bien agrandi en hauteur mais elle revient à la hauteur de la ligne.
Un grand merci à vous.
Bon dimanche

 

[Usine à gaz]

Bjr Collins

Pour modifier la hauteur de la textbox, il te faut activer le mode création dans l'onglet développeur.
Ta textbox va s'ouvrir et en cliquant droit dans ta textbox > "propriétés" tu auras accès aux modifications que tu souhaites faire.
Pour la hauteur de ligne, tu modifies "Height".
Ensuite, tu désactives le mode création et ça roule ...
vois :

Fichier test joint,
@+
lionel

 

[JM27]

Bonjour
Non c'est dans la macro , tu mets un rem devant la propriété height

 

[Usine à gaz]

Bjr JM27
lol, ça doit être bien mais rien compris
Bon dimanche,
lionel,

 

[Usine à gaz]

Re,
@ Collins, ne pas tenir compte du #post22
Tout simple et en direct (dans la macro) :

Merci @JM27 ... pour me l'avoir rappelé

 

[Collins]

Re

Lionel
Heureusement que tu as fais l'ajout dans la macro et me la copier, parce que je ne savais pas ce que voulait dire JM27 par rem.
J'arrive un tout tout petit peu à modifier une formule alors les macros et moi c'est autre chose . chaque jour suffit sa peine.
Merci encore à vous deux.
Bon après-midi

 

[JM27]

Bonjour
un rem permet de passer l'instruction en commentaire ( sans intervenir dans la macro)
un rem => c'est cela '
la ligne passée en commentaire devient verte

 

[Usine à gaz]

Re-bonjour,

Je souhaite augmenter la taille de la ComboBox.
J'ai tenté :

Sub Laurent()
    Dim WS As Worksheet
    Set WS = ActiveSheet
    Dim tbl() As Variant
    tbl = Array("Metropole 33", "988 Nouvelle-Calédonie  687", "987 Polynésie française 689", _
    "974 La Réunion  262", "973 Guyane 594", "972 Martinique 596", "971 Guadeloupe 590", 0) '"",

    ' Les valeurs
    ReDim Preserve tbl(UBound(tbl) - 1)
    ' La Liste Box
    Dim oCombo As OLEObject
    Dim L As Single, T As Single, W As Single, H As Single, Z As Single
    L = ActiveCell.Offset(, 1).Left   '<-- position horizontale
    T = ActiveCell.Top  '<-- position verticale
    W = 202 '<-- largeur
    H = 1 '<-- hauteur
    Z = Zoom = 200

Mais je ne dois pas faire comme il convient lol (tu m'étonnes)
Auriez-vous la solution ?
Encore MERCI,
lionel

 

[ChTi160]

Bonjour Lionel
Ça
Ça ne doit pas fonctionner
" Z = Zoom = 200 "
Mets : Z=200
Puis dans ta procédure
.Zoom=Z
Depuis mon téléphone lol
Jean marie

 

[JM27]

bonjour
dans la macro tu mets un rem ou tu supprimes la ligne correspondant au height de la shape ou de la textbox
ensuite pour la shape tu sélectionnes celle ci et tu la mets à la hauteur que tu souhaites
concernant la textbox tu vas dans les propriétés de celle ci et tu modifies la valeur du height