Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Modifica macro

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

Modifica macro

Postdi ahidai » 04/02/15 15:35

Un saluto a tutti. E' un po che non frequento il forum e avrei bisogno di un aiuto per modificare questa macro:

Codice: Seleziona tutto
Sub STAMPA()
'
SelPrint = Application.Dialogs(xlDialogPrinterSetup).Show
If SelPrint = False Then
    MsgBox "Stampa Cancellata"
    Exit Sub
End If
'stampa il range impostato in s1
'If [s1] <= 0 Then Exit Sub

Dim max

    max = Range("NUM_DATA").Value
   
    For i = 1 To max
       Range("SCELTA").Value = Range("DATA").Cells(i, 1).Value
        ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Next i
   
End Sub


Ho pensato di modificarla in questo modo:

Codice: Seleziona tutto
Sub STAMPA()
'
SelPrint = Application.Dialogs(xlDialogPrinterSetup).Show
If SelPrint = False Then
    MsgBox "Stampa Cancellata"
    Exit Sub
End If
'stampa il range impostato in s1
'If [s1] <= 0 Then Exit Sub

Dim max
Dim max2

    max = Range("NUM_DATA").Value
   
    For i = 1 To max
       Range("SCELTA").Value = Range("DATA").Cells(i, 1).Value
        ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Next i
   
    max2 = Range("NUM_NUMERO").Value
   
    For i = 1 To max2
      Range("SCELTA2").Value = Range("NUMERO").Cells(i, 1).Value
      ActiveWindow.SelectedSheets.PrintOut Copies:=1
     Next i   

End Sub


In pratica avevo bisogno che mi stampava su 10 fogli 2 dati diversi, purtroppo come ho pensato io di modificarla mi stampa i 2 dati in questo modo: il primo gruppo di di dati sui primi 10 fogli e il secondo gruppo di dati su altri 10 fogli.

Spero di essere stato chiaro e con l'occasione auguro a tutti un buon pomeriggio.
ahidai
Utente Senior
 
Post: 209
Iscritto il: 08/12/10 17:33

Sponsor
 

Re: Modifica macro

Postdi Flash30005 » 04/02/15 23:38

La tua esposizione non è molto chiara e leggere una macro che non funziona per farla funzionare diventa un problema quando, forse, il problema non sussiste.

L'unica cosa che ho capito è che:
1) hai una serie di dati (o range di dati) su un foglio
2) hai una seconda serie di dati in un secondo foglio
3) vorresti stampare con una macro la serie1 e la serie2 nello stesso foglio.

se è così dovrai crearti (con macro) un riepilogo cioè mettere le due serie di dati, che dovranno essere stampati insieme, in unico foglio e poi stampare questo riepilogo

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-


Torna a Applicazioni Office Windows


Topic correlati a "Modifica macro":


Chi c’è in linea

Visitano il forum: Nessuno e 6 ospiti