Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Proprietà Textbox su foglio

144 views
Skip to first unread message

by sal

unread,
Sep 3, 2011, 2:36:03 AM9/3/11
to
Ciao a tutto l'NG, da tempo non propongo un quesito, parliamo questa
volta di TextBox inseriti direttamente sul Foglio.

Vorrei far prendere il Valore di Una cella con la proprietà
"LinkedCell" ma scrivendo nella proprietà "=Foglio1!B4" per avere nel
Textbox1 il valore della cella B4 non me lo riporta, devo fare o
scrivere qualche altra cosa, ho anche scritto =B4 ma niente.

ora se vorrei farlo da codice VBA, visto che sono molti TextBox, con
l'userform creo un ciclo For...next e con "Controls("TextBox" & x)"
risolvo il problema, invece sul foglio anche se creo il ciclo
For...next, il comando "Controls" non lo accetta devo digitare, questo
nel codice del Foglio "TextBox1.value = range("B4") ", possibile che
per il Foglio non esista un comando simile a "Controls" dell'userform,
e quindi devo digitare ogni volta tutti i vari "TextBox" e relative
celle.

Qualche soluzione?

Ciao By Sal 8-D

bene63

unread,
Sep 3, 2011, 1:52:12 PM9/3/11
to

=============================================================================================================


Vorrei far prendere il Valore di Una cella con la proprietà
"LinkedCell" ma scrivendo nella proprietà "=Foglio1!B4" per avere nel
Textbox1 il valore della cella B4 non me lo riporta, devo fare o
scrivere qualche altra cosa, ho anche scritto =B4 ma niente.

Ciao Salvatore, prova a scrivere esattamente così: Foglio1!B4
vedrai che funziona, perlomeno a me funziona; tieni presente che uso
Excel 2010 e non vorrei che nelle versioni precedenti non funga.

Per quanto riguarda il resto, non credo si possa fare, anche perché
come hai detto tu, "Controls" funge solamente in UserForm. Comunque è
meglio attendere altre risposte certamente più qualificate delle mie.

Benedetto

bene63

unread,
Sep 3, 2011, 2:00:23 PM9/3/11
to
On 3 Set, 19:52, bene63 <manuela.piccin...@alice.it> wrote:
> On 3 Set, 08:36, by sal <by.s...@gmail.com> wrote:
>
>
>
>
>
> > Ciao a tutto l'NG, da tempo non propongo un quesito, parliamo questa
> > volta di TextBox inseriti direttamente sul Foglio.
>
> > Vorrei far prendere il Valore di Una cella con la proprietà
> > "LinkedCell" ma scrivendo nella proprietà "=Foglio1!B4" per avere nel
> > Textbox1 il valore della cella B4 non me lo riporta, devo fare o
> > scrivere qualche altra cosa, ho anche scritto =B4 ma niente.
>
> > ora se vorrei farlo da codice VBA, visto che sono molti TextBox, con
> > l'userform creo un ciclo  For...next e con "Controls("TextBox" & x)"
> > risolvo il problema, invece sul foglio anche se creo il ciclo
> > For...next, il comando "Controls" non lo accetta devo digitare, questo
> > nel codice del Foglio "TextBox1.value = range("B4") ", possibile che
> > per il Foglio non esista un comando simile a "Controls" dell'userform,
> > e quindi devo digitare ogni volta tutti i vari "TextBox" e relative
> > celle.
>
> > Qualche soluzione?
>
> > Ciao By Sal 8-D
>
> ===========================================================================­==================================

> Vorrei far prendere il Valore di Una cella con la proprietà
> "LinkedCell" ma scrivendo nella proprietà "=Foglio1!B4" per avere nel
> Textbox1 il valore della cella B4 non me lo riporta, devo fare o
> scrivere qualche altra cosa, ho anche scritto =B4 ma niente.
>
> Ciao Salvatore, prova a scrivere esattamente così:   Foglio1!B4
> vedrai che funziona, perlomeno a me funziona; tieni presente che uso
> Excel 2010 e non vorrei che nelle versioni precedenti non funzionasse.

>
> Per quanto riguarda il resto, non credo si possa fare, anche perché
> come hai detto tu, "Controls" funge solamente in UserForm. Comunque è
> meglio attendere altre risposte certamente più qualificate delle mie.
>
> Benedetto- Nascondi testo citato
>
> - Mostra testo citato -

by sal

unread,
Sep 3, 2011, 3:02:32 PM9/3/11
to
On 3 Set, 19:52, bene63 <manuela.piccin...@alice.it> wrote:

Ciao Benedetto, per il LinkedCell, ho risolto facendo scrivere il dato
con il VBA, volevo evitarlo, a me è successo questo,

Creato il primo TextBox solo 1 ho fatto il linkedCell, come hai
scritto tu e lo ha preso tranquillamente, facendo il copia incolla del
TextBox logicamente riportava anche il LinkedCell, quando ho finito di
fare il copia incolla, oltre 20 sono andato a modificare il LinkedCell
nelle proprietà per assegnare la cella giusta, ma non la prende,
probabile che è proprio il copia incolla che da problemi, se avrei
generato ogni singolo TextBox ed avrei dichiarato il LinkedCell ogni
volta, forse sarebbe andato bene, non ho fatto la prova.

ma la farò per vedere se il problema sia proprio questo.

per il resto vedo se esiste una soluzione.

Ciao By Sal 8-D

Scossa

unread,
Sep 4, 2011, 7:06:05 AM9/4/11
to
On 3 Set, 21:02, by sal <by.s...@gmail.com> wrote:
> > "LinkedCell" ma scrivendo nella proprietà "=Foglio1!B4" per avere nel
> > Textbox1 il valore della cella B4 non me lo riporta, devo fare o
> > scrivere qualche altra cosa, ho anche scritto =B4 ma niente.

Ciao Salvatore,

non ho capito bene il tuo problema, ma questo codice, nel modulo del
foglio dove hai inserito il textbox funziona:

Public Sub prova()
Me.TextBox1.LinkedCell = Me.Range("B4").Address
End Sub

Bye!
scossa

by sal

unread,
Sep 4, 2011, 2:21:15 PM9/4/11
to

Ciao Scossa, non è il problema del VBA i comandi li accetta
regolarmente, era che ogni TextBox fa riferimento sempre e solo ad 1
cella, per cui non volevo scrivere del codice, ma inserire nella
proprietà LinkedCell di ogni TextBox la sua cella di riferimento, non
me lo permette, non so il perchè, in questo modo non avrei usato il
VBA per il riferimento.

Non sai come risolvere il problema di "Controls"?, ogni volta che devo
modificare qualcosa maggiormente le proprietà "Left" e "Top" devo
riscrivere 23 textbox*2.

Ciao Salvatore By Sal 8-D

0 new messages