Tom sta cercando di creare un codice macro che controllerà la quantità di copie da stampare, in base al valore inserito in una cella. Ha creato un modulo di input da utilizzare per il suo personale di spedizione che stampa le etichette del contenuto del pacco. Vorrebbe poter far inserire nella cella B11 il numero di etichette da stampare e poi far stampare quel numero.

Questo è relativamente facile da fare, a seconda di cosa si desidera stampare. Se vuoi stampare solo il contenuto del foglio di lavoro attivo, puoi usare un codice simile al seguente:

iNumCopies = Range("B11").Value If iNumCopies < 1 Then iNumCopies = 1 ActiveSheet.PrintOut Copies:=iNumCopies

Se non si desidera stampare l’intero foglio di lavoro, è necessario modificare leggermente l’istruzione PrintOut. Ad esempio, il seguente esempio presume che l ‘”etichetta” venga stampata nell’intervallo A1: A5:

Set MyRange = Range("A1:A5")

iNumCopies = Range("B11").Value If iNumCopies < 1 Then iNumCopies = 1 MyRange.PrintOut Copies:=iNumCopies

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (3272) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui:

Specifying Print Quantity in a Cell.