Condividi:        

MAcro Denomina intervallo col nome variabile di una cella

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

MAcro Denomina intervallo col nome variabile di una cella

Postdi ANTONIO1105 » 20/10/19 17:17

http://www.filedropper.com/fesempio_1

aggiungendo un nuovo Item alla fine del foglio di lavoro attivo, ho bisogno di "denominare i relativi intervalli una volta compilati i campi
In pratica con una macro vado alla fine della colonna O, quindi risalgo in P (per delimitare il movimento verso l’alto), seleziono i campi della colonna Q e li ordino e così per le colonne R, W e Y. Fin qui tutto funziona.
Il terzo passaggio è: seleziona (nell'esempio) da Q422 in giù quindi vai in K422 copia il nome e incollalo in alto a destra (affianco alla barra) dando OK, in questo modo assegnando un nome all’intervallo selezionato. Anche qui, riesco a selezionare l’intervallo cui assegnare un nome. PROBLEMA! Quando aggiungo un nuovo Item (quindi riga 435) e rilancio la macro il nome che mi assegna resta sempre "BANCHE" (quello presente nel penultimo Item) che invece varia di volta in volta.
Riassumendo, selezionando l'intervallo Q422 fino alla fine, devo assegnargli il nome presente nella col K, l'intervallo R422 - fine, il nome presente in L sempre riga 422, per l’intervallo W422 – fine, il nome sarà M422 ed infine l'intervallo Y422 – fine, il nome da assegnare corrisponde a N422. Ripeto il problema è che aggiungendo un nuovo Item, i nomi da assegnare a ogni nuovo intervallo variano. come venirne a capo? Infine, vorrei che la macro copiasse (anch'essi variabili di volta in volta, SOLO se valorizzati (<>"") i valori presenti in I e J 422 alla fine delle colonne B e C (nell'esempio in B54 e C54).
Grazie sin da ora a chi vorrà darmi una mano
ANTONIO1105
Utente Junior
 
Post: 37
Iscritto il: 23/01/17 22:25

Sponsor
 

Re: MAcro Denomina intervallo col nome variabile di una cel

Postdi Anthony47 » 20/10/19 20:43

Ho paura di essermi perso...

Se vuoi assegnare all'ultimo blocco di colonna Q, R e W il "Nome" segnato sulla riga di inizio blocco rispettivamente in colonna K, L ed M allora puoi usare questo spezzone di codice:
Codice: Seleziona tutto
Dim OBott As Long, PTop As Long, NArr, I As Long        'dichiarazioni iniziali
'
OBott = Cells(Rows.Count, "O").End(xlUp).Row + 1
PTop = Cells(Rows.Count, "P").End(xlUp).Row
NArr = Array("K", "Q", "L", "R", "M", "W")          '<<< Coppie Colonna Nome /Colonna Intervallo
'
For I = 0 To UBound(NArr) Step 2
    Cells(PTop, NArr(I + 1)).Resize(OBott - PTop, 1).Name = Cells(PTop, NArr(I))
Next I


Attenzione che nel file allegato i contenuti di L422 ed M422 sono uguali, il secondo assegnamento (al blocco di colonna W) elimina il primo assegnamento (fatto al blocco di colonna R)

Se invece chiedevi una cosa diversa allora devi spiegare di nuovo.

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

Re: MAcro Denomina intervallo col nome variabile di una cel

Postdi ANTONIO1105 » 21/10/19 14:11

grazie Antony, anche per la tua perizia riguardo l avvertimento di omonimia L22 e M22. provvedo alle necessarie rettifiche
ANTONIO1105
Utente Junior
 
Post: 37
Iscritto il: 23/01/17 22:25


Torna a Applicazioni Office Windows


Topic correlati a "MAcro Denomina intervallo col nome variabile di una cella":


Chi c’è in linea

Visitano il forum: Nessuno e 32 ospiti