Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[Excel] Aggiungere riga mantenendo il formato

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

[Excel] Aggiungere riga mantenendo il formato

Postdi FutureP90 » 28/10/12 14:15

Ciao a tutti, ho cercato nel forum ed ho trovato questo thread che espone un problema simile al mio
viewtopic.php?t=97191

Questa è quella che mi interessa :)
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
CheckArea = "A2:A1000"
If Not Application.Intersect(ActiveCell, Range(CheckArea)) Is Nothing Then
    If (Selection.Rows.Count + Selection.Columns.Count) > 2 Then Exit Sub
    Application.EnableEvents = False
    If Target <> "" Then
    Riga = Target.Row + 1
    Rows(Riga).Insert Shift:=xlDown
    End If
End If
    Application.EnableEvents = True
End Sub


Le differenze sono che:
Non deve essere aggiunta una riga vuota, ma una riga con formato identico a quello della cella in cui ho scritto una lettera dentro



Mi spiego meglio, scrivendo qualcosa in riga 10 si deve creare una riga 11 vuota, mantenendo lo stesso formato (colore bordi e unione celle)
Immagine


Ps. Dove dovrei scrivere questa macro per fare in modo che funzioni solo nel foglio di lavoro 4 "Worksheet4" ?
FutureP90
Utente Junior
 
Post: 14
Iscritto il: 17/02/12 13:48

Sponsor
 

Re: [Excel] Aggiungere riga mantenendo il formato

Postdi FutureP90 » 28/10/12 14:32

In alternativa potrei anche usare una macro simile a questa, penso sia più facile, potrei metterla in un immagine da cliccare

Codice: Seleziona tutto
Rows("5:5").Insert Shift:=xlDown


Ma dovrebbe aggiungere in riga A2 una riga con stesso formato del resto delle righe della tabella (colore, bordi e unione celle)
Sapete come posso fare?
FutureP90
Utente Junior
 
Post: 14
Iscritto il: 17/02/12 13:48


Torna a Applicazioni Office Windows


Topic correlati a "[Excel] Aggiungere riga mantenendo il formato":


Chi c’è in linea

Visitano il forum: Nessuno e 1 ospite