stampa

Mi servirebbe una macro che stampi un elenco di nomi in questo modo es..
Prima solo i nomi della lettera “A” in modo che la stampa finisca alla fine del foglio con righi vuoti (vedi esempio allegato) e poi tutte le altre lettere nello stesso modo in seguenza…questi nominativi sono in un foglio excel, tramite formule e sono senza righi vuoti cioè appena finiscono i nominativi che iniziano per “A” iniziano subito quelli per lettera “B”…ed inoltre il numero varia, possono essere un giorno 30 nominativi che iniziano con “A” e un giorno 50 cosi anche per gli altri nomi che iniziano per le altre lettere dell’alfabeto…
Quindi la macro dovrebbe essere una coso del genere:
- stampa solo nomi iniziale A e dopo l’ultimo nome iniziale A aggiungi celle vuote fino alla fine dell’area di stampa
- stampa solo nomi iniziale B e dopo l’ultimo nome iniziale B aggiungi celle vuote fino alla fine dell’area di stampa
- ecc…

Farlo con una macro unica non sono in grado, stampare letterera per lettera filtrando preventivamente, prova in questo modo:
Da associare a due pulsanti sul foglio interessato

'Per filtrare in base alla lettera scelta nell'imputbox

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim criterio As String
criterio = InputBox("Digitare la lettera da filtrare") & "*"
Columns("A:A").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$A$10000").AutoFilter Field:=1, Criteria1:=criterio
End Sub


'Poi per togliere il filtro

Private Sub CommandButton2_Click()
Selection.AutoFilter
End Sub


quando applichi il filtro non vengono stampate le righe nascoste, quindi per ogni lettera mandi in esecuzione la stampa e hai alla fine dell'ultima pagina le righe vuote.
Puoi fare anche una prova, scegli una lettera, applichi il filtro e poi apri l'anteprima di stampa in modo che vedi il risultato.

Ciao
Antonio

Ti allego un esempio.

Ciao
Antonio