Bonjour =E0 tous,
sur xlxp,
Un maga tableau contenant plus de 1000lignes et 60=20
colonnes.
Les cellules contiennent presque toutes une formule.
La largeur des colonnes est adapt=E9e pour visualiser un max=20
de colonnes sur l'=E9cran.
Le pb est que ,dans une colonne, les formules des cellules=20
rentrent du texte qui n'apparait pas compl=E8tement et de=20
loin,.
Je voudrais mettre une z=F4ne de texte , plac=E9e en haut de=20
page qui, par une macro "private sub quand clik" ou=20
kekchose du genre, pr=E9senterait le texte de la cellule=20
saisie.
Pour =EAtre plus clair, cette z=F4ne de texte remplirait le=20
r=F4le de la barre de formule, mais ferait apparaitre le=20
texte et pas la formule.
Pour faire apparaitre le texte dans la z=F4ne j'ai trouv=E9=20
sur le super-fichier "fonction zip "de JJ HINET" la=20
formule kivabien
Par contre pour le code....
SI d'aventure quelques dieux sont en baisse d'activit=E9...
Qu'ils soient b=E9nis!!
=E0+
gilles
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille (après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
Jacky
Bonsoir Gilles
Tu pourrais te servire de la barre d'état '------------- Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Application.StatusBar = Target End Sub '---------------- Salutations JJ
"gilles" a écrit dans le message de news:353a01c4abba$c5834e00$ Bonjour à tous, sur xlxp, Un maga tableau contenant plus de 1000lignes et 60 colonnes. Les cellules contiennent presque toutes une formule. La largeur des colonnes est adaptée pour visualiser un max de colonnes sur l'écran. Le pb est que ,dans une colonne, les formules des cellules rentrent du texte qui n'apparait pas complètement et de loin,. Je voudrais mettre une zône de texte , placée en haut de page qui, par une macro "private sub quand clik" ou kekchose du genre, présenterait le texte de la cellule saisie. Pour être plus clair, cette zône de texte remplirait le rôle de la barre de formule, mais ferait apparaitre le texte et pas la formule. Pour faire apparaitre le texte dans la zône j'ai trouvé sur le super-fichier "fonction zip "de JJ HINET" la formule kivabien Par contre pour le code.... SI d'aventure quelques dieux sont en baisse d'activité... Qu'ils soient bénis!! à+ gilles
Bonsoir Gilles
Tu pourrais te servire de la barre d'état
'-------------
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Application.StatusBar = Target
End Sub
'----------------
Salutations
JJ
"gilles" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:353a01c4abba$c5834e00$a501280a@phx.gbl...
Bonjour à tous,
sur xlxp,
Un maga tableau contenant plus de 1000lignes et 60
colonnes.
Les cellules contiennent presque toutes une formule.
La largeur des colonnes est adaptée pour visualiser un max
de colonnes sur l'écran.
Le pb est que ,dans une colonne, les formules des cellules
rentrent du texte qui n'apparait pas complètement et de
loin,.
Je voudrais mettre une zône de texte , placée en haut de
page qui, par une macro "private sub quand clik" ou
kekchose du genre, présenterait le texte de la cellule
saisie.
Pour être plus clair, cette zône de texte remplirait le
rôle de la barre de formule, mais ferait apparaitre le
texte et pas la formule.
Pour faire apparaitre le texte dans la zône j'ai trouvé
sur le super-fichier "fonction zip "de JJ HINET" la
formule kivabien
Par contre pour le code....
SI d'aventure quelques dieux sont en baisse d'activité...
Qu'ils soient bénis!!
à+
gilles
Tu pourrais te servire de la barre d'état '------------- Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Application.StatusBar = Target End Sub '---------------- Salutations JJ
"gilles" a écrit dans le message de news:353a01c4abba$c5834e00$ Bonjour à tous, sur xlxp, Un maga tableau contenant plus de 1000lignes et 60 colonnes. Les cellules contiennent presque toutes une formule. La largeur des colonnes est adaptée pour visualiser un max de colonnes sur l'écran. Le pb est que ,dans une colonne, les formules des cellules rentrent du texte qui n'apparait pas complètement et de loin,. Je voudrais mettre une zône de texte , placée en haut de page qui, par une macro "private sub quand clik" ou kekchose du genre, présenterait le texte de la cellule saisie. Pour être plus clair, cette zône de texte remplirait le rôle de la barre de formule, mais ferait apparaitre le texte et pas la formule. Pour faire apparaitre le texte dans la zône j'ai trouvé sur le super-fichier "fonction zip "de JJ HINET" la formule kivabien Par contre pour le code.... SI d'aventure quelques dieux sont en baisse d'activité... Qu'ils soient bénis!! à+ gilles
gilles
merci à JACKY etCAP2 je teste ça et je vous tiens au courant sinclou gilles
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte
affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
.
merci à JACKY etCAP2
je teste ça et je vous tiens au courant
sinclou
gilles
-----Message d'origine-----
Salut,
si j'ai bien compris, tu mets ce code dans la feuille de
code de ta feuille
(après avoir inséré dessus un textbox de la barre
d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
TextBox1.Value = ActiveCell.Value
End Sub
Normalement, dès que tu cliqueras sur une cellule, ta
zone de texte
merci à JACKY etCAP2 je teste ça et je vous tiens au courant sinclou gilles
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte
affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
.
gilles
après test ni l'une ni l'autre ne fonctionne mais je pense qu'il fait que je déclare kekchose dans un module pour déclarer le textbox car j'ai un message erreur 424 à+
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte
affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
.
après test
ni l'une ni l'autre ne fonctionne mais
je pense qu'il fait que je déclare kekchose dans un module
pour déclarer le textbox car j'ai un message erreur 424
à+
-----Message d'origine-----
Salut,
si j'ai bien compris, tu mets ce code dans la feuille de
code de ta feuille
(après avoir inséré dessus un textbox de la barre
d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
TextBox1.Value = ActiveCell.Value
End Sub
Normalement, dès que tu cliqueras sur une cellule, ta
zone de texte
après test ni l'une ni l'autre ne fonctionne mais je pense qu'il fait que je déclare kekchose dans un module pour déclarer le textbox car j'ai un message erreur 424 à+
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte
affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
.
Jacky
Re.. La barre d'état, est-elle cochée Menu/affichage/cocher barre d'état
JJ
"gilles" a écrit dans le message de news:017b01c4abc5$6dd996e0$ après test ni l'une ni l'autre ne fonctionne mais je pense qu'il fait que je déclare kekchose dans un module pour déclarer le textbox car j'ai un message erreur 424 à+
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte
affichera le contenu affiché dans ta cellule...
Ca marche ?
CAP2
.
Re..
La barre d'état, est-elle cochée
Menu/affichage/cocher barre d'état
JJ
"gilles" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:017b01c4abc5$6dd996e0$a301280a@phx.gbl...
après test
ni l'une ni l'autre ne fonctionne mais
je pense qu'il fait que je déclare kekchose dans un module
pour déclarer le textbox car j'ai un message erreur 424
à+
-----Message d'origine-----
Salut,
si j'ai bien compris, tu mets ce code dans la feuille de
code de ta feuille
(après avoir inséré dessus un textbox de la barre
d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
TextBox1.Value = ActiveCell.Value
End Sub
Normalement, dès que tu cliqueras sur une cellule, ta
zone de texte
Re.. La barre d'état, est-elle cochée Menu/affichage/cocher barre d'état
JJ
"gilles" a écrit dans le message de news:017b01c4abc5$6dd996e0$ après test ni l'une ni l'autre ne fonctionne mais je pense qu'il fait que je déclare kekchose dans un module pour déclarer le textbox car j'ai un message erreur 424 à+
-----Message d'origine----- Salut,
si j'ai bien compris, tu mets ce code dans la feuille de code de ta feuille
(après avoir inséré dessus un textbox de la barre d 'outils "Contrôles") :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = ActiveCell.Value End Sub
Normalement, dès que tu cliqueras sur une cellule, ta zone de texte