Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

macro excel per numeri maglie

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 excel per numeri maglie

Postdi peter78 » 29/08/10 10:41

ciao ragazzi mi affido a voi
allora vi spiego il mio problema.... da premettere che non so niente di macro .. :?: ...un esmpio sarebbe gradito :)
io avrei in un foglio( lo chiamo foglio 1) excel una serie di dati ad esmpio da
A1 a A20
poi
da B1 a B20
ed infine
da C1 a C20
ogni colonna con i dati A B C sono i risultati di altre celle con relative formule
adesso io ad ogni colonna A B C ci vorrei mettere un pulsante per ogni colonna(quindi pulsante A,pulsante B e pulsante C) , che ricopi i dati visualizzati da A1 a A20 dal foglio 1 al foglio 2, nelle celle del secondo foglio da da D1 a D20
altra cosa importante è questa
che se schiaccio pulsante A deve copiare nel foglio 2 i dati compresi tra A1 e A20, se schiaccio il pulsante B mi deve copiare i dati da B1 a B20... ecc.....quindi a seconda il pulsante che schiaccio deve inserire i dati di quella colonna ed omettere le restanti altre

aggiungo mi serve per la gestione di una squadra calcistica
le varie colonne sono le divise quindi divisa arancio colonna A,divisa azzurra colonna B e divisa gialla colonna C
nelle varie celle da a A1 a A20 ci sta il numero della maglia adesso io cliccando sul pulsante A
i numeri della maglia arancio devono essere riportati nella distinta (foglio 2 dalla cella D1 a D20)se invece clicco sul pulsante B allora in questo caso mi deve riportare in distinta( foglio 2 celle D1 a D20)

spero di avermi spiegato e di non aver fatto troppi casini grazie...
peter78
Newbie
 
Post: 5
Iscritto il: 29/08/10 09:18

Sponsor
 

Re: macro excel per numeri maglie

Postdi Flash30005 » 29/08/10 15:31

Ciao Peter78 e benvenuto nel Forum

Con queste tre macro (ognuna assegnata ad un pulsante o forma colorata)
otterrai quanto da te specificato
Codice: Seleziona tutto
Sub CopiaA()
UD = Worksheets("Foglio2").Range("D" & Rows.Count).End(xlUp).Row
Worksheets("Foglio2").Range("D1:D" & UD).ClearContents
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("Foglio1").Range("A1:A" & UR).Copy Destination:=Worksheets("Foglio2").Range("D1")
End Sub
Sub CopiaB()
UD = Worksheets("Foglio2").Range("D" & Rows.Count).End(xlUp).Row
Worksheets("Foglio2").Range("D1:D" & UD).ClearContents
UR = Worksheets("Foglio1").Range("B" & Rows.Count).End(xlUp).Row
Worksheets("Foglio1").Range("B1:B" & UR).Copy Destination:=Worksheets("Foglio2").Range("D1")
End Sub
Sub CopiaC()
UD = Worksheets("Foglio2").Range("D" & Rows.Count).End(xlUp).Row
Worksheets("Foglio2").Range("D1:D" & UD).ClearContents
UR = Worksheets("Foglio1").Range("C" & Rows.Count).End(xlUp).Row
Worksheets("Foglio1").Range("C1:C" & UR).Copy Destination:=Worksheets("Foglio2").Range("D1")
End Sub

Allego il file

(Le colonne possono anche avere più linee delle 20 richieste)

Fai sapere
ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: macro excel per numeri maglie

Postdi peter78 » 30/08/10 00:18

ciao inanzitutto grazie per avermi risposto :P
poi ho preso il tuo codice e modificato in base alle mie esigenze:


Sub artglass()
UD = Worksheets("stampa").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("stampa").Range("A15:A" & UD).ClearContents
UR = Worksheets("inserimento").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("inserimento").Range("A56:A" & UR).Copy Destination:=Worksheets("stampa").Range("A15")
End Sub
Sub crm()
UD = Worksheets("stampa").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("stampa").Range("A15:A" & UD).ClearContents
UR = Worksheets("inserimento").Range("B" & Rows.Count).End(xlUp).Row
Worksheets("inserimento").Range("B56:B" & UR).Copy Destination:=Worksheets("stampa").Range("A15")
End Sub
Sub beautyl()
UD = Worksheets("stampa").Range("A" & Rows.Count).End(xlUp).Row
Worksheets("stampa").Range("A15:A" & UD).ClearContents
UR = Worksheets("inserimento").Range("C" & Rows.Count).End(xlUp).Row
Worksheets("inserimento").Range("C56:C" & UR).Copy Destination:=Worksheets("stampa").Range("A15")
End Sub

se uso cosi com'è la formula su un foglio vuoto funziona
ma sul mio no
mi da un errore di sto tipo
errore di run-time 1004
impossibile modificare una partre di una cella unita
ho controllato nel formato delle celle interessate se appariva selezionata nelle opzioni unisci celle ,ma tale opzione non è selezionata
ho provato sia su excel 2003 che sul 2007
ma non funziona comunque :cry:
nelle celle A56 in poi il valore che ne esce fuori è una restituzione di una formula tipo
=CERCA.VERT(Q15;'lista'!A5:K30;9)
potrebbe essere questo il motivo?
peter78
Newbie
 
Post: 5
Iscritto il: 29/08/10 09:18

Re: macro excel per numeri maglie

Postdi peter78 » 30/08/10 09:59

problema risolto in parte
riesco in altra cella a far funzionare la macro però mi da errore di questo tipo
#RIF!,io adesso vorrei che mi riportasse il numero non l'intera formula
peter78
Newbie
 
Post: 5
Iscritto il: 29/08/10 09:18

Re: macro excel per numeri maglie

Postdi Anthony47 » 30/08/10 18:17

Probabilmente devi fare "Incolla speciale /Valori, invece che Copia e Incolla.
Insomma, non Worksheets("inserimento").Range("B56:B" & UR).Copy Destination:=Worksheets("stampa").Range("A15")ma (su due righe)
Codice: Seleziona tutto
Worksheets("inserimento").Range("B56:B" & UR).Copy
Worksheets("stampa").Range("A15").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: macro excel per numeri maglie

Postdi peter78 » 30/08/10 22:06

niente non ne vengo fuori :undecided:
peter78
Newbie
 
Post: 5
Iscritto il: 29/08/10 09:18

Re: macro excel per numeri maglie

Postdi peter78 » 30/08/10 23:00

peter78 ha scritto:niente non ne vengo fuori :undecided:

no invece ho risoloto
grazie per avermi aiutato :)
peter78
Newbie
 
Post: 5
Iscritto il: 29/08/10 09:18


Torna a Applicazioni Office Windows


Topic correlati a "macro excel per numeri maglie":


Chi c’è in linea

Visitano il forum: Nessuno e 27 ospiti