Condividi:        

cercare e prelevare 128 estraz del lotto

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

cercare e prelevare 128 estraz del lotto

Postdi raimea » 21/10/21 16:18

ciao

tramite macro vorrei prelevare 128 estrazioni
da un determinata riga = Record. di una determ citta.

in fgl cicli32 in A2 scrivo il numero del record
di inizio ricerca x prelevare

in fgl cicli32 in B1 menu tendina, scelgo la citta da cercare


quindi andando in fgl archivio cerco il record in col A da A3
cerco la relativa citta in Riga 2 da D2

una volta individuato riga e citta
devo copiare i 5 numeri per 128 estraz successive
ed incollarli in fgl cicli32 partendo da cella B2
incollando >> Solo Valori.

vi allego il file

https://www.dropbox.com/scl/fi/q3kfh1lmkx3rlmb37i02n/preleva_128estrazioni.xlsm?dl=0&rlkey=92qxjgx9d0tmslk6ub4hmfllu


ciao
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Sponsor
 

Re: cercare e prelevare 128 estraz del lotto

Postdi Anthony47 » 21/10/21 21:01

Probabilmente:
Codice: Seleziona tutto
Sub Per128()
Dim ASh As Worksheet, C32 As Worksheet
Dim staCol As Long, starow As Long
'
Set C32 = Sheets("Cicli 32  di 4 estr tre numeri ")
Set ASh = Sheets("Archivio")
'
staCol = Application.Match(C32.Range("B1").Value, ASh.Range("A2:BF2"), False)
starow = Application.Match(C32.Range("A2").Value, ASh.Range("A2:A10000"), False) + 1
ASh.Cells(starow, staCol).Resize(128, 5).Copy
C32.Range("B2").PasteSpecial xlPasteValues
Application.CutCopyMode = False
End Sub

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

Re: cercare e prelevare 128 estraz del lotto

Postdi raimea » 21/10/21 21:37

ciao

quando tento di associare un pulsante alla macro

mi risponde cosi :eeh:

-- il riferim. deve essere un fgl macro

https://www.dropbox.com/s/3tkp603scgweoyc/211021.jpg?dl=0
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Re: cercare e prelevare 128 estraz del lotto

Postdi Anthony47 » 21/10/21 21:58

Confonde Per128 con la cella PER128... Mah... Aiutiamolo cambiando il nome della maco in Sub PerPer128

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

Re: cercare e prelevare 128 estraz del lotto

Postdi raimea » 21/10/21 22:02

ciao
tutto ok

grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago

Re: cercare e prelevare 128 estraz del lotto

Postdi miko » 22/10/21 17:43

Buonasera,
se non violo la privacy puoi rendere disponibile il file iniziale,
il link non funziona
mi interessa per capire come funziona la macro di anthony
ciao grazie
windows 10 - office 2013
miko
Utente Senior
 
Post: 520
Iscritto il: 29/12/09 10:44

Re: cercare e prelevare 128 estraz del lotto

Postdi raimea » 22/10/21 19:26

ciao
mi spiace
ma tutto il file non posso condividerlo

tutto il file non e mio
io ho sistemato solo 2 passaggi

posso passarti solo la parte interessata dove e stata messa la macro sopra
fai sapere

ciao
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1410
Iscritto il: 11/02/10 07:33
Località: lago


Torna a Applicazioni Office Windows


Topic correlati a "cercare e prelevare 128 estraz del lotto":


Chi c’è in linea

Visitano il forum: Ricky0185 e 63 ospiti