Résultat formule dans zone de texte

[Papy Novice]

Bonjour le forum,
Je ne me souviens plus comment obtenir le résultat d'un calcul dans une zone de texte.
Merci de me rafraîchir la mémoire.
Ah l'âge c'est terrible quand on y pense...
Bonne soirée à chacun(e)
Jean

 

[Jam]

Salut Papy,

Tu dessines la zone puis tu la sélectionnes (elle ne doit pas être en mode édition). Enfin, direction la zone de formule et tu tapes genre =A1. Si tu as Toto en A1, il devrait s'afficher dans la zone de texte.

HTH

 

[Papy Novice]

Bonsoir MrExcel
Désolé ca ne marche pas chez moi je dois louper quelque chose
Merci et bonne soirée
Jean

 

[Hervé]

Bonsoir tout les deux

Mr EXCEL, à raison, papy, mais il faut etre en mode édition, sélectionner ta zone de liste et dans la barre de formule mettre : =A1.

sinon y'a ce type de code , a placer dans le module de la feuille adéquate.


Private Sub Worksheet_Calculate()
TextBox1.Text = Range('a1')
End Sub

a plus

 

[Papy Novice]

Salut Hervé,
Je vais vous paraître lourd, mais que veux-tu dire par mode édition ?
Cordialement
Jean

 

[dg62]

Salut Papy

le mode Edition c'est lorsque la zone de texte est sélectionné et que le curseur clignote à l'interieur.

 

[Papy Novice]

Bonsoir Didier,
Impossible sélectionner et taper =XX dans zone de texte (la sélection disparaît)
Je ne comprends pas
Cordialement à chacun
Jean

 

[allegro50]

Bonsoir Papy, Forum

Tu dois tt simplement selectionner ta zone de texte et taper ta formule ds la barre de formule et non ds la zone de texte.

Je confirme que ca marche!

 

[Papy Novice]

Merci à tous, ce fut laborieux mais c'est vrai ca marche.
Je mérite bien mon speudo.
Très bonne soirée à chacun de vous.
Jean

 

[dg62]

re

La sélection disparaît, c'est normal.

si tu saisis qqchose dans a1 (si =A1 bien sur)

ça s'affiche également dans tazone de texte.

 

[Gérard DEZAMIS]

Bonsoir à tous

= Sommeprod((Papy Nova='Question')*(MrExcel+RV+DG+Vivace='Réponse))

Et si on essaie d'utiliser la photo d'excel ...c'est pratique aussi NON ?

Outils personnaliser commandes outils photo


@+ GD

 

[Léa]

Bonjour à tous,

C'est encore moi, et si vous me le permettez avant de partir je souhaiteraris mettre mon nez une dernière fois dans vos 'affaires'

Moi, Papy, j'propose une macro, pour ne pas faire comme tout le monde

ActiveSheet.Shapes('Text Box 3').Select
Selection.Characters.Text = Range('A1').Value

Sauf erreur de ma part elle doit de copier dans ta zone de texte 3, le contenu de la cellule A1

Bonne soirée

Léa

 

[Gérard DEZAMIS]

Elle est encore là celle-là ? (Lol)

A quelle heure on va encore se coucher avec ses formules !

Papy fais attention a tes 'affaires'

On risque d'y perdre nos derniers cheveux !

Si tu en a encore une dans ta valise, fais vite je ferme la boutique à 20h00.

@+ GD