Condividi:        

AIUTO LINGUAGGIO MACRO EXCELL

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

AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 06/05/14 08:01

Ciao a tt sono un nuovo utente e ho trovato questo forum molto interessante perchè tanti di voi sono molto esperti nei linguaggi VB per le macro di excell...

per questo volevo chiedere gentilmente il vostro aiuto in quanto non sono molto pratico di questi linguaggi..

Vorrei creare un foglio excell dedicato al lotto, e creare delle macro.

Possiedo excell 2007

una volta cricata l'estrazione su excell nel range b2-b11-------f2-f11, vorrei creare delle macro in grado di fare le seguenti 2 ricerche:

1) visualizzare ed evidenziare nell'estrazione tutti i numeri ripetuti dell'estrazione in automatico,
cioè schiaccio il pulsante della macro (RICERCA RIPETUTI) e mi vengono visualizzati ed evidenziati IN COLORE nell'estrazione tt i numeri ripetuti, quindi la ricerca è automatica nn manuale, cioè non devo inserire io i numeri da ricercare ma dovanno essere visualizzati automaticamente
-------------------------------------------------------------------------------------------------------------------------------------------------------
2) ricerca di tutte le distanze su tutte le ruote (orizzontali(stessa ruota) e verticali( isotope e non) ) in base alla distanza da me

desiderata, cioè inserisco la distanza che mi serve esempio distanza 30, schiaccio il pulsante esegui della macro che mi va a

visualizzare evidenziando nell'estrazione tutte le distanze le distanze 30, quindi mi serve una casella dove inserire la distanza da ricercare, a cui sara associata il pulsate macro dedicato alla ricerca.

//LA COSA IMPORTANTE E CHE I RISULTATI DELLA RICERCA DEVONO ESSERE VISUALIZZATI ED EVIDENZIATI NELLA TABELLA DELLE ESTRASTIONI CHE IO ANDRò A CARICARE NEL RANGE b2-b11---------f2-f11., e quindi NON DEVONO ESSERE RESTITUITI IN ALTRE CELLE QUALSIASI.

QUESTO è TUTTO VORREI REALIZZARE QUESTO PROGRAMMINO EXCELL :) grazie al vostro aiuto,

OVVIAMENTE VI CHIEDO DI POSTARE SOLO I CODICI DI LINGUAGGIO DELLA MACRO che io non so realizzare, poi al resto provvederò io.

VI RINGRAZIO E SAREI MOLTO GRATO SE POTRESTE AIUTARMI

nel caso vi servono chiarimenti sulle ricerche chiedete pure

ciao e buona giornata :)
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Sponsor
 

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi Flash30005 » 07/05/14 00:16

Ciao enea11 e benvenuto nel Forum

non fai alcun rifermento a quale tipo di estrazione ti riferisci
ed è opportuno l'invio del file con i dati estrazione d esempio sul foglio per rendere più comprensibile ciò che vorresti ottenere

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 08/05/14 07:13

ciao flash grazie per la risposta e per l'interessamento.

per quanto riguarda l'estrazione di riferimento intendevo per esempio che copiavo ed incollavo l'ultima estrazione mensile o un estrazione a caso, quindi non mi interessa un archivio ma solo fare ricerche su una qualsiasi estrazione da me inserita in excell nel range b2-f11. provo a farti un esempio qui xke nn riesco ad allegare le immagini.

estrazione di ieri( esempio)

Estrazione n. 54 del 06/05/2014
RUOTA
Bari 81 43 31 90 56
Cagliari 35 47 31 67 74
Firenze 4 64 56 32 16
Genova 52 17 13 38 89
Milano 35 3 34 16 28
Napoli 69 25 70 37 59
Palermo 80 86 19 78 50
Roma 9 2 85 24 44
Torino 2 14 51 66 3
Venezia 85 12 22 6 29
Nazionale 6 89 28 85 75

in questo esempio ti ho mostrato quello che vorrei ottenere con la ricerca automatica dei numeri ripetuti.
cioè io inserisco in excell l'estrazione nel range di celle b2-f11 che apparirà con tt i numeri dello stesso colore, cliccando poi sul pulsante della macro (ricerca ripetuti), la macro mi va a visualizzare ed evidenziare in rosso e in automatico le celle dei numeri ripetuti.

l'idea era questa , purtroppo io da solo nn riesco a farlo perchè nn conosco le giuste sintassi per far ciò per questo mi sono rivolto a te.
vorrei chiederti gentilmente se saresti in grado di riprodurre ciò o quanto meno di darmi le indicazioni sulle sintassi che poi proverò a fare io.

idealmente penso si dovra fare un confronto di ogni singola cella da b2 a f11 per poi colorare le celle che presentano gli stessi numeri.

pensi si possa fare.........se hai domande chiedi pure ciao :)
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi Flash30005 » 08/05/14 08:37

Non mi tornano i conti
se inizi dalla riga 2 (B2) e hai anche la ruota nazionale da controllare allora l'ultima riga sarà 12 e non 11 come dici con F11
comunque questa macro comprenderà anche la ruota nazionale altrimenti modifica la macro adattandola alla riga 11 se vuoi escludere la ruota nazionale
Codice: Seleziona tutto
Sub ContaC()
Range("B2:F12").Font.ColorIndex = 0
For CC = 2 To 6
For RR = 2 To 12  '<<<<<< inserire 11 invece che 12 se non vuoi considerare la Ruota nazionale
NumA = Cells(RR, CC).Value
If Application.WorksheetFunction.CountIf(Range("B2:F12"), NumA) > 1 Then Cells(RR, CC).Font.ColorIndex = 3
Next RR
Next CC
End Sub

Ugualmente modificherai anche il codice in application.....Range("B2:F11"), NumA
Ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi Statix » 08/05/14 18:39

Ciao enea11,
ti ho allegato un link
il file funziona con excel 2010
il programma evidenzia cadenze figure decine, numeri ripetuti e numeri personali,
eventualmente poi decidi cosa aggiungere.
con i tastini ti sposti l'estrazioni,l'archivio è aggiornabile nel foglio archivio in alto aggiorna da web o lottomatica,
consiglio di aggiornare dopo un paio d'ore dopo l'uscita della nuova estrazione, in quanto il sito si può bloccare dai tanti collegamenti in quell'ora.
http://www.filedropper.com/lottoarchivio_1
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 08/05/14 20:20

grazie mille flash e statix ora provo a studiarmeli bene....graziw di nuovo
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 09/05/14 07:08

volevo chiedere se potete di spiegarmi come scrivere in linguaggio vba della seguente operazione

supponiamo di avere 5 numeri disposti in sequenza sulla stessa riga ( esempio riga 3) nelle celle B-C-D-E-F >>

22 6 55 87 27 >> Vorrei creare un linguaggio che mi confronta ogni singolo numero della riga, facendo di ognuno la

differenza>> cioè >> (22-6); (22-55); (22-87); (22-27); (6-55); (6-87);(6-27); (55-87);(55-27); (87-27)

dopo aver fatto tt le differenze vorrei che venissero colorate in rosso solo le celle dei numeri la cui differenza è pari a 5 o -5

quindi nell'esempio dovrebbero colorarsi in rosso soltanto le celle B3 e F3 xke 22 - 27= -5

io ho già provato a scrivere il codice vba ma nn mi funziona perchè mi colora in rosso tt le celle , nn lo posto perchè è lunghissimo

PENSO CHE IL PROBLEMA SIA SOPRATTUTTO CHE NON RIESCO A FAR FARE LA DIFFERENZA DEI VALORI DELLA CELLA

SE POTETE MI INDICATE COME FARE QUESTA OPERAZIONE

GRAZIE CIAO
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 09/05/14 08:55

ho provato con questo codice ma di nuovo mi colora tt le celle anzichè solo quelle che contengono la differenza 5

ho pensato di usare una cella principale , nel codice avente coordinate R1, C1 che rimane fissa
e una cella secondaria di confronto , RR, CC , che si sposta di volta in volta di colonna e che viene sottratta alla cella

principale attraverso >> diff= NumA-Numb e poi con l'if se la diff è = 5 dovrebbe colorare di rosso solo le due celle con quelle coordinate

quindi in pratica ho messo due cicli For, il primo controlla la coordinata C1 che verrà incrementata solo al finire del secondo ciclo For che invece controlla la coordinata CC.

In questo modo speravo di ottenere una scansione sequenziale del tipo 22 meno 6; 22 meno 55; come segue sotto:


numeri da controllare >> 22 6 55 87 27 riga 2 e sotto ce la scansione

(22-6); (22-55); (22-87); (22-27); (6-55); (6-87);(6-27); (55-87);(55-27); (87-27)

Codice: Seleziona tutto
Sub differenza5 ()

Dim diff As Integer
RR = 2  'riga della cella di confronto che rimane sempre fissa a 2
R1 = 2  'riga della cella principale che rimane sempre fissa a 2
For C1 = 2 To 6    'colonna cella principale
For CC = 3 To 6    'colonna cella di confronto

NumA = Cells(R1, C1).Value 'cella principale
NumB = Cells(RR, CC).Value 'cella confronto
diff = NumA - NumB

If diff = 5 Then Cells(R1, C1).Interior.Color = vbRed
                             Cells(RR, CC).Interior.Color = vbRed

Next CC
Next C1

End Sub
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 09/05/14 14:31

ok ok lasciate stare sono riuscito a risolvere il problema......


VOLEVO CHIEDERE INVECE COME SI FA UNA MACRO PER LA FUNZIONE DESTRA E SINISTRA

application.worksheets.function.DESTRA(......?.......)......>> COME SCRIVO DENTRO
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi Flash30005 » 09/05/14 15:21

Per sinistra (riferita alla cella A1)
Codice: Seleziona tutto
Left(Range("A1"), 2) ' 2 è il numero dei caratteri da prendere in considerazione partendo da sinistra

e per destra
Codice: Seleziona tutto
Right(Range("A1"), 2)


ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi Statix » 09/05/14 16:35

enea11 ha scritto:ok ok lasciate stare sono riuscito a risolvere il problema......


VOLEVO CHIEDERE INVECE COME SI FA UNA MACRO PER LA FUNZIONE DESTRA E SINISTRA

application.worksheets.function.DESTRA(......?.......)......>> COME SCRIVO DENTRO


Ciao enea11, visto che hai risolto ,potresti postare la macro che hai usato,
a favore di tutti gli utenti che seguono questo forum che vogliono imparare.
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: AIUTO LINGUAGGIO MACRO EXCELL

Postdi enea11 » 10/05/14 15:02

statix era una vera cavolata.....il codice è giusto era solo un problema dell' if dove ho inserito male 2 istuzioni......basta andare a capo dopo then e mettere end if , tutto qua......è solo che non sono esperto di programmazione e quindi faccio cavolate
enea11
Newbie
 
Post: 9
Iscritto il: 06/05/14 07:19


Torna a Applicazioni Office Windows


Topic correlati a "AIUTO LINGUAGGIO MACRO EXCELL":


Chi c’è in linea

Visitano il forum: Marius44 e 50 ospiti