Comparsa di un commento cliccando dentro a cella

[Cekko]

Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

[eliano]

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.

Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio

"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"

Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
questa macro di evento (DoppioClicSx):

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub

Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

[Cekko]

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se
clicco dentro ad una cella compare tipo un campo di testo vicino alla
cella che spiega quali dati inserire nella cella stessa....

[plinius]

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!

Ciao,
E.

[eliano]

Post by plinius

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1:  (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd  (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!
Ciao,
E.- Nascondi testo citato
- Mostra testo citato -

Va a finire che e' una UserForm o uno Shape.
Cosi' e' la vita, Caro Enrico.:-D)
Ciao
Eliano

[Cekko]

Post by eliano

Post by plinius

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!
Ciao,
E.- Nascondi testo citato
- Mostra testo citato -

Va a finire che e' una UserForm o uno Shape.
Cosi' e' la vita, Caro Enrico.:-D)
Ciao
Eliano

Ciao a tutti. non è una userform e nemmeno una macro... Se vado a vedere
quali macro sono definite nel foglio non ce ne sono e se vado sul visual
basic non vedo moduli o componenti strani....

[Cekko]

Post by Cekko

Post by eliano

Post by plinius

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!
Ciao,
E.- Nascondi testo citato
- Mostra testo citato -

Va a finire che e' una UserForm o uno Shape.
Cosi' e' la vita, Caro Enrico.:-D)
Ciao
Eliano

Ciao a tutti. non è una userform e nemmeno una macro... Se vado a vedere
quali macro sono definite nel foglio non ce ne sono e se vado sul visual
basic non vedo moduli o componenti strani....

Allora, quasi sicuramente è un semplice campo di testo, il quale viene
reso visibile quando clicco nelle celle interessate e scompare quando
clicco da qualsiasi altra parte. il campo è sempre lo stesso, è il testo
che cambia al suo interno in base alla cella su cui ho cliccato... come
realizzo una roba del genere?

[plinius]

Post by Cekko

Post by Cekko

Post by eliano

Post by plinius

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!
Ciao,
E.- Nascondi testo citato
- Mostra testo citato -

Va a finire che e' una UserForm o uno Shape.
Cosi' e' la vita, Caro Enrico.:-D)
Ciao
Eliano

Ciao a tutti. non è una userform e nemmeno una macro... Se vado a vedere
quali macro sono definite nel foglio non ce ne sono e se vado sul visual
basic non vedo moduli o componenti strani....

Allora, quasi sicuramente è un semplice campo di testo, il quale viene
reso visibile quando clicco nelle celle interessate e scompare quando
clicco da qualsiasi altra parte. il campo è sempre lo stesso, è il testo
che cambia al suo interno in base alla cella su cui ho cliccato... come
realizzo una roba del genere?

Deve esserci una Sub Worksheet_SelectionChange, probabilmente inserita nel
modulo del foglio.
E.

[plinius]

Post by plinius

Post by Cekko

Post by Cekko

Post by eliano

Post by plinius

Post by eliano

Post by Cekko
Come da oggetto, è possibile farlo?
Se provo ad aggiungere un commento, si attiva al passaggio del mouse e
si vede un triangolino rosso nella cella. Posso togliere il triangolino
e fare si che il commento compaia quando clicco dentro alla cella? C'è
un modo più facile per farlo?
Grazie.

Non credo, ma puoi, ad esempio, con un doppio clic sx su una cella
ottenere un messaggio esplicativo relativo a quella cella.
E nel caso che tu abbia bisogno di vari commenti su celle diverse,
puoi scrivere quei commenti in un foglio, magari nascosto, ed
utilizzarli gestendo la macro in maniera appropriata.
Sempre ad esempio, scrivi bella cella A1 del Foglio2 il tuo commento
andando a capo nella cella con ALT + Invio
"Commento su Cella A1: (ALT+Invio)
aaaaaaaa bbbbbbbbbb cccc dddddddddddddd (ALT+Invio)
eeeeeeeeeee ffffffffffffffffffff ggggggggggggggg hh"
Nel Modulo del Foglio interessato, ad esempio Foglio1, copia/incolla
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Dim commento As String
If Target.Address = "$A$1" Then
commento = Worksheets("Foglio2").Range("A1").Text
MsgBox commento
Cancel = True
End If
End Sub
Salva il file, quindi posizionati sul Foglio1, cella A1, clicca due
volte di sinistro e vedi se funge.
Non ho XL su questo carrettino siculo e quindi facci sapere.
Saluti
Eliano

In effetti non so se è un commento ma ho un foglio di excel dove se clicco
dentro ad una cella compare tipo un campo di testo vicino alla cella che
spiega quali dati inserire nella cella stessa....

Se non devi realizzare tu questa cosa ma semplicemente capire come altri lo
hanno fatto nel file che ti hanno poi passato, basta esaminare il file.
Oppure condividerlo!
Ciao,
E.- Nascondi testo citato
- Mostra testo citato -

Va a finire che e' una UserForm o uno Shape.
Cosi' e' la vita, Caro Enrico.:-D)
Ciao
Eliano

Ciao a tutti. non è una userform e nemmeno una macro... Se vado a vedere
quali macro sono definite nel foglio non ce ne sono e se vado sul visual
basic non vedo moduli o componenti strani....

Allora, quasi sicuramente è un semplice campo di testo, il quale viene
reso visibile quando clicco nelle celle interessate e scompare quando
clicco da qualsiasi altra parte. il campo è sempre lo stesso, è il testo
che cambia al suo interno in base alla cella su cui ho cliccato... come
realizzo una roba del genere?

Deve esserci una Sub Worksheet_SelectionChange, probabilmente inserita nel
modulo del foglio.
E.

Se inserisci una etichetta Label1, supponiamo nel Foglio1, poi nel modulo di
Foglio1 inserisci questa:
----------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Label1
.Top = Target.Top
.Left = Target.Left + Target.Width
.Width = 200
.Visible = True
.BackColor = &H80FFFF
.AutoSize = True
' ecc. ecc.
Select Case Target.Address
Case "$A$1"
.Caption = "Messaggio per A1"
Case "$B$7"
.Caption = "Messaggio per B7"
Case "$C$9"
.Caption = "Messaggio per C9"
Case Else
.Visible = False
End Select
End With
End Sub
----------

Se vai a guardare qualcosa del genere deve già esserci.
Ciao,
E.

[Cekko]

Post by plinius
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Label1
.Top = Target.Top
.Left = Target.Left + Target.Width
.Width = 200
.Visible = True
.BackColor =&H80FFFF
.AutoSize = True
' ecc. ecc.
Select Case Target.Address
Case "$A$1"
.Caption = "Messaggio per A1"
Case "$B$7"
.Caption = "Messaggio per B7"
Case "$C$9"
.Caption = "Messaggio per C9"
Case Else
.Visible = False
End Select
End With
End Sub

Grazie plinius, il tuo codice funge e potrebbe fare al caso mio ma, a
proposito del mio foglio di lavoro, in esso non ci sono nè macro ne
componenti vb. Se vado nella scheda "sviluppo - visual basic" non vedo
nessun componente e non vi è traccia di codice. Se vado su macro... non
vedo macro definite... come è possibile?

[plinius]

Post by Cekko

Post by plinius
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Label1
.Top = Target.Top
.Left = Target.Left + Target.Width
.Width = 200
.Visible = True
.BackColor =&H80FFFF
.AutoSize = True
' ecc. ecc.
Select Case Target.Address
Case "$A$1"
.Caption = "Messaggio per A1"
Case "$B$7"
.Caption = "Messaggio per B7"
Case "$C$9"
.Caption = "Messaggio per C9"
Case Else
.Visible = False
End Select
End With
End Sub

Grazie plinius, il tuo codice funge e potrebbe fare al caso mio ma, a
proposito del mio foglio di lavoro, in esso non ci sono nè macro ne
componenti vb. Se vado nella scheda "sviluppo - visual basic" non vedo
nessun componente e non vi è traccia di codice. Se vado su macro... non
vedo macro definite... come è possibile?

Infatti non è possibile.
Cosa ci sia nel file è impossibile dirlo senza esaminarlo, ma le magie non
sono previste e dunque... :-)