Condividi:        

Incollare celle " visibile"

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Incollare celle " visibile"

Postdi Ubuntus » 12/06/17 14:23

ciao
nelle colonne I,J,K,L ci sono o valori o "N/d",(frutto di un cerca vert) in queste colonne sulla stessa riga non posso avere piu di un campo con valore, vorrei riportare e sostituire le celle contenenti i valori sulla colonna A,
la colonna A dispone di nome di articoli

come potrei fare con una macro ?

al momento lo faccio manualmente con due colonne di appoggio con
=+SE(I2<>"";I2;SE(J2<>"";J2;SE(K2<>"";K2;SE(L2<>"";L2;""))))
=+SE(C2="";A2;C2)
perché incollare su celle discontinue excel 2007 non permette di farlo

grazie
Ubuntus
Utente Junior
 
Post: 81
Iscritto il: 24/07/15 15:56

Sponsor
 

Re: Incollare celle " visibile"

Postdi alfrimpa » 12/06/17 17:21

Ciao Ubuntus

Allega un file di esempio con i dati, spiegazione e risultato desiderato inserito a mano.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Incollare celle " visibile"

Postdi Anthony47 » 13/06/17 00:28

Mi aggrego alla richiesta di avere un file esemplificativo, magari si riesce a capire meglio dove vanno quelle formule e di conseguenza che cosa vorresti ottenere.
Per le istruzioni su come allegare un file:
viewtopic.php?f=26&t=103893&p=605487#p605487

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Incollare celle " visibile"

Postdi Ubuntus » 13/06/17 09:46

ciao

in giallo ed arancione le colonne fatte a mano,

In arancione è la colonna finale che andrà a sostituire i valori nella colonna A

https://we.tl/QbfhMN0Ps2
Ubuntus
Utente Junior
 
Post: 81
Iscritto il: 24/07/15 15:56

Re: Incollare celle " visibile"

Postdi alfrimpa » 13/06/17 10:58

Io non ho capito qual è il risultato che con la macro vorresti ottenere sulla base dei dati presenti sul foglio1
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Incollare celle " visibile"

Postdi Ubuntus » 14/06/17 13:20

Vorrei il risultato della colonna arancione, essendo fatta senza macro dopo andavo a sostuire la colonna A
Ubuntus
Utente Junior
 
Post: 81
Iscritto il: 24/07/15 15:56

Re: Incollare celle " visibile"

Postdi Anthony47 » 16/06/17 19:02

Il mio suggerimento e' che separi le celle di input dalle celle calcolate in modo da avere la piena tracciabilita' dei tuoi risultati.

Dallo scarno esempio (1 riga di dati) mi pare che vorresti una colonna che contenga il contenuto di colonna A (se I:L risulta vuoto) oppure il contenuto della prima cella occupata in I:L; potresti ottenere questo usando es in B2 questa formula
Codice: Seleziona tutto
=SE(I2<>"";I2;SE(J2<>"";J2;SE(K2<>"";K2;SE(L2<>"";L2;A2))))

In questa soluzione la colonna C non sara' piu' necessaria; se (lavorando col file che hai pubblicato) prima inserisci la formula in B2 e poi elimini la colonna C la formula si "aggiusta" automaticamente.

Se vuoi farlo via macro con sostituzione eventuale del contenuto di colonna A in funzione del contenuto di I:L (cosa che io sconsiglio perche' alla fine non sai quali erano i dati di partenza), allora puoi usare questa macro:
Codice: Seleziona tutto
Sub sconfondi()
Dim Contr As String, I As Long, rContr As Range, myC As Range

Contr = "I:L"           '<<< Le colonne in cui guardare
'
Set rContr = Application.Intersect(Range(Contr), Range("1:1"))
For I = 2 To Cells(Rows.Count, 1).End(xlUp).Row
'    If Application.WorksheetFunction.CountA(rContr.Offset(I - 1, 0)) > 0 Then
        For Each myC In rContr.Offset(I - 1, 0)
            If myC.Value <> "" Then
                Cells(I, 1) = myC.Value
                Exit For
            End If
        Next myC
'    End If
Next I
End Sub

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Incollare celle " visibile"":


Chi c’è in linea

Visitano il forum: Nessuno e 34 ospiti