È soltanto un Pokémon con le armi o è un qualcosa di più? Vieni a parlarne su Award & Oscar!
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Macro formula lunghissima

Ultimo Aggiornamento: 28/01/2017 18:19
Post: 61
Registrato il: 04/11/2016
Città: SASSARI
Età: 48
Utente Junior
2010
OFFLINE
28/01/2017 09:22

SALVE A TUTTI,
CHI PUO' ESSERE COSI' GENTILE AD AIUTARMI A CREARE UNA MACRO APPUNTO PER UNA FORMULA =SE(E..... SUPER LUNGA?

la formula e'

ALLEGO FILE



Post: 5.032
Registrato il: 14/11/2004
Utente Master
Office 2019
OFFLINE
28/01/2017 09:41

Formula Lunga
Ciao Ema, non risolverai mai il problema in questo modo, devi inserire il file con la formula, da li si tenta di tradurla in VBA.

Ciao By Sal [SM=x423051]

se ti piace la soluzione sostienici con una DONAZIONE a piacere. Grazie clicca qui
Post: 3.662
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/01/2017 09:41

allega il file excel e spiega cosa deve fare la macro a parole

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 61
Registrato il: 04/11/2016
Città: SASSARI
Età: 48
Utente Junior
2010
OFFLINE
28/01/2017 10:25

VORREI METTERE QUESTA FORMULA IN CELLLA (B46)

PERO' MI DICE CHE (NON E' POSSIBILE PERCHE CI SONO PIU' DI 64 ANNIDAMENTI) UNA COSA DEL GENERE.


in pratica quando vado ad inserire dei numeri in range (V40:X40),
SE I numeri cossispondono ad una certa parte di formula mi da un risultato---

questo e' il file:
Post: 3.663
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/01/2017 11:30

se non riesci ad inserire la formula manualmente non potrai farlo neppure con la macro. Con una macro potrei risolvere il problema in altro modo se ce lo racconti

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 62
Registrato il: 04/11/2016
Città: SASSARI
Età: 48
Utente Junior
2010
OFFLINE
28/01/2017 11:43

SCUSATE MA TRA MSG NON CI SI CAPISCE...

INNANZI TUTTO GRAZIE PER LA DISPONIBILITA',

allora cerchero' di essere piu' chiaro possibile, nella formula allegata (e che si dovrebbe trovare gia in cella (b46)), ogni qual volta si verifica un evento es:

se(e( w40=0;x40=5)


in cella b46 mi dara' un risultato in questo caso e' 32

non so come spiegarmi meglio....

Post: 63
Registrato il: 04/11/2016
Città: SASSARI
Età: 48
Utente Junior
2010
OFFLINE
28/01/2017 15:29

QUESTA SERIE DI NUMERI ANDRANNO IN PROGRASSIONE ES.

0 5 32 24 15 16 19 33 4 1 21 20 2 14 25 31 17 9 34 22 6 18 27 29 13 7 36 28 11 12 30 35 8 3 23 26 10 0


QUINDI.

ESEMPIO
se nelle celle (W40, X40) SI VERIFICANO 0 5 ALLORA (B46) = 32

se nelle celle (W40, X40) SI VERIFICANO 5 32 ALLORA (B46) = 24

se nelle celle (W40, X40) SI VERIFICANO 32 24 ALLORA (B46) = 15

se nelle celle (W40, X40) SI VERIFICANO 24 15 ALLORA (B46) = 16

se nelle celle (W40, X40) SI VERIFICANO 15 16 ALLORA (B46) = 19

se nelle celle (W40, X40) SI VERIFICANO 16 19 ALLORA (B46) = 33

se nelle celle (W40, X40) SI VERIFICANO 19 33 ALLORA (B46) = 4

ECCETERA....


Post: 5.035
Registrato il: 14/11/2004
Utente Master
Office 2019
OFFLINE
28/01/2017 16:20

Roulette
Ciao ti ho inviato una Chat, nella quale dico:

ma V40 non viene considerato solo W40-X40 fanno il confronto?

Ciao By Sal [SM=x423051]

se ti piace la soluzione sostienici con una DONAZIONE a piacere. Grazie clicca qui
Post: 5.037
Registrato il: 14/11/2004
Utente Master
Office 2019
OFFLINE
28/01/2017 16:54

Roulette
Ciao Ema, eccoti una "UDF", non devi fare altro che copiarla in un modulo per il VBA

Function CercaUsc(aa, bb)
Dim d2, d3, n, x

n = Array(0, 5, 32, 24, 15, 16, 19, 33, 4, 1, 21, 20, 2, 14, 25, 31, 17, 9, 34, 22, 6, 18, 27, 29, 13, 7, 36, 28, 11, 12, 30, 35, 8, 3, 23, 26, 10, 0)
For x = 0 To 36
    d2 = n(x)
    d3 = n(x + 1)
    If d2 = aa And d3 = bb Then CercaUsc = n(x + 2): Exit For Else CercaUsc = "Non Trovato"
Next x
End Function


la Funzione si chiama "CercaUsc"

dopo copiata la funzione, nella cella dove vuoi il risultato devi scrivere come se fosse una Formula:

=CercaUsc(W40; X40)


se trova la combinazione ti restituisce il numero corrispondente, altrimenti la scritta "Non Trovato".

Di norma la funzione =SE() può avere massimo 16 nidificazioni anche se esiste un modo per allungarle.

Ciao By Sal [SM=x423051]

[Modificato da by sal 28/01/2017 16:57]
se ti piace la soluzione sostienici con una DONAZIONE a piacere. Grazie clicca qui
Post: 64
Registrato il: 04/11/2016
Città: SASSARI
Età: 48
Utente Junior
2010
OFFLINE
28/01/2017 18:19

GRAZIE #by sal,
E' PERFETTO..

siete grandi....
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Formula o Macro copia/incolla se (11 messaggi, agg.: 19/01/2018 16:36)
formula CERCA.VERT in macro (3 messaggi, agg.: 02/12/2016 21:39)
Macro reset colonna in tabella (1 messaggio, agg.: 06/07/2017 16:23)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 15:39. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com