riportare il contenuto di una cella in un'altra cella

Question

salve,

vorrei chiedere se c'è una formula che assegni il contenuto di una cella  ad un'altra.

ad esempio:

	a	b	c	d	f
1	3	4	=a1*b1
2
3

io vorrei copiare il risultato di C1 (cioè il valore 12)   nella cella F1    

vorrei che in F1  ci sia solo il valore 12  e non   =C1

non esiste una formula che esegua un operazione simile   d1:  =copia(C1 in F1)  ????

grazie per l'aiuto,

Claudio

Answer 1

Ciao Claudio,

il problema nasce dal fatto che un software (di terze parti)  processa un foglio di excel 

utilizzando la colonna "A"  cone chiave e la colonna "B"  come valore.

ad oggi l'elenco delle chiavi della colonna A  la scrivo tutta a mano,

ma vorrei costruirla nel seguente modo

	A	B	C	D	E
1	=C1&" - "&D1&" - "&E1	12	P2	TRC_DX	Y
2	=C2&" - "&D2&" - "&E2	15	P2	TRC_DX	Z
3	=C3&" - "&D3&" - "&E3	34	P2	VFT_LF	V

dove nelle colonne C ,  D,  E    vado ad inserire  la gerarchia   padre-figlio-nipote...

il problema sta nel fatto che il software (di terzi)  non sbroglia la formula,  

mi servirebbe qualcosa che scrivesse nella colonna A  il risultato del concatenamento delle celle. 

come nell'esempio

	A	B	C	D	E
1	P2 - TRC_DX - Y	12	P2	TRC_DX	Y
2	P2 - TRC_DX - Z	15	P2	TRC_DX	Z
3	P2 - VFT_LF - V	34	P2	VFT_LF	V

• Fai clic dx sulla linguetta del foglio
• Seleziona l'opzione Visualizza Codice dal **** menu contestuale risultante
• Incolla il seguente codice:

'=========>>

Option Explicit

'--------->>

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim Rng As Range, Rng2 As Range

    Dim rRow As Range

    Dim i As Long

    Dim arrConcat As Variant

    Dim sStr As String

    Const mieColonne As String = "C:E"

    On Error Resume Next

    Set Rng = Intersect(Target, Me.Columns(mieColonne))

        On Error GoTo XIT

    Application.EnableEvents = False

    If Not Rng Is Nothing Then

        For Each rRow In Rng.Rows

            Set Rng2 = Intersect(rRow.EntireRow, Me.Columns(mieColonne))

            If Application.CountA(Rng2) Then

                ReDim arrConcat(1 To 3)

                For i = 1 To Rng2.Cells.Count

                    arrConcat(i) = Rng2.Cells(i).Value

                Next i

                sStr = Join(arrConcat, " - ")

                Rng2.Cells(-1).Value = sStr

            End If

        Next rRow

    End If

XIT:

    Application.EnableEvents = True

End Sub

'<<========= 

• Alt+Q per chiudere l'editor di VBA e tornare a Excel.
• Salva il file con l'estensione xlsm.

Ora, in risposta an una modifica aa vallore delle celle delle colonne C:E, il valore concatenato sarà immessa, come un valore, nella cella corrispondente della colonna A.

Potresti scaricare il mio file di prova Claudio20161028.xlsm a:

https://www.dropbox.com/s/19gh9dgg83kv4wc/Claudio20161028.xlsm?dl=0

===

Regards,

Norman

Answer 2

Salve,

il problema nasce dal fatto che un software (di terze parti)  processa un foglio di excel

utilizzando la colonna "A"  cone chiave e la colonna "B"  come valore.

ad oggi l'elenco delle chiavi della colonna A  la scrivo tutta a mano,

ma vorrei costruirla nel seguente modo

	A	B	C	D	E
1	=C1&" - "&D1&" - "&E1	12	P2	TRC_DX	Y
2	=C2&" - "&D2&" - "&E2	15	P2	TRC_DX	Z
3	=C3&" - "&D3&" - "&E3	34	P2	VFT_LF	V

dove nelle colonne C ,  D,  E    vado ad inserire  la gerarchia   padre-figlio-nipote...

il problema sta nel fatto che il software (di terzi)  non sbroglia la formula,  

mi servirebbe qualcosa che scrivesse nella colonna A  il risultato del concatenamento delle celle. 

come nell'esempio

	A	B	C	D	E
1	P2 - TRC_DX - Y	12	P2	TRC_DX	Y
2	P2 - TRC_DX - Z	15	P2	TRC_DX	Z
3	P2 - VFT_LF - V	34	P2	VFT_LF	V

saluti, Claudio

Answer 3

Ciao Claudio,

Una formula può solo restituire un valore nella cella in qu viene immessa . Per riportare il risultato della formula come valore, sia nella cella stessa che  altrove, richedierebbe ricorso a VBA.

Se vorresti perseguire questa strada, sarebbe necessario di fornire una spiegazione completa e dettagliata delle tue esigenze.

===

Regards,

Norman